Office: (Office 2003) Tabellenverküpfungsformular zum Testen

Hallo HC, das liest man gerne.

Zum Fehler: irgendwo oben schrieb ich schon mal, dass die Fehlerbehandlung für´n Eimer bzw. nicht existent ist. Da müsste noch einiges getan werden. Aber erst wenn ich etwas mehr Zeit habe oder sich jemand anderes Vergnügen will. *wink.gif*

Ich setzte das während der Entwicklung zum Switchen zw. Produktiv-/und Test-BE sowie als verborgenes Admin-Form (für my eyes only) in produktiven Anwendungen ein. Daher sah ich bisher keine Notwendigkeit da weiter dran zu schrauben ... (Frank hat auch eine bewundernswerte Geduld *wink.gif*)

Kennste das Kalenderpopup denn? *wink.gif*

 

Hallo Marsu,

kannst Du die Demo auf Acc2000 runterbrechen?
Ich stehe vor der Aufgabe, dass nun eines von zwei BE´s wahlweise lokal vorhanden ist oder auf einem Server liegt und ich diese Fälle auch in der Installationsroutine für Updates berücksichtigen muss. Da wäre eine gescheite Vorlage sehr hilfreich, und momentan kann ich nur Acc2000.
Vielen Dank für die Mühe.

 

Hallo Eberhard,
da Marsu nicht online ist, habe ich dir die DB mal runterkonvertiert. Ich hoffe, er hat nichts dagegen.
maike

 

Latürnich nicht.
Danke Maike.

 

Vielen Dank, Ihr beide.
Das hilft mir erst einmal weiter. Vor allem erhalte ich auch gedankliche Anstöße, wie ich bei meinen Aufgaben weiterkomme.

Eines habe ich schon bemerkt: Ich habe in einem Backend zu viele Tabellen, um sie in der Werteliste der verknüpften Tabellen aufnehmen zu können (Acc2000 gestattet nur eine Stringlänge von 2.048 Zeichen statt 32.767 in den Folgeversionen). Das ist aber kein ernsthaftes Problem.

 

\@Eberhard: du könntest statt der Wertliste eine Abfrage verwenden und damit MsysObjects vom ausgewählten Access-BE auswerten.
Code:

mfg
Josef

 

Ja danke. Bei diesem Listenfeld geht es aber um verknüpfte Tabellen, nicht um im BE enthaltene Tabellen. Für letztere gibt es im Beispiel ein separates Listenfeld.
Da ich beim Verknüpfen die Tabellen nicht umbenenne, müssen auch nicht Name und ForeignName nebeneinander und damit quasi doppelt im Listenfeld erscheinen. Die Maßnahme reichte schon, um nahe am Beispiel zu bleiben.

Eine Abfrage als Datenherkunft ist aber generell eine Alternative zu einer per VBA zusammenzustellenden Werteliste, sogar eine sehr gute.

 

ForeignName kannst du auch aus MsysObjects herausholen.

Ein Beispiel, dass ich im DBMS-Connection-Wizard verwende:
Code:

mfg
Josef

 

Wirklich ein super Iddee/Tool und es wäre genau meine Lösung.
Ich versuche es mit Access 2010 zu verwenden - das Formular wird mit einem Laufzeitfehler 52:
"Dateiname oder -nummer falsch geöffnet".
Der Debugger zeigt dann Zeile:
DBFeld(2, UBound(DBFeld, 2)) = IIf(Dir(sFullPath) "", "OK", "X")

Drücke ich den Refresh Button kommt die Meldung:
"cmdRefresh: 94:Unzulässige Verwendung von Null"
und danch schliesst sich das Formular.

Nun meine Frage:
Gibt es da eine einfache Ursache für (ich bin im VBA code nicht erfahren) oder muss der Code für Access 2010 grundsätzlcih umgeschrieben werden?

Danke & Grüße
Jürgen

 

Hallo,

kannst du den Code fehlerfrei kompilieren, sind alle Verweise OK?
Besitzt die DB eingebundene Access-Tabellen, ist der Zugriffspfad gültig?

Was das Refresh betrifft, so musst du zuerst eine DB im linken Listenfeld auswählen.

VBA-Code kennenlernen kann man gut, indem man ihn schrittweise austestet. Dazu setzt du einen Haltepunkt ehe du ihn aufrufst. Oder du gehst mit Strg+Untbr in den Unterbrechungsmodus, sobald ein Fehler aufpoppt.
Du kannst auch die Stopp-Anweisung nutzen, um an bestimmten Code-Stellen in den Unterbrechungsmodus zu gelangen.

 

Hallo liebe Forengemeinde,

auch ich habe eine ähnliche Aufgabenstellung wie sie hier gelöst ist. Allerdings sind meine Backends keine .mdb sondern reine .txt-Dateien.

Mit den .mdb funktioniert das auch tadellos, aber ich kann leider keine .txt einbinden. Kann mir jemand verraten wie ich diese .txt einbinden kann (Acc2K).

Vielen Dank im voraus.

Peter

PS.: 1000 Dank an Marsu65 für das geniale Formular... warum habe ich das nicht schon früher gewusst? ;-)

 

Hallo Peter,
so kann der Pfad zu einer verknüpften txt-Datei geändert werden (der Code stellt das Prinzip dar, daher keine Übergabe des Pfades an die Funktion):
Code:

Ich habe das irgend wann mit viel probieren herausgefunden, da ich dazu (txt Verknüpfung aktualisieren) keinerlei Hinweise gefunden habe.

Es grüßt Jens *Smilie

 

Hallo,
ich habe das selbe Problem wie Jürgen, "unzulässige Verwendung von Null" Das Formular bleibt offen und es funktioniert das Neusetzen des Links zum BE. Wie kann man den Fehler abfangen? Bin auch nicht so bewandert mit VBA.

Gruß Tom

 

Hallo ich finde die Datei super, aber leider Funktioniert sie nicht bei mir.
Ich gebe die Datei an wo ich die Verknüpfung erneuern möchte und er bringt mit dann eine Fehlermeldun (siehe Bild).

Vielleicht könnt ihr mir ja helfen was ich falsch mache.

mfg lars

 

Kannst du die Tabelle manuell verknüpfen?