Acces mit Parametern starten

[Karl M.]

Hallo NG!

Ist es möglich, bestimmte Abfragen in Access von ausserhalb über Parameter
zu starten?

Also, ich habe meine "AccessDB.mdb" und darin eine Abfrage "MeineAbfrage".
Nun möchte ich z.B. aus der Eingabeaufforderung irgendwie etwas machen
können, wie "C:\MeineDatenbanken\AccessDB.mdb MeineAbfrage". Ist das
möglich? Wie kann ich das machen?

Es würde mich auch interessieren auf VBA-Code innerhalb der AccessDB.mdb
zuzugreifen. Dort habe ich z.B. eine Methode, welche auf gewisse Weise eine
Abfrage startet. Ist es mir möglich auf gerade diese Methode (public)
zuzugreifen?

Mit freundlichen Grüßen

[Gunter Avenius]

Hallo Karl M.,

Post by Karl M.
Ist es möglich, bestimmte Abfragen in Access von ausserhalb über
Parameter zu starten?
Also, ich habe meine "AccessDB.mdb" und darin eine Abfrage
"MeineAbfrage". Nun möchte ich z.B. aus der Eingabeaufforderung
irgendwie etwas machen können, wie
"C:\MeineDatenbanken\AccessDB.mdb MeineAbfrage". Ist das möglich?
Wie kann ich das machen?

Du kannst in Deiner Verknüpfung zu Access - und der Datenbank der
Befehlzeile den Paramater /cmd xxx mitgeben.

Siehe Onlinehilfe Stichwort "Command-Funktion"

Post by Karl M.
Es würde mich auch interessieren auf VBA-Code innerhalb der
AccessDB.mdb zuzugreifen. Dort habe ich z.B. eine Methode, welche
auf gewisse Weise eine Abfrage startet. Ist es mir möglich auf
gerade diese Methode (public) zuzugreifen?

Wie in www.donkarl.com?FAQ1.21 beschrieben,

anstatt:
appAcc.DoCmd.DeleteObject acReport, "BerichtsName"

appAcc.Run ......
(siehe Onlinehilfe)

Gruß
Gunter

[Karl M.]

Hallo Gunter,

Post by Gunter Avenius
Hallo Karl M.,

Post by Karl M.
Ist es möglich, bestimmte Abfragen in Access von ausserhalb über
Parameter zu starten?
Also, ich habe meine "AccessDB.mdb" und darin eine Abfrage
"MeineAbfrage". Nun möchte ich z.B. aus der Eingabeaufforderung
irgendwie etwas machen können, wie
"C:\MeineDatenbanken\AccessDB.mdb MeineAbfrage". Ist das möglich?
Wie kann ich das machen?

Du kannst in Deiner Verknüpfung zu Access - und der Datenbank der
Befehlzeile den Paramater /cmd xxx mitgeben.
Siehe Onlinehilfe Stichwort "Command-Funktion"

Post by Karl M.
Es würde mich auch interessieren auf VBA-Code innerhalb der
AccessDB.mdb zuzugreifen. Dort habe ich z.B. eine Methode, welche
auf gewisse Weise eine Abfrage startet. Ist es mir möglich auf
gerade diese Methode (public) zuzugreifen?

Wie in www.donkarl.com?FAQ1.21 beschrieben,
appAcc.DoCmd.DeleteObject acReport, "BerichtsName"
appAcc.Run ......
(siehe Onlinehilfe)

Alles klar, vielen Dank für die schnelle Antwort. Ich werde mir das mal
anschauen.

Mit freundlichen Grüßen

[Karl M.]

Hi Gunter,

Post by Gunter Avenius
Hallo Karl M.,

Post by Karl M.
Ist es möglich, bestimmte Abfragen in Access von ausserhalb über
Parameter zu starten?
Also, ich habe meine "AccessDB.mdb" und darin eine Abfrage
"MeineAbfrage". Nun möchte ich z.B. aus der Eingabeaufforderung
irgendwie etwas machen können, wie
"C:\MeineDatenbanken\AccessDB.mdb MeineAbfrage". Ist das möglich?
Wie kann ich das machen?

