4 svar · 265 visningar · startad av webbSAJTEN
Tjenare..
default.asp?action=tabort&id=<%=RecSet("ID")%>
<%
Set Connect2 = Server.CreateObject("ADODB.Connection")
Connect2.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath("db/filer.mdb")&";"
Set RecSet2 = Server.CreateObject("ADODB.Recordset")
%>
<%
If Request.Querystring("action")="tabort" Then
RecSet2="DELETE from filer where ID=" & Request.Querystring("ID") & ""
RecSet2.Execute(Connect2),,128
Response.Redirect "default.asp"
end if
%>
Jag får felet:
Microsoft VBScript runtime error '800a01a8'
Object required: 'DELETE from filer wh'
/Elida/filarkiv/default.asp, line 10
Rad 9-10 är:
RecSet2="DELETE from filer where ID=" & Request.Querystring("ID") & ""
RecSet2.Execute(Connect2),,128
<%
Set Connect2 = Server.CreateObject("ADODB.Connection")
Connect2.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath("db/filer.mdb")&";"
If Request.Querystring("action")="tabort" Then
strSQL="DELETE from filer where ID=" & Request.Querystring("ID") & ""
Connect2.Execute(strSQL),,128
Response.Redirect "default.asp"
end if
%>
Dock så borde du kolla läsa på lite om sql-injections om din kod ser ut sådär i verkligheten.
Måste du inte göra så här:
If Request.Querystring("action")="tabort" Then
SQL = "DELETE from filer where ID= '" & Request.Querystring("ID") & "'"
set RecSet2 = Connect2.execute(SQL)
Response.Redirect "default.asp"
end if
sudden skrev:
Måste du inte göra så här:
1. Nej.. när ID är en integer så skall inte citationstecken (') användas i sql-satsen.
2. Nej.. när du raderar behöver du inte skapa ett recordset.
Nej.. när du raderar behöver du inte skapa ett recordset.
Det visste jag inte :)
Man lär sig nått nytt varje dag;)
