Set Connect = Server.CreateObject("ADODB.Connection")
Connect.Open Application("nyhetsdatabasen")
Connect.Execute("UPDATE Allt SET rubrik = '" & Request.Form("Rubrik") & "', skribent = '" & Request.Form("updateskribent") & "' WHERE ID = " & Request.Form("ID"))
Connect.Close
Frågan#1
Mot access fungerade:
Set Connect = Server.CreateObject("ADODB.Connection")
Connect.Open Application("nyhetsdatabasen")
Set RecSet = Server.CreateObject("ADODB.Recordset")
Uppdatera = "Select * from Allt WHERE ID=" & Request.Form("ID")
RecSet.Open Uppdatera, Connect, adOpenStatic, adLockOptimistic
RecSet("rubrik") = Request.Form("Rubrik")
RecSet("skribent") = Request("updateskribent")
ETC ETC ETC ETC....
RecSet.Update
RecSet.Close
Connect.Close
Utan problem, nu är Application("nyhetsdatabasen") en mySQL anslutning istället. Hur ska update funktionen se ut nu?
