Office: (Office 2016) Nach PDF oder Doc suche einschräknen

Hallo Karl-Heinz,

nachdem Ohrkester sich so für die eingesetzt hat und leider verhindert ist, habe ich mal eine kleines Demoprogramm erstellt.
Du kannst das dann ja entsprechend deinen Wünschen mit eigenen Formularen usw. ausbauen und anpassen.
VG Ulrich

 

Das war doch nur ein Spaß.
Sind wir jetzt endgültig im Programmierer-Kindergarten angekommen? *grins *grins
Es ist doch geradezu lächerlich, wie man hier versucht dem Thread Owner jegliche eigene Anstrengung abzunehmen.
Wie soll der so jemals eigenständig eine Zeile Code hervorbringen.

 

\@markusxy:
Ich gebe dir vollkommen Recht; war auch ursprünglich mein Ansinnen.
Möglicherweise fehlt Karl-Heinz aber auch einfach ein bißchen die Zeit.

Das Thema scheint immer mal wieder aufzukommen und deshalb habe ich das mal aufgegriffen und ein kleines Grundgerüst dafür "gebastelt", was dann jeden nach seinen Wünschen anpassen kann.

Als kleine "Besonderheit" habe ich die Prüfung, ob ein Eintrag schon in der Tabelle vorhanden ist, mal mit einer Parameter-Abfrage umgesetzt, anstatt mit DCount, DLookup usw. - nur damit man mal sieht, was man mit Parameter-Abfragen noch so alles machen kann. *Smilie

VG Ulrich

 

Servus knobbi38,
Understatement scheint Deine Stärke zu sein.
Bei mir steigt lange schon die Anerkennung Deiner Kompetenzen,
welche Du in stets freundlicher Atmosphäre bei Deinen Tipps verbreitest.

 

\@Ohrkester,

oh, danke für die Blumen. *Smilie

Grüße Ulrich

 

Knobbi38,
ich verstehe nicht die Verwirrung in den Bezeichnungen Deiner Tabellenfelder
und Abfragen. Wozu braucht es unbedingt einer solchen Verwirrung;
Wozu muss man ein Tabellenfeld im Entwurf umbenennen und alle damit irre zu führen?

 

\@evar46:
Tut mir leid, aber ich kann dir nicht ganz folgen, was du meinst.

Ulrich

Edit:
meinst du vielleicht das Eintragen der dt. Bezeichnungen bei der Tabelle und der Abfrage?
I.d.R. verwende ich englische Bezeichnungen, weil VBA und Access englisch sprechen. Wird jetzt ein Formular auf Basis dieser Tabelle erstellt oder so ein Feld in einen Formularentwurf hereingezogen, werden auf diesem Wege gleich die richtigen Bezeichnungen für die Bezeichnungsfelder angezeigt.
Gilt auch für Reports. So wird gewährleistet, daß die Bezeichnungen in einer Anwendung möglichst gleich sind. Bei Fehlermeldungen greife ich gelegentlich auch auf dieses "Property (Description)" zurück.

Gruß Ulrich

 

EDIT: Du hast es erkannt, was ich meine.
Mein folgender Text bleibt trotzdem und das Danke auch.

Knobbi38,
ich verstehe nicht die Verwirrung in den Bezeichnungen Deiner Tabellenfelder
und Abfragen. Wozu braucht es unbedingt einer solchen Verwirrung;
Wozu muss man ein Tabellenfeld im Entwurf umbenennen und alle damit irre zu führen?
Möglicherweise bin ich aber bei Dir nun auch Teil der Kindergartenprogrammierer, die hier im Forum laut markusxy nix zu suchen haben.

Dann frag ich auch dich, Ohrkester, wo der Sinn solcher Verwirrungen ist.
Das ist doch fast so, wie die Nutzung der berüchtigten Nachschlagefelder in den Tabellen.

