erstelle vbscripts für as-400 und habe mit "neuen Befehlen vom windows script 5.5 folg. Probleme:

er bringt als Fehlermeldung: Variable ist nicht definiert 'wscript' ... (siehe Zeile unten: wscript.sleep 3000) bzw. kennt auch die Anweisung (siehe Zeile unten: shell.SendKeys "net send 022-9472-d41 test zum senden einer Nachricht") nicht !
ansonsten funktioniert alles (macht auch das Dos Fenster auf ...)

Wer kann mir ev. weiterhelfen ??? Danke im voraus !


hier mein "testscript":

[PCOMM SCRIPT HEADER]
LANGUAGE=VBSCRIPT
DESCRIPTION=
[PCOMM SCRIPT SOURCE]
OPTION EXPLICIT
autECLSession.SetConnectionByName(ThisSessionName)
REM This line calls the macro subroutine

subSub1_

sub subSub1_()
dim shell
'senden über Netzwerk:
Set shell = CreateObject("Wscript.Shell")
shell.run ("cmd.exe")
wscript.sleep 3000
shell.SendKeys "net send 022-9472-d41 test zum senden einer Nachricht"
shell.SendKeys "{ENTER}"
wscript.sleep 5000
shell.SendKeys "exit"
shell.SendKeys "{ENTER}"
wscript.sleep 5000

'senden mit POPUP Fenster ---> ist ok:
Dim meldung
Set shell = CreateObject("Wscript.Shell")
meldung = shell.popup("hier steht bel. Text - Ende", 8, "ÜBERWACHUNG ...", vbOKCancel + vbExclamation)

Anmerk.:
es ist auch nicht möglich folg. einfache VB-script Anweisung wie zB WSCRIPT.ECHO "hier steht der Text" auf der AS400 zu verwenden !