Update Recordset - jeg har set mig blind på det
Hvad går der galt her?Jeg bruger Persits.Upload, derfor Upload.Form("felt")...
Fejltype:
Microsoft JET Database Engine (0x80040E14)
Syntax error (missing operator) in query expression 'DemoID='.
--------------------------------
strNummerID = Upload.Form("id")
strBeskrivelse = replace(Upload.Form("beskrivelse"), "'", "''")
strOptaget = (replace(Upload.Form("optaget"), "'", "''"))
strRegDato = Now
strRegBruger = Upload.Form("bruger")
strDid = Upload.Form("did")
Set Conn = Server.CreateObject("ADODB.Connection")
Set RS = Server.CreateObject("ADODB.Recordset")
Conn.Open MM_altConn_STRING
strSQL = "SELECT * FROM tblDemo WHERE DemoID=" & strDid
RS.Open strSQL, Conn, 2, 3
RS.Fields("NummerID").Value = strNummerID
RS.Fields("DemoBeskrivelse").Value = strBeskrivelse
RS.Fields("DemoOptaget").Value = strOptaget
RS.Fields("DemoFil").Value = File.Filename
RS.Fields("DemoMb").Value = File.Size
RS.Fields("DemoRegDato").Value = now
RS.Fields("DemoRegBruger").Value = strRegBruger
RS.Update
RS.Close
Conn.Close
