Voici le code d'une page avec vbscript qui ouvre une message box lors d'un clic sur un bouton.
Je voudrais savoir si quelqu'un peut m'aider pour que l'événement ne soit plus le clic sur un bouton mais sur un lien hypertext (sans passer par une 2ème page).
Je sais utiliser des fonctions pour ce genre de truc en javascript mais en vbscript je sèche un peu et javascript ne gère pas les msgbox. :p
Merci d'avance.
-----------------------------------------------------------------
<html>
<head>
<title>test</title>
<SCRIPT LANGUAGE='VBSCRIPT'>
Sub ok_OnClick
Dim Msg, Style, Title, Help, Ctxt, Response, MyString
Msg = "Conserver les récépissés pour une réedition futur ?" ' Define message.
Style = vbYesNo + vbquestion + vbDefaultButton2 ' Define buttons.
Title = " Demande de confirmation" ' Define title.
' Display message.
Response = MsgBox(Msg, Style, Title, Help, Ctxt)
If Response = vbYes Then ' User chose Yes.
MyString = "Yes" ' Perform some action.
document.location.href="http://www.vbfrance.com"
Else ' User chose No.
MyString = "No" ' Perform some action.
End If
End Sub
</SCRIPT>
</head>
<body>
<FORM name="commande">
<INPUT name="ok" type="button"
value="Cliquez ici">
</FORM>
</body>
</html>
Si ce que tu as à dire est moins profond que le silence alors ne dis rien.