VB-Script aus ClientAccess

[lossin]

Hallo,

danke für die Antwort. Die nützt mir aber leider nix.
Ich habe das Zielprogramm jetzt extra auch in einen
Parameter gesteckt, damit im eigentlichen Aufruf kein " steht :

dim Zeichen
dim Programm
Zeichen = "4711"
Programm = "Test.vbs"
autSystem.Shell Programm, Zeichen

Das Programm Test.vbs wird zwar aufgerufen, aber es wird
immer noch kein Parameter übergeben.

Holger

[TARASIK]

Hallo Holger,
laut dem IBM Dokument muss es aber mit dem Parameter gehen:

Calling another Program from within VBScript Macro: PCOMM now supports starting an application file from within a
VBScript. To accomplish this a new automation object has been introduced. autSystem is the new object and Shell
is the new method.
The prototype is as follows:
function autSystem.Shell "ExeName",["Parameters"],[WindowStyle] as long
Parameters :
ExeName - String; the path and filename to the executable file.
Parameters - String, optional; any parameters you wish to pass on to
the application
WindowStyle - Integer, optional; the window style that you want the
application started as.
The valid values are:
AUTSYS_SHOW = 1 - show normal with focus
AUTSYS_SHOWMINIMIZED = 2 - show minimized with focus
AUTSYS_MAXIMIZE = 3 - show maximized
AUTSYS_SHOWNA = 4 - show normal without focus
AUTSYS_MINIMIZE = 5 - show minimized without focus
The default is AUTSYS_SHOW.
Return:
long - If the value is less than 32 it indicates an error has occured.
example: to run notepad from within a VBScript
autSystem.Shell "Notepad.exe", "c:\test.txt" , 1
This will start notepad with the file c:\test.txt loaded in a Normal window with focus.

[lossin]

Hallo,

diese Info habe ich in dieser Form auch.
Und mit der direkten Parameterübergabe ohne Variablen funktioniert das ja auch wie beschrieben.
Aber halt nicht mit Variablen. Und wo ich den Return-Werte herkriegen soll weiß ich auch nicht.
Wenn ich sage
RetWert = autSystem.Shell Programm, Zeichen, 1
läuft der Script auf Fehler :
Anweisungsende erwartet

Den aktuellsten Servicepack für CA habe ich übrigens drauf.

Holger

[Fuerchau]

Zuweisungen erfolgen als Funktion:

RetWert = autSystem.Shell(Programm, Zeichen, 1)