Du kannst in Deiner Verknüpfung zu Access - und der Datenbank der
Befehlzeile den Paramater /cmd xxx mitgeben.
Siehe Onlinehilfe Stichwort "Command-Funktion"

Ich habe mir das mal angeschaut, jedoch hatte ich bei meinen Versuchen
keinen Erfolg. Wie rufe ich denn nun eine Access (2003) mit Params auf?
Mein Versuch -> "C:\MeineDB.mdb" /cmd BlaBlaBla
Funktioniert aber nicht. Habe auch in der DB eine Funktion angelegt ->

Public Sub CheckCommandLine()
...
End Sub

Doch auch in diese Wandert er nicht mit oder ohne Parameterübergabe. Nach
dem Ausführen dieses Pfades aus dem Ausführen-Fenster (Windows + R), öffnet
sich lediglich die DB, allerdings erkenne ich keinen Unterschied zur
normalen Weise eine Access-DB zu öffnen.

Wo liegt der Fehler?
Hat jemand eine Idee?

Mit freundlichen Grüßen

[Jens Schilling]

Hallo, Karl

Post by Karl M.
Hi Gunter,

Post by Gunter Avenius
Hallo Karl M.,

Post by Karl M.
Ist es möglich, bestimmte Abfragen in Access von ausserhalb über
Parameter zu starten?
Also, ich habe meine "AccessDB.mdb" und darin eine Abfrage
"MeineAbfrage". Nun möchte ich z.B. aus der Eingabeaufforderung
irgendwie etwas machen können, wie
"C:\MeineDatenbanken\AccessDB.mdb MeineAbfrage". Ist das möglich?
Wie kann ich das machen?

Du kannst in Deiner Verknüpfung zu Access - und der Datenbank der
Befehlzeile den Paramater /cmd xxx mitgeben.
Siehe Onlinehilfe Stichwort "Command-Funktion"

Ich habe mir das mal angeschaut, jedoch hatte ich bei meinen Versuchen
keinen Erfolg. Wie rufe ich denn nun eine Access (2003) mit Params
auf? Mein Versuch -> "C:\MeineDB.mdb" /cmd BlaBlaBla
Funktioniert aber nicht. Habe auch in der DB eine Funktion angelegt ->

Leg dir mal eine Verknüpfung auf dem Desktop an, die etwa so aussieht :

"C:\KompletterPfadZuAccess\MSACCESS.EXE" "C:\PfadZurDB\DeineDB.mdb" /cmd
BlaBlabla

Post by Karl M.
Public Sub CheckCommandLine()

If Command = "BlaBlabla" Then
MsgBox "Ich startet jetzt Irgendwas", vbOKOnly
Else
MsgBox "Kein Start"
End If

Post by Karl M.
End Sub

[Karl M.]

Hallo Jens,

Post by Jens Schilling
Hallo, Karl

Post by Karl M.
Hi Gunter,

Post by Gunter Avenius
Hallo Karl M.,

Post by Karl M.
Ist es möglich, bestimmte Abfragen in Access von ausserhalb über
Parameter zu starten?
Also, ich habe meine "AccessDB.mdb" und darin eine Abfrage
"MeineAbfrage". Nun möchte ich z.B. aus der Eingabeaufforderung
irgendwie etwas machen können, wie
"C:\MeineDatenbanken\AccessDB.mdb MeineAbfrage". Ist das möglich?
Wie kann ich das machen?

Du kannst in Deiner Verknüpfung zu Access - und der Datenbank der
Befehlzeile den Paramater /cmd xxx mitgeben.
Siehe Onlinehilfe Stichwort "Command-Funktion"

Ich habe mir das mal angeschaut, jedoch hatte ich bei meinen Versuchen
keinen Erfolg. Wie rufe ich denn nun eine Access (2003) mit Params
auf? Mein Versuch -> "C:\MeineDB.mdb" /cmd BlaBlaBla
Funktioniert aber nicht. Habe auch in der DB eine Funktion angelegt ->

