Boite de dialogue

Description

Ce script est un script mélangé au Html, VBscript et JavaScript. Malheureusement, le VBscript (il y en à dedans) marche dans très peu de navigateur. Alors ne soyez pas surpris si ça ne marche pas. Pour parler du script, vous écrivez dans une boite de dialogue ce que vous désirez puis le message se marque dans les cinq autres types de fenetres.

Source / Exemple :


<html>
<head>
</head>
<body>
<h3><center>Créer</center></h3>
<center><input type="button" value="Contenu de la boite" OnClick="a=prompt ('Que voulez vous mettre dans la boite ?','Indiquez le contenu de la boite');">
</center><br>
<hr>
<script language="VBscript">
Sub contenu_onclick
MsgBox ""+a+""
End Sub
Sub critical_onclick
MsgBox ""+a+"",VbCritical
End Sub
Sub question_onclick
MsgBox ""+a+"",Vbquestion
End Sub
Sub exclamation_onclick
MsgBox ""+a+"",Vbexclamation
End Sub
Sub information_onclick
MsgBox ""+a+"",Vbinformation
End Sub
Sub contenuvbok_onclick
MsgBox ""+a+"",vbok
End Sub
Sub criticalvbok_onclick
MsgBox ""+a+"",VbCritical+vbok
End Sub
Sub questionvbok_onclick
MsgBox ""+a+"",Vbquestion+vbok
End Sub
Sub exclamationvbok_onclick
MsgBox ""+a+"",Vbexclamation+vbok
End Sub
Sub informationvbok_onclick
MsgBox ""+a+"",Vbinformation+vbok
End Sub
</script>
<h3><center>Tester</center></h3>
<center><input type="button" value="Contenu de la boite" name="contenu">
<input type="button" value="Contenu de la boite (Critical)" name="critical">
<input type="button" value="Contenu de la boite (Question)" name="question">
<input type="button" value="Contenu de la boite (Exclamation)" name="exclamation">
<input type="button" value="Contenu de la boite (Information)" name="information"><br><p>
</body>

Codes Sources

A voir également

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.