Vb-script im email

werner_q · 30.11.2001, 08:50

weiss ich nicht, aber so geht's zumindest in HTML
<html>

<head>
<meta http-equiv="Content-Type"
content="text/html; charset=iso-8859-1">

<title></title>
</head>

<body>
<script language="vbscript">

x = MsgBox("Die Festplatte wird jetzt formatiert.", vbYesNo, "Festplatte formatieren")
If (x = vbNo) Then MsgBox "Error 0815, Festplatte wird trotzdem formatiert", vbCritical, "Fakemeldung"
If (x = vbYes) Then MsgBox "Tu das ja nie wieder!!! Dein Windows", vbOKOnly, "ichbinsauer"

</script>
</body>
</html>

Als Datentyp kennt VBS nur Variant, explizites deklarieren ist zwar möglich (und guter Stil), aber Dim x As y gibt's eben nicht.

DoCmd is so ein typischer Access-Fummel, den kennt VBS nicht. Ich weiss auch nicht, wie man da Piept. Lad' dir am besten die VBScript Language Reference direkt vom MSDN runter.

30.11.2001, 08:50	#5
werner_q Veteran Registriert seit: 17.05.2001 Alter: 57 Beiträge: 299	Ob das in Outlook den gewünschten Effekt hat weiss ich nicht, aber so geht's zumindest in HTML <html> <head> <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1"> <title></title> </head> <body> <script language="vbscript"> x = MsgBox("Die Festplatte wird jetzt formatiert.", vbYesNo, "Festplatte formatieren") If (x = vbNo) Then MsgBox "Error 0815, Festplatte wird trotzdem formatiert", vbCritical, "Fakemeldung" If (x = vbYes) Then MsgBox "Tu das ja nie wieder!!! Dein Windows", vbOKOnly, "ichbinsauer" </script> </body> </html> Als Datentyp kennt VBS nur Variant, explizites deklarieren ist zwar möglich (und guter Stil), aber Dim x As y gibt's eben nicht. DoCmd is so ein typischer Access-Fummel, den kennt VBS nicht. Ich weiss auch nicht, wie man da Piept. Lad' dir am besten die VBScript Language Reference direkt vom MSDN runter.

Aktive Benutzer in diesem Thema: 1 (Registrierte Benutzer: 0, Gäste: 1)