Kan man få fortrydelsesret?

Og på siden menu_deleted.asp ser koden sådan her ud:


<%
Dim ADO_Connection
Dim rsSletMenu
Dim rsSletSide
Dim SQL_STRING
Dim DeleteRsNumber

DeleteRsNumber= CLng(Request.QueryString("ID"))
Set ADO_Connection= Server.CreateObject("ADODB.Connection")
ADO_Connection.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("../../cgi-data/db.mdb")
Set rsSletMenu= Server.CreateObject("ADODB.Recordset")
SQL_STRING= "SELECT page.* FROM page WHERE ID=" & DeleteRsNumber

rsSletMenu.LockType = 3
rsSletMenu.Open SQL_STRING, ADO_Connection
rsSletMenu.Delete

rsSletMenu.Close
Set rsSletMenu= Nothing
Set ADO_Connection= Nothing

Response.Redirect "menu_showpages.asp"
%>

Prøv med:

STRING_Delete = "<a href="""" onclick=""if(confirm('Vil du slette?')) self.location.href = 'menu_deleted.asp?id=" & rsMenu("Id") & "'""><img border=""0"" src=""buttons/delete.png""></a>"

Når jeg skriver "" i strengen, "escaper" jeg "-karakteren, ligesom man escaper ' i SQL-strenge ved at skrive ''.

sorry - det skulle være:

STRING_Delete = "<a href=""#"" onclick=""if(confirm('Vil du slette?')) self.location.href = 'menu_deleted.asp?id=" & rsMenu("Id") & "'""><img border=""0"" src=""buttons/delete.png""></a>"

takker!!

Svar ;)