Openargs in eine Variable schreiben

[strolli76]

Hallo,

ich wollte einmal fragen, wie ich Openargs in eine Varaible schreiben kann?
Wenn ich schreibe

Code [Auswählen] Erweitern


var1= Me.OpenArgs


ist die "var1" leer

wenn ich aber eine Zeile drunter OpenArgs in ein Select Statement einbaue, funktioniert dies. Wie ist das denn möglich?

Code [Auswählen] Erweitern


takeoff = Me.OpenArgs
MsgBox "Takeoff: " & takeoff ' hier ist nichts drinnen
strSQL = "SELECT *  FROM artikel " & _
         "WHERE takeoff = '" & Me.OpenArgs & "'"
Me.Liste2.RowSource = strSQL 'hier ist das Select korrekt


[MzKlMu]

Hallo,
siehe hier:

http://ms-office-forum.de/forum/showthread.php?t=266675

Crossposting, d.h. das Posten der gleichen Frage in mehreren Foren zur gleichen Zeit, ist unerwünscht.

[Hondo]

Hallo,
du musst eine globale Variable definieren, und dann in einem Formular den OpenArgs Wert zuordnen.
z.B. so:

Code [Auswählen] Erweitern

Private Sub Form_Load()
   If Not IsNull(Me.OpenArgs) Then
       OpArgGlobalValue = Me.OpenArgs
   End If
End Sub

Gruß Andreas

[strolli76]

Ach das ist interressant  
Das muß also ein globale Variable sein!

[Hondo]

Hallo,
nur dann wenn du die Variable auch global benötigst.
Bitte vermeide zukünftig Crosspostings!

Gruß Andreas