"C:\KompletterPfadZuAccess\MSACCESS.EXE" "C:\PfadZurDB\DeineDB.mdb" /cmd
BlaBlabla

Post by Karl M.
Public Sub CheckCommandLine()

If Command = "BlaBlabla" Then
MsgBox "Ich startet jetzt Irgendwas", vbOKOnly
Else
MsgBox "Kein Start"
End If

Post by Karl M.
End Sub

--
Gruss
Jens

Vielen Dank für deinen Beitrag. Ich habe gleich mehreres:
- Habe versucht über die normale Windows XP-Suche "MSACCESS.EXE" zu finden.
Als Ergebnis liefert er mir irgendeine scheinbar gepackte Datei mit diesem
Namen in irgendeinem CAB-Verzeichnis. Keine Ahnung, wie mir die Suche damit
helfen soll. Wird wohl Zeit für z.B. "find2.0.exe"!
- Nun, habe daraufhin manuell gesucht und bin auf den Pfad
"C:\Programme\Microsoft Office\OFFICE11\MSACCESS.MDB" gestoßen.
- Gut, habe dann den Link erstellt: "C:\Programme\Microsoft
Office\OFFICE11\MSACCESS.EXE" "C:\MeineDB.mdb" /cmd BlaBlaBla

Leider aber - kein erfolgreiches Ergebnis. Irgendwas ist wohl noch unrund.
Ein Punkt, der mir noch nicht ganz klar ist, wenn ich Access öffne, kommt
jedes Mal ein Sicherheitsschild, welches mir die Möglichkeiten "Abbrechen",
"Öffnen" und "Weitere Informationen" anbietet. Es wird darauf hingewiesen,
dass Schadcode in der Access sein könnte. Das sagt er mir aber immer, ob mit
oder ohne VBA-Funktionen. Kann das die Blockade sein? Oder fehlt einfach
noch ein notwendiger Schritt beim Starten oder bei dem Befehlspfad?

Mit freundlichen Grüßen

[Jens Schilling]

Hallo, Karl

Post by Karl M.

Post by Jens Schilling

Post by Karl M.

Post by Gunter Avenius

Post by Karl M.
Ist es möglich, bestimmte Abfragen in Access von ausserhalb über
Parameter zu starten?

Du kannst in Deiner Verknüpfung zu Access - und der Datenbank der
Befehlzeile den Paramater /cmd xxx mitgeben.

Ich habe mir das mal angeschaut, jedoch hatte ich bei meinen
Versuchen keinen Erfolg. Wie rufe ich denn nun eine Access (2003)
mit Params auf? Mein Versuch -> "C:\MeineDB.mdb" /cmd BlaBlaBla
Funktioniert aber nicht. Habe auch in der DB eine Funktion angelegt

Leg dir mal eine Verknüpfung auf dem Desktop an, die etwa so
aussieht : "C:\KompletterPfadZuAccess\MSACCESS.EXE"
"C:\PfadZurDB\DeineDB.mdb" /cmd BlaBlabla

- Gut, habe dann den Link erstellt: "C:\Programme\Microsoft
Office\OFFICE11\MSACCESS.EXE" "C:\MeineDB.mdb" /cmd BlaBlaBla

Der Pfad zu Access entspricht dem Standardpfad, das schaut soweit also in
Ordnung aus, und den Pfad zu Deiner MDB wirst du wohl kennen ;-)

Post by Karl M.
Leider aber - kein erfolgreiches Ergebnis. Irgendwas ist wohl noch
unrund. Ein Punkt, der mir noch nicht ganz klar ist, wenn ich Access
öffne, kommt jedes Mal ein Sicherheitsschild, welches mir die
Möglichkeiten "Abbrechen", "Öffnen" und "Weitere Informationen"
anbietet. Es wird darauf hingewiesen, dass Schadcode in der Access
sein könnte. Das sagt er mir aber immer, ob mit oder ohne
VBA-Funktionen. Kann das die Blockade sein? Oder fehlt einfach noch
ein notwendiger Schritt beim Starten oder bei dem Befehlspfad?

Lies zu den Meldungen mal die FAQ 2.28 Sicherheitsmeldungen in A03 (
www.donkarl.com?FAQ2.28 )

