Hej ! Jag skulle skriva såhär istället:Problem med borttagning av post i databas
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 /jonasSv: Problem med borttagning av post i databas
<code>
objConn.ConnectionString = "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & server.MapPath("register.mdb")
objConn.Open
sql = "delete from userinfo where username = '" & request("user") & "'"
objConn.execute sql
set objConn = Nothing
</code>
/Pelle