Wie Sie die Textdatei in Microsoft Access-Tabelle mit DDE

SPRACHE AUSWÄHLEN SPRACHE AUSWÄHLEN
Artikel-ID: 113905 - Produkte anzeigen, auf die sich dieser Artikel bezieht
Alles erweitern | Alles schließen

Auf dieser Seite

Zusammenfassung

Dieser Artikel veranschaulicht zum Implementieren des integrierten Befehls TransferText von Microsoft Access zum Datenimport aus einer Textdatei in eine Microsoft Access-Tabelle unter Verwendung von DDE. Diese Methode ist schneller als die alternative Methode in der folgenden Artikel der Microsoft Knowledge Base beschriebenen:
103807: Gewusst wie: Konvertieren eine Textdatei in eine neue Access-Datenbank

Weitere Informationen

Der TransferText-Befehl wird in Access Basic verwendet, um Daten aus einer Textdatei in eine Tabelle zu importieren. Wenn die angegebene Tabelle vorhanden ist, erstellt der TransferText-Befehl in der Tabelle. Wenn die Tabelle vorhanden ist, muss die Textdatei Format der vorhandenen Tabelle entsprechen.

Die Textdatei kann durch Komma getrennte mit Zeichenfolgen in Anführungszeichen eingeschlossen oder feste Breite möglich. Die Trennzeichen und fester Breiteneinstellungen können in Microsoft Access eingerichtet werden indem Sie die Datei-Menü Imp-Ausgaben-Setup auswählen. Weitere Informationen zu diesen Einstellungen finden Sie in das Microsoft Access-Hilfemenü.

Vorgehensweise: Beispiel

  1. Erstellen Sie mit dem Editor die folgende Datei importieren und als C:\ACCESS\SHIPPERS.TXT zu speichern:

    4, "Welt Traveller"
    5, "Frazier Frachtkosten"
    6, "Longfellow hauling"
    7, "Toolsmith Lieferung"
  2. Starten Sie Microsoft Access und öffnen Sie die C:\ACCESS\NWIND.MDB-Datenbank.
  3. Starten Sie ein neues Projekt in Visual Basic (ALT, F, N). Form1 wird standardmäßig erstellt.
  4. Setzen Sie ein Textfeld (Text1) und eine Befehlsschaltfläche (Command1) auf das Formular.
  5. Fügen Sie den folgenden Code hinzu das Click-Ereignis von Command1:
       Sub Command1_Click ()
          Dim cmd As String      ' Holds DDEExecute command.
          On Error GoTo DDEerr   ' Error trap.
    
          ' Make sure there isn't an existing DDE conversation:
          text1.LinkMode = 0
    
          ' Set up the DDE link:
          text1.LinkTopic = "MSACCESS|C:\ACCESS\NWIND.MDB"
          text1.LinkItem = "All"
          text1.LinkMode = 2
    
          ' DDEExecute command to import text file into Microsoft Access Table:
          cmd = "[TransferText ,,'Shippers','C:\ACCESS\SHIPPERS.TXT']"
    
          ' Execute the TransferText command and close the DDE link:
          text1.LinkExecute cmd
          text1.LinkMode = 0
          MsgBox "Transfer OK"
          Exit Sub
    
       DDEerr:
          ' An error has occurred.
          MsgBox Error
          MsgBox "Error in transfer."
          Exit Sub
       End Sub
    
    						
  6. Führen Sie die Visual Basic aus, und klicken Sie auf die Befehlsschaltfläche, um die Informationen in der Textdatei importieren, in der Tabelle Versandfirmen. Ein Meldungsfeld wird angezeigt, ob die Übertragung erfolgreich war angezeigt.
Weitere Informationen zum Implementieren von DDE mit Microsoft Access finden Sie in der folgenden Artikel in der Microsoft Knowledge Base:
96845: Verwendung von DDE auf ///Display Microsoft Access-Daten in VB

Eigenschaften

Artikel-ID: 113905 - Geändert am: Mittwoch, 8. Januar 2003 - Version: 1.1
Die Informationen in diesem Artikel beziehen sich auf:
  • Microsoft Visual Basic 4.0 Professional Edition
  • Microsoft Visual Basic 4.0 16-Bit Enterprise Edition
  • Microsoft Visual Basic 3.0 Professional Edition
  • Microsoft Visual Basic 3.0 Professional Edition
Keywords: 
kbmt KB113905 KbMtde
Maschinell übersetzter Artikel
Wichtig: Dieser Artikel wurde maschinell und nicht von einem Menschen übersetzt. Die Microsoft Knowledge Base ist sehr umfangreich und ihre Inhalte werden ständig ergänzt beziehungsweise überarbeitet. Um Ihnen dennoch alle Inhalte auf Deutsch anbieten zu können, werden viele Artikel nicht von Menschen, sondern von Übersetzungsprogrammen übersetzt, die kontinuierlich optimiert werden. Doch noch sind maschinell übersetzte Texte in der Regel nicht perfekt, insbesondere hinsichtlich Grammatik und des Einsatzes von Fremdwörtern sowie Fachbegriffen. Microsoft übernimmt keine Gewähr für die sprachliche Qualität oder die technische Richtigkeit der Übersetzungen und ist nicht für Probleme haftbar, die direkt oder indirekt durch Übersetzungsfehler oder die Verwendung der übersetzten Inhalte durch Kunden entstehen könnten.
Den englischen Originalartikel können Sie über folgenden Link abrufen: 113905
Microsoft stellt Ihnen die in der Knowledge Base angebotenen Artikel und Informationen als Service-Leistung zur Verfügung. Microsoft übernimmt keinerlei Gewährleistung dafür, dass die angebotenen Artikel und Informationen auch in Ihrer Einsatzumgebung die erwünschten Ergebnisse erzielen. Die Entscheidung darüber, ob und in welcher Form Sie die angebotenen Artikel und Informationen nutzen, liegt daher allein bei Ihnen. Mit Ausnahme der gesetzlichen Haftung für Vorsatz ist jede Haftung von Microsoft im Zusammenhang mit Ihrer Nutzung dieser Artikel oder Informationen ausgeschlossen.
Disclaimer zu nicht mehr gepflegten KB-Inhalten
Dieser Artikel wurde für Produkte verfasst, für die Microsoft keinen Support mehr anbietet. Der Artikel wird deshalb in der vorliegenden Form bereitgestellt und nicht mehr weiter aktualisiert.

Ihr Feedback an uns

 

Contact us for more help

Contact us for more help
Connect with Answer Desk for expert help.
Get more support from smallbusiness.support.microsoft.com