What is wrong with this code?:
<%@page language="vb"%>
<%@import namespace="system.data"%>
<%@import namespace="system.data.oledb"%>
<script runat="server">
sub page_load(o as object, e as eventargs)
dim conn as new oledbconnection( _
"Provider=microsoft.jet.oledb.4.0;" & _
"Data source=c:\users\asus\desktop\banking.mdb.mdb;")
dim ds as new dataset("mydataset")
dim objcmd as new oledbdataadapter("select * from tblusers " & _
"where userid < 10", conn)
objcmd.fill(ds, "Users")
dim q as string
q=ds.tables("users").rows(2)(3).tostring
response.write(q)
ds.tables("users").rows(2)(3)="ASPVille"
dim dr as datarow=ds.tables("users").newrow()
dr(0)="Greg"
dr(1)="Smith"
dr(2)="India"
dr(3)="Delhi"
ds.tables("users").rows.add(dr)
q=ds.tables("users").rows(2)(3)
response.write(q)
q=ds.tables("users").rows(4)(0)
response.write(q)
objcmd.updatecommand=new oledbcommand
objcmd.updatecommand.commandtext="Update tblUsers" & _
"set City='ASPVILLE' where userid=3"
objcmd.updatecommand.connection=conn
objcmd.insertcommand=new oledbcommand
objcmd.insertcommand.commandtext="Insert INTO " & _
"tblUsers (First Name, Last Name, Address, City" & _
") VALUES ('Greg', 'Smith', " & _
"'434 Maple Apt B', 'Minneapolis' )"
objcmd.insertcommand.connection=conn
objcmd.update(ds, "Users")
Response.write("?<br>")
end sub
</script>
<html><body>Done!</body></html>I get error "Syntax error in UPDATE statement" in "objcmd.update(ds, "Users")". Where am I doing wrong?