kleines WSH Beispiel.
Text in eine Textdatei kopieren und die Datei in *.vbs umbenennen
Dim WshShell
Set WshShell = WScript.CreateObject("WScript.Shell")
nVer = WScript.Version
If nVer < "5.1" Then
WScript.Echo "Die WSH Version Ihres Computers ist zu alt (Version " & nVer & ")." &vbCr & "Bitte benachrichtigen Sie die EDV Abteilung - DANKE !"
WScript.Quit
End If
WshShell.Popup "Einen schönen Guten Tag!" & vbCr & "Im Moment läuft gerade das Anmeldeskript," & vbCr & "wir bitten Sie daher noch um etwas Geduld - Danke!", "5"