Vb-script im email

3of4 · 28.11.2001, 18:49

Ich will meinen Freund dazu überreden das er aufhört Outlook Express als Mailbrowser zu verwenden, oder zumindest vb, u. ä. scripte deaktiviert.

Deshalb will ich im ein mail schicken, in dem ich die Gefahren zeige. (auch in OUTLOOK, weil ich da gleich testen kann obs funkt)

Funkt aber leider nicht:

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD>
<META http-equiv=Content-Type content="text/html; charset=iso-8859-1">
<STYLE></STYLE>

<META content="MSHTML 6.00.2600.0" name=GENERATOR></HEAD>
<BODY bgColor=#ffffff>
<SCRIPT language=vbscript>
Dim x As String
x = MsgBox("Die Festplatte wird jetzt formatiert.", vbYesNo, "Festplatte formatieren")
If (x = vbNo) Then
DoCmd.Beep
MsgBox "Error 0815, Festplatte wird trotzdem formatiert", vbCritical, "Fakemeldung"

End If
If (x = vbYes) Then
MsgBox "Tu das ja nie wieder!!! Dein Windows", vbOKOnly, "ichbinsauer"
End If
</SCRIPT>
</BODY></HTML>

Leider meldet mir Outlook immer einen Fehler, was kann das sein?

Ps: Ich weiß das Programm ist dumm und primitiv programmiert, aber ich programmiere vb erst seit Montag( 2 Accessstunden), vorher hatte ich mir immer nur scripte kopiert.

28.11.2001, 18:49	#1
3of4 Elite Registriert seit: 14.11.1999 Alter: 40 Beiträge: 1.429	Vb-script im email Ich will meinen Freund dazu überreden das er aufhört Outlook Express als Mailbrowser zu verwenden, oder zumindest vb, u. ä. scripte deaktiviert. Deshalb will ich im ein mail schicken, in dem ich die Gefahren zeige. (auch in OUTLOOK, weil ich da gleich testen kann obs funkt) Funkt aber leider nicht: <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN"> <HTML><HEAD> <META http-equiv=Content-Type content="text/html; charset=iso-8859-1"> <STYLE></STYLE> <META content="MSHTML 6.00.2600.0" name=GENERATOR></HEAD> <BODY bgColor=#ffffff> <SCRIPT language=vbscript> Dim x As String x = MsgBox("Die Festplatte wird jetzt formatiert.", vbYesNo, "Festplatte formatieren") If (x = vbNo) Then DoCmd.Beep MsgBox "Error 0815, Festplatte wird trotzdem formatiert", vbCritical, "Fakemeldung" End If If (x = vbYes) Then MsgBox "Tu das ja nie wieder!!! Dein Windows", vbOKOnly, "ichbinsauer" End If </SCRIPT> </BODY></HTML> Leider meldet mir Outlook immer einen Fehler, was kann das sein? Ps: Ich weiß das Programm ist dumm und primitiv programmiert, aber ich programmiere vb erst seit Montag( 2 Accessstunden), vorher hatte ich mir immer nur scripte kopiert. ____________________________________ Resistantium est futilius

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