Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Re: Daten in Access einlesen
Autor: Flöre
Datum: 25.08.03 19:55
Hallo Dieter Nein habe schon VB6. Den Split Befehl glaube ich führt er aus aber ich habe das Gefühl er öffnet mir schon erst gar nicht die Datenbank. Also zur Zeit habe ich folgende konfig. Private Sub Command1_Click() ' wird im "CommonDialog" auf "Abbrechen" geklickt, ' wird (wenn CancelError = True ist) ein Laufzeitfehler ausgelöst. Dim F As Integer Dim sLine As String Dim sData() As String Dim oDB As Database Dim oRs As Recordset Dim AllText As String Dim LineOfText As String On Error Resume Next With CommonDialog1 .CancelError = True ' Filter setzen - hier wird festgelegt, mit welchem Format ' eine Datei geöffnet wird. .Filter = "Textdateien (*.txt)|*.txt" ' Dialogfeld Öffnen anzeigen .ShowOpen If .FileName <> "" Then ' File öffnen F = FreeFile Open .FileName For Input As #F ' Datenbank öffnen Set oDB = DAO.OpenDatabase("db1.mdb") Set oRs = oDB.OpenRecordset("Regen_all") ' File zeilenweise auslesen und in DB übertragen While Not EOF(F) Line Input #F, sLine sData = Split(sLine, ";") oRs.AddNew oRs("Spalte1") = sData(0) oRs("AMO") = Replace(oData(1), Chr$(34, "") oRs("Parameter") = Replace(oData(2), Chr$(34, "") oRs.Update Wend ' alle Dateien schließen Close #F oRs.Close oDB.Close End If End With End Sub

Daten in Access einlesen	590	Flöre	24.08.03 16:44
Re: Daten in Access einlesen	880	Dieter	25.08.03 08:26
Re: Daten in Access einlesen	275	Flöre	25.08.03 19:10
Re: Daten in Access einlesen	770	Dieter	25.08.03 19:21
Re: Daten in Access einlesen	366	Flöre	25.08.03 19:55
Re: Daten in Access einlesen	767	Dieter	25.08.03 20:04
Re: Daten in Access einlesen	287	Flöre	25.08.03 20:18
Re: Daten in Access einlesen	846	Dieter	25.08.03 21:01
Re: Daten in Access einlesen	249	Flöre	25.08.03 21:05
Re: Daten in Access einlesen	866	Dieter	25.08.03 21:07
Re: Daten in Access einlesen	260	Flöre	25.08.03 21:11
Re: Daten in Access einlesen	704	Dieter	25.08.03 21:19
Re: Daten in Access einlesen	198	Flöre	25.08.03 21:21
Re: Daten in Access einlesen	821	Dieter	25.08.03 21:25
Re: Daten in Access einlesen	222	Flöre	25.08.03 21:40
Re: Daten in Access einlesen	847	Dieter	25.08.03 21:45
Re: Daten in Access einlesen	229	Flöre	25.08.03 21:51
Re: Daten in Access einlesen	179	Flöre	25.08.03 21:55
Re: Daten in Access einlesen	670	Dieter	25.08.03 22:00
Re: Daten in Access einlesen	258	Flöre	25.08.03 22:08
Re: Daten in Access einlesen	702	Dieter	25.08.03 22:30
Re: Daten in Access einlesen	195	Flöre	25.08.03 22:52
Re: Daten in Access einlesen	735	Dieter	25.08.03 22:59
Re: Daten in Access einlesen	232	Flöre	25.08.03 23:05
Re: Daten in Access einlesen	769	Dieter	25.08.03 23:18
Re: Daten in Access einlesen	167	Flöre	25.08.03 23:31
Re: Daten in Access einlesen	684	Dieter	25.08.03 23:39
Re: Daten in Access einlesen	208	Flöre	25.08.03 23:49

Sie sind nicht angemeldet! Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden. Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  Gesamtübersicht

Suchen