Deine Funktion aber hast Du um meine Zeilen ergänzt ?

[Jens Schilling]

Hallo, Jens

Post by Jens Schilling
Deine Funktion aber hast Du um meine Zeilen ergänzt ?

... und wie Michel richtig anmerkt, muss irgendwie der Weg in die Funktion
gefunden werden ;-)

Ein Makro mit dem namen autoexec muss also angelegt werden, mit der Aktion
AusführenCode, und der Funktionsname gehört entsprechend ergänzt um den
Eintrag CheckCommandLine()

Gruss
Ingrid

[Karl M.]

Hallo allerseits,

habe soeben mein Ergebnis erreicht bestehend aus, Anlegen eines Makros, über
AusführenCode mit einer Funktion verbinden, welche sich in einem Modul
befinden muss, dann folgenden Pfad:
"C:\Programme\Microsoft Office\OFFICE11\MSACCESS.EXE" "C:\MeineDB.mdb" /cmd
Blablabla

Et voila, fini! In Makro angegebene Funktion wird nun gestartet und hat
einen Wert "Blablabla" in der Command-Var.

Vielen Dank euch allen.

Mit freundlichen Grüßen

[Jens Schilling]

Hallo, Karl

Post by Karl M.
Et voila, fini! In Makro angegebene Funktion wird nun gestartet und
hat einen Wert "Blablabla" in der Command-Var.

Schön, und danke für die Rückmeldung !

[Karl M.]

Hallo Jens,

Post by Jens Schilling

Post by Karl M.
Et voila, fini! In Makro angegebene Funktion wird nun gestartet und
hat einen Wert "Blablabla" in der Command-Var.

Schön, und danke für die Rückmeldung !

Das gehört doch dazu! =)

Eine Frage ist mir noch eingefallen.
Ist es möglich mehrere Parameter zu übergeben? Momentan kann ich mir ja nur
aus der Variable Command meinen einen Wert holen.

Mit freundlichen Grüßen

[Jens Schilling]

Hallo, Karl

Post by Karl M.

Post by Jens Schilling
Schön, und danke für die Rückmeldung !

Das gehört doch dazu! =)

Selbstverständlich ist es leider nicht....

Post by Karl M.
Ist es möglich mehrere Parameter zu übergeben? Momentan kann ich mir
ja nur aus der Variable Command meinen einen Wert holen.

IMO nein, aber man könnte auf die Idee kommen, als Argument einem String zu
übergeben, den man dann bei Bedarf in Einzelteile splittet und auswertet;
das hab ich zwar noch nicht gebraucht/ausprobiert, denke aber, das sollte
gehen.

[Karl M.]

Hallo Jens,

Post by Jens Schilling
IMO nein, aber man könnte auf die Idee kommen, als Argument einem String
zu übergeben, den man dann bei Bedarf in Einzelteile splittet und
auswertet; das hab ich zwar noch nicht gebraucht/ausprobiert, denke aber,
das sollte gehen.

alles klar, hatte es vermutet nicht um einen Split zu kommen.

Vielen Dank.

Mit freundlichen Grüßen

[Josef Poetzl]

Hallo!

Post by Karl M.

Post by Jens Schilling
IMO nein, aber man könnte auf die Idee kommen, als Argument einem String
zu übergeben, den man dann bei Bedarf in Einzelteile splittet und
auswertet; das hab ich zwar noch nicht gebraucht/ausprobiert, denke aber,
das sollte gehen.

alles klar, hatte es vermutet nicht um einen Split zu kommen.

Etwas kürzer könnte es ausfallen, wenn du nur Zahlen übergibst.
1 + 2 + 4 = 7

und dann mittels Bitvergleich auflöst:

lngCmd = val(Command())
if (lngCmd AND 1) = 1 then ...
if (lngCmd AND 2) = 2 then ...
...

mfg
Josef

[Karl M.]

Hallo Josef,

Post by Josef Poetzl
Etwas kürzer könnte es ausfallen, wenn du nur Zahlen übergibst.

