Parameterübergabe in VB6

[Unregistriert]

Hallo

Ich möchte in VB6 ein Programm schreiben, bei dem beim Start des EXE Files ein oder mehrere Parameter übergeben werden können. Zum Beispiel beim Programm sende.exe:

SENDE c:\textdatei.txt 4800 COM3

Wie kann ich nun die Strings "c:\textdatei.txt", "4800" und "COM3" im VB6 Code weiterverarbeiten?

Vielen Dank im Voraus. Hans

[Scotty]

Hi,

steht dazu nichts in der Hilfedatei von VB? Und warum willst du das so machen? Heutzutage geht man doch eher über Options- und "Datei öffnen..."-Dialoge.

Gruß Ralf

[Unregistriert]

guckst Du in die Hilfe

suchst Du nach Command-Funktion, Befehlszeilenargumente, ....

findest Du Beispiel

[Unregistriert]

Vielen Dank für die Hinweise.

Ich brauche das bei einem Programmiergerät für uC, das ich gebaut habe. Aus dem Assembler rufe ich mein Programm mit "SENDE.EXE TEST.BIN 4800 COM3" auf. Anders geht das nicht, denn den Assembler will ich ja nicht selber programmieren.

Die Suche nach "Command-Funktion" bringt nichts. Die Suche nach "Befehlszeilenargumente" erklärt die Parameter beim Aufruf von VB.EXE. Das löst das Problem auch nicht.

Ich bin also dankbar für weitere Hinweise...

Gruss Hans

[Unregistriert]

Also

x = command() in den VB-Code, Cursor auf command und F1

Das hier geht auf jeden Fall:

------------ schnipp --------------
Private Sub Form_Load()
'durch Start von VB mit vb /cmd Testparameter wird ein Aufrufparameter für Testzwecke an die Anwendung übergeben.

Dim SArg As String
Dim IArg As Integer
Dim Arg() As String

Dim i As Integer

IArg = 0
SArg = Command()

If Len(SArg) Then
MsgBox "Es wurden Befehlszeilenargumente angegeben." & vbCrLf & _
"guckst Du: " & SArg
Else
MsgBox ("Es wurden keine Befehlszeilenargumente angegeben")
End If
End Sub
------------ schnapp --------------


Das Beispiel in der HILFE zeigt wie man die Parameter zerlegt.

Siegfried

[MacSeck]

Das Zauberwort heisst COMMAND$ (zumindest bis QB4.x) - dürfte aber aus Kompatibilitätsgründen auch in VB drin sein.

Beispiel:

Parameter$ = COMMAND$
Print "Beim Programmstart wurde folgendes übergeben : ";Parameter$

Das zu einer .EXE compiliert namens TEST z.B. und dann folgende Kommandozeile von DOS aus bzw. Ausführen (Windows)

TEST Hallo 123

sollte

Hallo 123 ergeben.

Den Parameter$ kannst Du dann mit left$, instr$ usw. zerpflücken.
also
Baudrate = val(left$(Parameter$,4))
COMNummer = val(right$(Parameter$,4))
usw.
oder wie in Deinem Beispiel:
Oeffnungs$ = right$(Parameter$,4)+","+left$(Parameter$,4)+","+"N,8,1"
OPEN Oeffnungs$ for input as #1

usw.:)