3 svar · 227 visningar · startad av nille99
Jag försöker spara info i mysql bas med asp kod
Den fastna på "RecSet.Open Addera, Connect, adOpenStatic, adLockOptimistic"
någon som vet?
set conn = Server.CreateObject("ADODB.Connection")
conn.Open "Driver={Mysql};Server=XXXX.com;Database=XXXX;UID=XXXX;PWD=XXX"
Set RecSet = Server.CreateObject("ADODB.Recordset")
Addera = "Select * From anmalan"
RecSet.Open Addera, Connect, adOpenStatic, adLockOptimistic
RecSet.AddNew
if Request.Form("foretag") = "" then
else
RecSet("Foretag") = Request.Form("foretag")
end if
if Request.Form("org1") = "" then
else
RecSet("ORGnr1") = Request.Form("org1")
end if
RecSet.Update
RecSet.close
Connect.Close
Set RecSet = nothing
Set Connect = nothing
Response.Redirect "anmalanadmin.asp"
prova:
RecSet.Open Addera, [b]Conn[/b], adOpenStatic, adLockOptimistic
RecSet.AddNew
if Request.Form("foretag") = "" then
else
RecSet("Foretag") = Request.Form("foretag")
end if
if Request.Form("org1") = "" then
else
RecSet("ORGnr1") = Request.Form("org1")
end if
RecSet.Update
RecSet.close
[b]Conn[/b].Close
Set RecSet = nothing
Set [b]Conn[/b] = nothing
Response.Redirect "anmalanadmin.asp"
Tips till nille99; klistra alltid in felmeddelanden när saker och ting krånglar. Det är mycket lättare att felsöka kod då, när man vet vad man ska leta efter.
Mvh,
Använd denna metod för att lägga in information i databasen:
strSQL = "INSERT INTO (falt1, falt2, falt3) VALUES (varde1, varde2, varde3)"
Conn.Execute(strSQL) ,,128