das stimmt, allerdings würde es den gesamten Kreislauf kompliziert machen
und ich denke für meine Anwendung etwas übertreffen. Ich denke das
Einfachste dürfte sein, einen String-Split zu machen.

Trotzdem vielen Dank!

Mit freundlichen Grüßen

[Gunter Avenius]

Hallo Karl,

Post by Karl M.
Eine Frage ist mir noch eingefallen.
Ist es möglich mehrere Parameter zu übergeben? Momentan kann ich mir ja nur
aus der Variable Command meinen einen Wert holen.

Mit einer zusätzlichen Funktion die Deinen Command String trennt:

in ein Standardmodul:

wenn Dein Commandstring so aussieht:
"DefaultValue:=Test;Enabled:=0"

und Du "DefaultValue" daraus abfragen willst:
var=getTheValue(strCommandString, "DefaultValue")

Public Function getTheValue(strTag As String, strValue As String) As
String

' Sample:
' getTheValue("DefaultValue:=Test;Enabled:=0", "DefaultValue")
' Return: "Test"

On Error Resume Next

Dim workTb() As String
Dim Ele() As String
Dim myVariabs() As String
Dim i As Integer

workTb = Split(strTag, ";")

ReDim myVariabs(LBound(workTb) To UBound(workTb), 0 To 1)
For i = LBound(workTb) To UBound(workTb)
Ele = Split(workTb(i), ":=")
myVariabs(i, 0) = Ele(0)
If UBound(Ele) = 1 Then
myVariabs(i, 1) = Ele(1)
End If
Next

For i = LBound(myVariabs) To UBound(myVariabs)
If strValue = myVariabs(i, 0) Then
getTheValue = myVariabs(i, 1)
End If
Next

End Function

Gruß
Gunter

[Karl M.]

Hallo Gunter!

Post by Gunter Avenius
"DefaultValue:=Test;Enabled:=0"
var=getTheValue(strCommandString, "DefaultValue")
Public Function getTheValue(strTag As String, strValue As String) As
String
...
End Function

Ich hatte vermutet nicht um den Split zu kommen. Deine Funktion
getTheValue(String strTag, String strValue) ist meine Lösung.

Vielen Dank!

Mit freundlichen Grüßen

[Gunter Avenius]

Hallo Karl,

Karl M. schrieb folgendes:
...

Post by Karl M.
Leider aber - kein erfolgreiches Ergebnis. Irgendwas ist wohl noch
unrund. Ein Punkt, der mir noch nicht ganz klar ist, wenn ich
Access öffne, kommt jedes Mal ein Sicherheitsschild, welches mir
die Möglichkeiten "Abbrechen", "Öffnen" und "Weitere Informationen"
anbietet. Es wird darauf hingewiesen, dass Schadcode in der Access
sein könnte. Das sagt er mir aber immer, ob mit oder ohne
VBA-Funktionen. Kann das die Blockade sein? Oder fehlt einfach noch
ein notwendiger Schritt beim Starten oder bei dem Befehlspfad?

www.donkarl.com?FAQ2.28

Gruß
Gunter

[Gunter Avenius]

Hallo Karl M.,

Post by Karl M.

Post by Gunter Avenius

Post by Karl M.
Ist es möglich, bestimmte Abfragen in Access von ausserhalb über
Parameter zu starten?
Also, ich habe meine "AccessDB.mdb" und darin eine Abfrage
"MeineAbfrage". Nun möchte ich z.B. aus der Eingabeaufforderung
irgendwie etwas machen können, wie
"C:\MeineDatenbanken\AccessDB.mdb MeineAbfrage". Ist das möglich?
Wie kann ich das machen?

Du kannst in Deiner Verknüpfung zu Access - und der Datenbank der
Befehlzeile den Paramater /cmd xxx mitgeben.
Siehe Onlinehilfe Stichwort "Command-Funktion"

Ich habe mir das mal angeschaut, jedoch hatte ich bei meinen Versuchen
keinen Erfolg. Wie rufe ich denn nun eine Access (2003) mit Params auf?
Mein Versuch -> "C:\MeineDB.mdb" /cmd BlaBlaBla
Funktioniert aber nicht. Habe auch in der DB eine Funktion angelegt ->

