Hej !
har suttit hela kvällen (ca 30min) o tragglat med detta problem:

när jag kör denna kodsnutt:
<code>
<%@ Language=Vbscript %>
<% Option Explicit %>
<%
Dim bolFunnen, strMess
bolFunnen = false
' this will delete the account
Const adLockOptimistic = 3
Const adCmdTable = 2
Const adOpenKeyset = 1

Dim objConn
Set objConn = Server.CreateObject("ADODB.Connection")
objConn.ConnectionString = "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & server.MapPath("register.mdb")
objConn.Open

Dim objRS
Set objRS = Server.CreateObject("ADODB.Recordset")
objRS.Open "UserInfo", objConn,, adLockOptimistic, adCmdTable

Do while not (objRS.EOF or bolFunnen)
if (strComp(objRS("Username"), Request.Form("user"),vbTextCompare) = 0) then
bolFunnen = true
else
objRS.MoveNext
end if
Loop
strMess = "Kontot <FONT FACE=ARIAL SIZE=2>" & Request.Form("URL")& "</FONT> med användarnamnet <FONT FACE=ARIAL SIZE=2>" & Request.Form("user")& "</FONT><br>"
strMess = strMess & "<br>Ditt konto har annulerats!"
HÄR ÄR PROBLEMRADEN 29:objRS.Delete

objRS.Close

if not bolfunnen then
strMess = "<FONT COLOR='RED'>Ett okänt fel har inträffat.</FONT>"
end if

objRS.Close
Set objRS = Nothing

objConn.Close
Set objConn = Nothing
%>
</code>

får jag detta kryptiska meddelande:
Microsoft OLE DB Provider for ODBC Drivers fel '80004005'

[Microsoft][Drivrutin för ODBC Microsoft Access] Syntaxfel (operator saknas) i frågeuttrycket '(Username=? AND Pass=? AND URL=? AND In=? AND Out=? AND Email=? )'.

/-----/------/delete_account.asp, rad 29

??????????????????????????????
nån som har en aning om vad som är fel?
tack på för hand /jonas

Testa med

<%@ Language=Vbscript %>
<% Option Explicit %>
<%
Dim strSQL
Dim objConn
Dim RecordsAffected

' this will delete the account
Set objConn = Server.CreateObject("ADODB.Connection")

objConn.ConnectionString = "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & server.MapPath("register.mdb")
objConn.Open

strSQL = "DELETE * FROM UserInfo WHERE (Username = '" & Request.Form("user") & "')"

objConn.Execute strSQL, RecordsAffected

If RecordsAffected>0 Then
%>
Kontot <FONT FACE=ARIAL SIZE=2><%=Request.Form("URL")%></FONT> med användarnamnet <FONT FACE=ARIAL SIZE=2><%= Request.Form("user")%></FONT><br>
<br>Ditt konto har annulerats!"
<%
Else
%>
<FONT COLOR='RED'>Ett okänt fel har inträffat.</FONT>
<%
End if

objConn.Close
Set objConn = Nothing
%>