Office: (Office 2016) Ersetzen Laufwerkbuchstabe alle Tabellen

Guten Morgen aus dem Home Office in Ravensburg *Smilie

Ich möchte per VBA oder/und mit Aktualisierungsabfragen folgendes lösen:

System: 1 Frontend, 2-3 Backenddatenbanken mit eingebundenen Tabellen (ca. 50)

Ich muss die Backenddatenbanken auf zwei unterschiedlichen Laufwerken testen (ist halt so)

In den eingebundenen Tabellen sind Links zu irgendwelchen Dateien, deren Verweis immer mit dem Laufwerksbuchstaben p:Ordner1 beginnen.
Diese Backenddatenbanken werden unregelmässig auf ein anderes System kopiert, in welchem den die verknüpften Dateien mit einer anderen Ordnerstruktur liegen, und zwar: w:Ordner1

Der Rest im Pfad ist auf beiden Systemen der selbe.

Wie würdet ihr das machen? Vielen Dank schon einmal im voraus.

Peter

:)

 

Hallo Peter,

möchtest du einen Backendfinder...?
Bei Arbtersound.de gibt es so einen Code.
Ich verwende ihn schon sehr lange und er funktioniert bestens!
Bei dem Link hast sofort die Zipdatei...
http://www.arbtersound.de/sonderseit...nAutomatik.zip
Bei dem Link kommst auf die Seite...
http://www.arbtersound.de/sonderseit...ielauswahl.htm
Auf dieser Seite gibt es viele verschiedene Programmbeispiele.

 

Hallo Kyron,
danke für die Antwort. Nein, ich brauche keinen Backendfinder.

Ich möchte in meinen Backenddatenbanken in allen Tabellen einen Laufwerksbuchstaben in einem Link durch einen anderen ersetzen, zum Beispiel mit der Replace Funktion, aber halt auf einen Rutsch in allen Tabellen der Datenbank

 

Replace kann man auch in einer Aktualisierungsabfrage einsetzen, eine Aktualisierungsabfrage würdest Du pro Tabelle benötigen, über alle Tabellen würde man eine VBA-Schleife entsprechend der benötigten Auflistung einsetzen.
Was genau wäre da für Dich problematisch?

Angemerkt:
- Pfade zu externen Dateien in allen Tabellen - das stimmt mich äußerst nachdenklich. Dich nicht?
- So ein Wechseltheater kann man sehr stark einschränken, wenn man in den Tabellen nur die festen Pfade des Dateisystems speichert und Laufwerk zzgl. evtl. vorhandenen Oberordner extra in eine Tabelle ablegt und beides bei Bedarf einfach zusammensetzt. Bei einem Rechnerwechsel "weiß" man dann Laufwerk + Oberordner oder man bietet ersatzweise einen Verzeichnisauswahldialog an, um diesen ermitteln zu lassen.

 

Hallo Eberhard,
das Wechseltheater ist leider im Moment (Corona) nicht zu vermeiden, manche Leute sind im Büro, manche nicht, also gibt es (leider) unterschiedliche Pfade.

Die Idee mit der Tabelle, in welcher nur die Buchstaben gespeichert sind, finde ich genial, jedoch müsste ich die komplette Anwendung umschreiben, und das wäre ziemlich krass (leider ist die Oberfläche schon weitestgehend fertig)


Replace habe ich einer Aktualisierungsabfrage schon am Laufen:
Code:

Ich möchte ungern für alle Tabellen eine eigene Abfrage erstellen und speichern, mein Thema wäre die Schleife über alle Tabellen.

Die Felder in den Tabellen, wo die Pfade stehen, sind natürlich alle unterschiedlich, aber wer wusste im letzten Jahr schon, was jett im März passiert.
Gruß
Peter

 

...kurze Frage, ist er Name des Feldes vom Laufwerkes in jeder Tabelle gleich?

 

Hallo Alfred, leider nein, in den unterschiedlichen Tabellen haben die Felder, in denen der Pfad gespeichert ist, natürlich unterschiedliche Namen, zum Teil gibt es in den Tabellen pro Datensatz auch mehrere Felder, in welchen Pfade gespeichert sind.

 

...das ist weniger gut *Smilie
Sonst wäre der Code eine Möglichkeit...
Ev. kannst ihn aber anpassen...
Code:

Die Tabellennamen werden ja abgefragt, dass musst ev. nur an diese Namen alles anpassen.

PS: meine, diese Möglichkeit ist besser als wenn du 50 Abfragen erstellen musst.
Das ist nicht schwer zu erstellen, funktioniert 100%

In der Art...
Code:

 

Hallo Alfred,
das schaut schon mal ganz gut aus.
Ich werde jetzt erst mal analysieren, wie viele unterschiedliche Feldnamen es in den Tabellen gibt, und dann eventuell deinen Code anpassen und dann die Feldnamen als Parameter übergeben.
Dann läuft der Code zwar mehrere Male, was mir nicht gefällt ...
Danke erstmal
Peter

 

