Update problem i vbscript/asp/access db
Hej,jeg har problemer med en update udførelse i vbscript/asp. Jeg har efterhånden prøvet hvad jeg har kunnet læse mig frem til, det har ikke lykkedes at finde ud af fejlen.
Jeg har lavet en testfil hvori sql-sætningen indgår. Denne testfil opretter en instans af clsdb klassen i clsdb.asp filen. Men hver gang jeg kalder opendb-metoden med update sætningen som parameter får jeg: "Handlingen skal bruge en opdateringsforespørgsel..."
Udskrivning af updatesætningen:
UPDATE person SET fnavn = 'Ulla' WHERE email LIKE 'annette@frejmann.dk'
Jeg ved ikke hvad problemet er, er der én der kan hjælpe?
Filen testdb.asp
<!-- #include file="clsdb.asp" -->
<%
Dim objdb
Dim strsql
Set objdb = new clsdb
strsql = "UPDATE person SET fnavn = 'Ulla' WHERE email LIKE 'annette@frejmann.dk'"
objdb.opendb(strsql)
objdb.closedb()
Set objdb = Nothing
%>
Filen clsdb.asp
<%
Class clsdb
Function opendb(psql)
Dim strconn
Dim strsql
Dim objconn
Dim objrs
strsql = psql
strconn = "Provider=Microsoft.Jet.OLEDB.4.0; " & _
"Data Source = " & Server.MapPath("../db/galleri.mdb")
Set objconn = Server.CreateObject("ADODB.connection")
objconn.Open(strconn)
Set objrs = objconn.Execute(strsql)
'Returnerer recordsettet til kaldende modul
Set opendb = objrs
End Function
Sub closedb()
Set objconn = Nothing
Set objrs = Nothing
End Sub
End Class
%>