Office: (Office 2003) Objekt per Button in Datenbank & Formular einfügen

Guten Morgen!
Okay, es sieht immer noch so aus wie gestern. Weiß nicht, was im Code falsch ist. Alles so, wie es oben steht. *frown.gif*

 

Hast Du meinen Beitrag von 14:45 gelesen?

 

Ja, habe ich gelesen, und auch so gemacht :-) Leider zeit er irgendwie immer noch einen Fehler an. Aber trotzdem kann ich die Datei im Textfeld sehen -.-

 

Dein Textfeld heißt nicht zufällig auch "Dateiname" oder? Was passiert denn, wenn Du das Textfeld in "txt_dateiname" umbenennst?

 

Textfeld hieß vorher anders und jetzt habe ich es mal txt_Dateiname genannt, da tut sich aber auch nichts. -.- Ich muss doch noch etwas programmieren, damit die Datei aufgerufen werden kann oder?

 

Na beim Aufrufen sind wir doch noch gar nicht. Es geht doch gerade primär darum, keine Fehlermeldung beim Tabelleninhalt zu bekommen?!

 

Ja *Smilie
Okay, das wollte ich nur wissen.
Ähm. Ja das mit der Fehlermeldung will nicht weggehen. Habe alles so gemacht wie wir es besprochen haben...

 

Es ist ja auch keine Fehlermeldung wenn ich das Formular anzeige, dann zeigt er auch ohne Mucks den Dateinamen an. Aber in der Entwurfsansicht ist eben ein kleines grünes Dreieck in der linken oberen Ecke und da steht das was ich dir im Bild geschickt habe *frown.gif*

 

OKay, die Fehlermeldung ist weg. Ich hatte wohl das Textfeld Dateiname genannt. Habe in den falschen Eigenschaften geschaut *rolleyes.gif*

 

So, hallo! Hatte heute ungeplante Probleme (gut, geplante Probleme wären ja auch doof)..
Für Dein Beispiel müssen wir jetzt noch Saschas "RestoreBinFile" auf Deine Bedürfnisse anpassen. Heute habe ich dafür jedoch keinen Nerv mehr. Ich werd mir morgen aber Zeit dafür nehmen, damit wir das zu nem vernünftigen Abschluss bringen.

 

Guten Morgen.

Heute brauchst du eine weitere Schaltfläche zum Öffnen der Datei. Ich nenne ihn mal "btn_datei_oeffnen".

Dort brauchen wir folgenden Code
Code:

Dazu fehlt uns natürlich noch die angepasste Funktion aus dem Beispiel
Code:

Anmerkung zu sPath: Ich habe hier den Tempordner gesetzt, da dieser windowsseitig festgelegt ist. Solltest Du hier einen anderen Zielordner wünschen, dann musst Du das da festlegen. Bedenke jedoch, dass dann andere Schwierigkeiten auf Dich zukommen können (Ordner nicht vorhanden, Schreibberechtigungen etc.) die Du dann gesondert abfangen bzw. behandeln musst.

Anmerkung zu ShellExecute: Um diese Funktion nutzen zu können, musst Du am Anfang des Quelltextes(direkt nach Option Explicit) noch folgende Api-Deklaration einfügen.

Code:

 

Hey! Ich hoffe du hattest erholsame Feiertage und einen guten Rutsch *Smilie
Frohes neues Jahr erstmal!

Also...wenn ich die Api - Deklaration einfüge, dann funktionieren plötzlich alle anderen Schaltflächen (wie Anhang einfügen) nicht mehr.
Aber auch die Schaltfläche "Datei öffnen" funktioniert nicht. Er zeigt immer bei dem Punkt

Bei

an, dass ein fehler beim Komplimieren vorhanden ist und sagt "Sub oder Function nicht definiert."

:-(

 

Hm, dass kann ich momentan nicht nachvollziehen. Dein Textfeld heißt doch "txt_dateiname" oder?

 

Ja genau, habe auch extra nochmal nachgeschaut, es heißt wirklich so! Was ich eben auch nicht verstehe, dass plötzlich die anderen Funktionsbuttons (wie Datei einfügen usw.) NICHT mehr funktionieren.

 

Geh ma im VBA-Editor ins Menü "Debuggen" und dann auf "Kompilieren von..." welche Stellen meckert er den alle an?