invece di fare lo script in JS l'ho fatto in VBScript!!

funziona!!!
esegue la msgbox.

ma se voglio fare una msgbox che abbia l'opzione vbyesno,(cioè fa comparire il messaggio con i tasti "si" e "no"), come posso recuperare il valore del tasto selezionato???

il codice:

Private Sub Button2_Click......
Response.Write(Popup("Questa è la MIA messagebox in VBS"))
End Sub

Function Popup(ByVal Val) As String
Dim testo As String = Val
testo = Chr(34) & Replace(testo, "'", "'") & Chr(34)

Popup = ("<script language=" & Chr(34) & "VBscript" & Chr(34) & ">" & vbCrLf & "msgbox " & testo & ",vbyesno," & Chr(34) & "Attenzione" & Chr(34) & "" & vbCrLf & "</" + "script>")

End Function