Hallo,

eine Möglichkeit für euer Problem ist die Erstellung eines VB-Scriptes.
Hier ein kleines Beispiel:

Set WshShell = CreateObject("WScript.Shell")

' AS400-Anmeldung
wshshell.Run """D:\Programme\IBM\Client Access\Emulator\Private\AS400.WS"""
' Script wartet 3 sec.
WScript.Sleep 3000
' Sitzung wird aktiviert
wshshell.AppActivate "Sitzung A - [24 x 80]"
WScript.Sleep 3000
' evt. Nachrichten werden ign.
WshShell.SendKeys "{F12}"
WScript.Sleep 3000
WshShell.SendKeys "{F12}"
WScript.Sleep 3000
WshShell.SendKeys "{F12}"
WScript.Sleep 3000
' Befehl wird eingegeben
WshShell.SendKeys "call libtest/test"
WScript.Sleep 3000
' Datenfreigabe
WshShell.SendKeys "~"

Bei der Definition der AS400-Sitzung muss ein Makro zur automatischen Anmeldung hinterlegt werden. (Ganz einfach: -> Sitzung aufrufen -> Makroaufzeichnung starten -> Anmeldung durchführen -> Makroaufzeichnung beenden -> Makro über Bearbeiten/Einstellungen/Makro... zuordnen)
Vorsicht im Makro steht Passwort lesbar !!!

Uwe