prova
id = Session("id")
SQL = "SELECT * FROM Vill_ha_bild where id='"& id & "'"
RecSet.Open SQL, Connect, adOpenStatic, adLockOptimistic
å samma sak på den över ;)
3 svar · 232 visningar · startad av sin_adec
Kan ngn säga vad som är fel... jag får följande felmeddelande:
Microsoft OLE DB Provider for ODBC Drivers error '80004005'
[Microsoft][ODBC Microsoft Access Driver]Error in row
update_bild.asp, line 29
för följande:
<!-- #Include file="adovbs.inc" -->
<%
Set Connect = Server.CreateObject("ADODB.Connection")
Connect.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.mappath("databass.mdb")&";pwd=password"
SQL = "UPDATE medlemmar SET points = points + 0.5 WHERE id = " & Session("id")
Connect.Execute SQL
Connect.Close
Set Connect = nothing
Set Connect = Server.CreateObject("ADODB.Connection")
Connect.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.mappath("databass.mdb")&";pwd=password"
Set RecSet = Server.CreateObject("ADODB.Recordset")
SQL = "SELECT * FROM Vill_ha_bild where id="&Session("id")
RecSet.Open SQL, Connect, adOpenStatic, adLockOptimistic
RecSet.AddNew
RecSet("anv") = session("anv")
RecSet("losen") = session("losen")
Recset("franid") = session("id")
RecSet("bild") = Request.Form("bild")
RecSet.Update
RecSet.Close
Connect.Close
Set Connect = Nothing
Set RecSet = Nothing
Response.Redirect("en_sida.asp")
%>
prova
id = Session("id")
SQL = "SELECT * FROM Vill_ha_bild where id='"& id & "'"
RecSet.Open SQL, Connect, adOpenStatic, adLockOptimistic
å samma sak på den över ;)
Felet beror oftast på att du inte anger något värde för en kolumn som är definierad som not null eller att du har en foreign key koppling som inte är uppfylld.
Det är alltså insert i tabellen vill_ha som misslyckas så jag tror inte att Cactuz förslag hjälper något.
En annan sak är att det är onödigt att stänga och öppna förbindelsen mellan olika anrop.
En till sak, varför använder du addnew? Du har ju en riktig update i alla fall.
man vet aldrig med asp ;)