Das Notes Forum
Domino 9 und frühere Versionen => Entwicklung => Thema gestartet von: Badhei am 07.02.03 - 13:24:44
-
Dim ws As New notesuiworkspace
Dim files As Variant
files = ws.openfiledialog(False, "File List", "", "c:\Demoumgebung\Demodateien")
Evaluate("@command([execute];'soffice.exe';+""files(0)""+)")
-
... interaktive Dinge, wie @DBColumn, @Dialogbox und @Command... funktionieren nicht in Evaluate - mehr findest du in der Hilfe...
ata
-
Shell function
Beispiel
Starts another program.
Syntax
Shell ( program [ , windowStyle ] )
Elements
program
A string expression whose value is the name of the program to run, including arguments. program can be the name of an executable file that uses a file name extension of BAT, COM, PIF, or EXE. You can omit the file name extension, and you can optionally include a complete path specification.
Using an internal DOS command name generates an error.
windowStyle
Optional. A number designating a valid window style, as specified in the following table.
Style Description Constant
1, 5, or 9 Normal with focus SHELL_NORMAL_FOCUS
2 Minimized with focus (default) SHELL_MIN_FOCUS
3 Maximized with focus SHELL_MAX_FOCUS
4 or 8 Normal without focus SHELL_NORMAL_NO_FOCUS
6 or 7 Minimized without focus SHELL_MIN_NO_FOCUS
Cu
Martin ;)
-
Danke für die Antworten doch bringen die mich leider nicht weiter.
Ich muß eine Datei auswählen können so wie mit dem "openfiledialog" und dann starten so wie mit dem "@commad([execute]"";"").
Gibt es da irgend eine möglich das zu realisieren.
-
Hi,
versuchs mal so:
Dim workspace As New NotesUIWorkspace
Dim files As Variant
Dim taskId As Integer
files = workspace.OpenFileDialog(False, "File List", "", "c:")
taskId = Shell(files(0), 1)
Axel