tool zur netzwerküberwachung

Atlan · 22.08.2002, 21:51

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"

22.08.2002, 21:51	#9
Atlan Master Registriert seit: 20.12.1999 Beiträge: 636	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"

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