Du musst den Pfad zu msaccess.exe auch mit aufnehmen in Deine
Verknüpfung.

Gruß
Gunter

[Michel Fouquet]

Hallo,

Post by Karl M.
Habe auch in der DB eine Funktion angelegt ->
Public Sub CheckCommandLine()
....
End Sub
Doch auch in diese Wandert er nicht mit oder ohne Parameterübergabe.

naja, *automatisch* wandert "er" nicht in diese Funktion.

Das würde nur passieren, wenn du die Funktion entweder über das
AutoExec-Makro (AusführenCode) oder über ein entsprechendes
Startformular (Extras/Start/Formular anzeigen) ansprichst.

Gruß,
Michel

[Jens Schilling]

Hallo, Michel

Post by Michel Fouquet
naja, *automatisch* wandert "er" nicht in diese Funktion.

Sehr aufmerksam !
Ich hab' Ingrid mal gebeten, die Variante mit dem autoexec zu erläutern ;-)

Tschüs
Jens

[Michel Fouquet]

Jooo, Jens,

Post by Jens Schilling

Post by Michel Fouquet
naja, *automatisch* wandert "er" nicht in diese Funktion.

Sehr aufmerksam !
Ich hab' Ingrid mal gebeten, die Variante mit dem autoexec zu erläutern ;-)

Ingrid ist eine Nette! Und sie hat ja - aufmerksam wie sie ist - auch
schon einige Male hinter *mir* hergeräumt. :-)

Mir selber schien der Hinweis mit den zwei Informationselementen
"AutoExce-Makro" und (Aktion) "AusführenCode" für eigenes Nachforschen
und Weiterkommen zunächst völlig ausreichend.

Der Vollständigkeit halber hätte Ingrid dann aber doch gleich auch noch
erklären sollen, wie man denn bei Benutzung eines Startformulars den vom
OP aufgeführten Code einbaut, damit er automatisch ausgeführt wird.
Oder? ;-)

Naja, man kann halt nicht alles haben - nicht einmal den Hinweis auf das
Newbie-Info wg. der Verwendung des Realnamens.

Gruß,
Mi "ich bin dann mal weg zum Einkaufen" chel

[Jens Schilling]

Hallo, Michel

Post by Michel Fouquet
Der Vollständigkeit halber hätte Ingrid dann aber doch gleich auch
noch erklären sollen, wie man denn bei Benutzung eines Startformulars
den vom OP aufgeführten Code einbaut, damit er automatisch ausgeführt
wird. Oder? ;-)

In diesem Fall hielt sie wohl ein (Start-)Formular für überflüssig, da der
Wunsch lautete:
"bestimmte Abfragen in Access von ausserhalb über Parameter zu starten..."

Aber klar - auch die Variante hätte Erwähnung finden können.

Tschüs
Jens

[Sascha Trowitzsch]

Hi Karl,

Post by Karl M.
Hallo NG!
Ist es möglich, bestimmte Abfragen in Access von ausserhalb über Parameter zu
starten?
Also, ich habe meine "AccessDB.mdb" und darin eine Abfrage "MeineAbfrage". Nun
möchte ich z.B. aus der Eingabeaufforderung irgendwie etwas machen können, wie
"C:\MeineDatenbanken\AccessDB.mdb MeineAbfrage". Ist das möglich? Wie kann ich
das machen?
Es würde mich auch interessieren auf VBA-Code innerhalb der AccessDB.mdb
zuzugreifen. Dort habe ich z.B. eine Methode, welche auf gewisse Weise eine
Abfrage startet. Ist es mir möglich auf gerade diese Methode (public)
zuzugreifen?

Der Vorschlag von Gunter ist sicherlich am Günstigsten.
Hier aber noch ein Hinweis auf Befehlszeilenoptionen von Access:
http://ms-office-forum.net/forum/showthread.php?t=109612
Wg. Abfragen siehe dort die Erläuterungen zu SHELLSYSTEM.

Ciao, Sascha