Knobbi38: Deine Beispiel Datenbank ist ansonsten aber das Beste, was ich bisher bekommen habe, ausser der Feldnamenverwirrungen.
Ich übe mich seit Jahren mit dem Einlesen von Dateien in eine Access Tabelle und hab mir fast alles selbst ohne Vorbildung erarbeitet.
Irgendwo hat es immer gehakt und es gab keine mich befriedigende Lösung, welche ich auch nachvollziehen hab können.
Dann kommt eine so gnadenlos einfache Lösung und man schämt sich für seinen jahrelangen Selbstaufwand, der trotzdem das nie erreicht hatte.

Das wollte ich mal loswerden und Danke sagen, dass Du trotzdem ab und zu auch mal uns Anfängern mit ein paar Bonbons hilfst,
anstatt Dich aufzuplustern und die Anfänger und Amateure damit aus dem Forum zu treiben.

 

\@evar46:
Sorry, meine Antwort hat sich wohl gerade mit deiner überschnitten.

Ich freue mich, wenn es dir gefällt. *Smilie

Das "Aufpustern" versuche ich, soweit es geht zu vermeiden, aber manchmal sind in den Foren Leute unterwegs, die nur kostenlos etwas geschrieben haben möchten und ansonsten gar nichts zur Community beitragen möchten, was mich schon ärgert.

Im Gegenzug nehme ich auch gerne mal ein interessantes Thema auf und versuche ein bißchen etwas von dem weiterzugeben, was ich auch mal als Anfänger vermißt habe, z.B. Erkenntnisse aus der Praxis, welche nicht in Tutorials oder Büchern zu finden sind.

Grüße Ulrich

 

\@evar46:
Kritik angekommen - du hast Recht, es könnte verwirren, wenn man das "Feature" nicht kennt. Vielleicht sollte ich das bei Demos so nicht mehr machen.

Grüße Ulrich

 

danke Knobbi38,
ich bin ja nicht sehr oft in diesen Foren, aber nun wieder etwas entspannter.

 

Hier nochmal die aktuellste Version mit kleineren Änderungen

Ulrich

 

\@Knobbi38:
da fällt mir noch was ein. Ich möchte auch zusätzliche Infos aus z.B. Audiofiles speichern und hab das wie unten gemacht.
Lässt sich das auch verbessern bzw. verschnellern?
EDIT: Ooops. Der Backslash lässt sich nicht schreiben...komisch. Ich hab stattdessen mal das "ß" eingetren

Code:

Code:

 

Hallo evar46,

die Stelle ist schon mal richtig.

1) Ich habe jetzt nicht die Funktions-Parameter von GetDetailsOf() nicht direkt parat, aber die einzelnen Informationen, wie Folder und Filename stehen direkt zur Verfügung und müssen eigentlich nicht mit Stringfunktionen extrahiert werden.

2) Das Problem mit der Funktion DateiMetaTagInfo() ist, das jedesmal ein Shellobjekt erzeugt wird. Das würde ich anders lösen:
- in DoProcessFileInfos ein Shell32 Objekt einmal erzeugen und dann an die Funktion übergeben
- oder einmal das Shell32-Objekt in DateiMetaTagInfo() bei Bedarf erzeugen und dann in einer statische Variabeln zwischenspeichern
- oder man könnte das Objekt auch modulglobal verwalten.
wobei ich die erste Variante bevorzugen würde.

3) Übergebe nicht den Dateinamen (strData) an DateiMetaTagInfo(), der muß immer neu allokiert werden, sondern direkt das File-Objekt "objFiles(i)" als Referenz. In DateiMetaTagInfo() holst du dir dann daraus die Information, die benötigt werden.

Gruß Ulrich

PS:
Bitte nicht den gleichen Dateinamen verwenden und den Versionszähler erhöhen, denn das ist eine neue, eigenständige Demo und eine Ableitung von der ursprünglichen DB. Sonst Blickt da nachher keiner mehr durch.

 

Hallo evar46,

im Anhang ein Beispiel, wie ich das gemeint habe.

Gruß Ulrich

PS: für den Backslash (\) geht auch \