...nö, der darf nur 1x laufen!
machst eben wie ich es gezeigt habe...!
Wie oben...

Musst eben 50 x diesen Code einfügen,
mit den richtigen Tabellennamen
und den richtigen Feldnamen bzw. mehrer Felder

Das ist in einem Rutsch dann durch! Dauert nicht mal einen Augenblick *Smilie

Falls in verschiedenen Tabellen die gleichen Feldnamen sind, kannst mit Oder/Or arbeiten

Das benötigst dann nicht...
Code:

Das benötigst auch nicht...

 

//OT:

Bei einer Anwendung, die man über mehrere Jahre nutzen will, sollte man auch einen Rechnerumzug auf dem Plan haben. Also offenbart sich an der Stelle ein Konstruktionsfehler.

Für eine Schleife nützt das Wissen, dass man nichts weiß, nichts. Man sollte besser zusammenstellen (Tabelle), welche Felder in welchen Tabellenzu berücksichtigen wären. Dann kann man in einer einzelnen Aktualisierungsabfrage in Schleife Tabellennamen und Feldnamen per Variablen tauschen.

Dein eigenes Werk?

Die beschriebene Analyse könnte man durchaus schon nutzen, das "Umschreiben" vorzubereiten oder schon zu beginnen. Wie angedeutet: Irgendwann ereilt Dich das Problem wieder.

Solch eine Aussage sollte einen mit tiefer Traurigkeit erfüllen, besser aber zu Widerspruch reizen.

 

noch mal der Code...
Code:

Der Code kann höchstens zu lange werden...
Das wird ja nur für einen kurzen Zeitraum benötigt, dann lauft ja alles wieder wie gewohnt.
Und das nur einmal pro Mitarbeiter der zu Hause arbeitet.
Den Code kannst anschließend wieder aus der DB entfernen.

Wer möchte schon hoffen, dass so ein Virus sich nochmal einschleicht!

Man kann aber eine Tabelle erstellen, mit den Tabellennamen und den dazugehörigen Felder..
Es gibt ja teilweise mehrere solche Felder in einer Tabelle, was auch nicht so toll ist.

Außerdem ist es nur mal eine Idee, an der man noch feilen kann...oder nicht *Smilie !

PS: nö, traurig werde ich wegen dem nicht, da gibt es iM viel Anderes die mich mit Traurigkeit erfüllen!!!

 

...so, also besser jetzt...
Tabelle erstellen Name = TabellenNamen
2 Felder erstellen Namen sind TabellenName, FeldName
Alle Tabellen und die dazugehörigen Felder eintragen...
Code:

Nicht gleich motzen Eberhard, man braucht auch Zeit zum überlegen *biggrin.gif* - ich zumindest schon!

 

Hallo zusammen,
ich kann allen Aussagen von euch zustimmen. Da es sich um eine Interimslösung handelt, gibt es natürlich auch wenig Budget, und weiterhin sind wir in der Lebensmittelproduktion unterwegs und mussten viele Änderungen und pragmatische Maßnahmen durchführen.
Gerne hätte ich auch einen Rechnerumzug berücksichtigt und vieles mehr, leider ist es jetzt so wie es ist, wir haben Corona, manche Anwender arbeiten zu Hause und sehen andere Buchstaben als diejenigen, die in der Firma sind.
Und mich trifft es natürlich auch.

Also ich muss, ungeachtet dessen, ob das gut ist oder nicht (Datenbank Design, Konstruktionsfehler, absolute Pfade etc.) einen mehr oder weniger guten Workaround bauen, damit gearbeitet werden kann, und auch die Produktion von Lebensmitteln (bei uns) in den nächsten Monaten weiter läuft.

Ich bin generell sehr kritikfähig und nicht beratungsresistent und entwickle mich auch weiter (meine erste Datenbankentwicklung war mit Access 1.0).

Also zuammengefasst:
Heute ist Sonntag, ich werde mit bis morgen eure Vorschläge durchdenken, mein Design überprüfen und dann eine pragmatische Lösung erstellen, und wenn ich 50 mal Code habe, dann wird es so sein.
Parallel überdenke ich das komplette Design und werde mich in Zukunft anstrengen, alle EVENTUALITÄTEN besser zu berücksichtigen.

In diesem Sinne wünsche ich allen hier noch einen schönen Sonntag, melde mich sobald ich weiter bin ...

Peter


*knuddel

 

... verwende eine Tabelle, dann brauchst nur diesen letzten Code verwenden!
Der ist viel besser!!!
Außerdem ist er einfach nachzurüsten, falls Tabellen mit Link dazukommen!
Na ja, ich muss mich immer herantasten auf eine Lösung, geht nicht so ruck zuck bei mir *biggrin.gif*

PS: auch schönen Sonntag!