Bekræft string inden sletning i AccessBD 2000

Et valg om sletning fra en tidliger side sendes til disse koder på en ny side

<%If Request.QueryString <> \"\" Then
hvilken = Request.QueryString(\"ID\")
Dim objRecSlet
Set objRecSlet = Server.CreateObject (\"ADODB.Recordset\")
objRecSlet.Open \"DELETE FROM viebe where OrderID=\" & hvilken, Session(\"vie\")
Set objRecSlet = Nothing
End If%>

Er det muligt at indsætte en bekraftning ind her et sted?

vh Skjold

Jeg tror vidst det er noget med:

<script language=\"VBScript\">
msgbox(\"er du sikker\", 4 + 32, \"\")
</script>

Jeg har provet denne sammenblading via en scriptmand, men ham ved ikke helt hvad funktionerne skal hedde i ASP.
Der er fejl i den første linie: response...

<%If Request.QueryString <> \"\" Then
hvilken = Request.QueryString(\"ID\")
Dim objRecSlet, msg, style, title
Set objRecSlet = Server.CreateObject (\"ADODB.Recordset\")

response msg = \"Meddelelse til bruger\"
style = vbQuestion + vbYesNo + vbCritical
title = \"Titel på meddelelsesboks\"
response = MsgBox(msg, style, title)
If response = vbYes Then

objRecSlet.Open \"DELETE FROM viebe where OrderID=\" & hvilken, Session(\"vie\")
Set objRecSlet = Nothing

else
end if

End If%>

Det script du har skrevet, hvor skal det ind henne, under <% ... %> ?? Eller før, hvis det skal ind før tror jeg ikke det for indvirkninng på sletningen, rækken i BD\'en vil blive slettet alligevel, tror jeg.??

(\"er du sikker\", 4 + 32, \"\")  ?? 4 + 32 ??

4 gør at msgboxen kommer med en ja og en nej knap.. 32 gør at der kommer et billede på hvor der er et spørgsmålstegn :-)

der er heller ikke noget der hedder Response msg!

Du skal lave det ved et VBScript... der er næsten det samme som ASP!

Her kan du læse dig lidt til hvordan du laver de forskellige promities til det...

http://www.devguru.com/Technologies/vbscript/quickref/msgbox.html

I disse koder (som sletter fint fra BD\'en) er der fejl i linien med msgbox, som ikke godtages.

<%
If Request.QueryString <> \"\" Then
hvilken = Request.QueryString(\"ID\")
Dim objRecSlet
Set objRecSlet = Server.CreateObject (\"ADODB.Recordset\")
End if
Response.write \"<INPUT TYPE=\'button\' NAME=\'button3\' VALUE=\'Click Here!\'>Yes, No, Cancel\"
Response.write \"<SCRIPT LANGUAGE=\'VBScript\'>\"
Response.write \"sub button3_onclick\"
Response.write \"msgbox \'Hello\', 3, \'VBScript Demo 3\'\"
Response.write \"end sub\"
Response.write \"</SCRIPT>\"
objRecSlet.Open \"DELETE FROM tal where AutoID=\" & hvilken, Session(\"vbs\")
Set objRecSlet = Nothing
%>

Er det overhovedt muligt at lave sådanne en kombination, hvor en box kommer frem som skal bekræftes inden en række slettes i BD\'en?
vh Skjold

Du mangler at sætte \" \" uden om hello!

fandt du ud af det siden du gav mig pointne?

Jeg har ikke fundet ud af det endnu, men er kommet et godt stykke videre. Derfor fik du de 15 points. Det er åbenbart noget jeg skal udvikle, eftersom er ikke var et hurtigt og præsist svar fra nogen. Jeg har nu ikke noget imod at udvikle lidt, men det tager bare for meget tid, derfor kan jeg så godt lide dette site, det er en kanon god hjælp for at komme videre, når jeg er gået i stå. Jeg ser på udvilingen senere idag eller imorgen. Kan jeg fortsat skrive til dig (medions) via dette spg.?
VH Skjold

jaja.. selvfølgelige... :-)

medions ....  Jeg har fundet ud af at lave en comfirm botton hvori der indgår asp i ja nej valget. Det virker som jeg vil have det... tak for hjælpen.

PS jeg mener at have fundet ud af at, det ikke kan lade sig gøre at stoppe asp stringe fra at slette ved at gøre som: response .... \"et eller andet java script\".

vh skjod

Det er muligt at stoppe scriptet inden den sletter det ved et check! -Det kan fx. gøres i JavaScript, hvor du så skal lave en såkaldt return!

//Rune