Moin, moin!
Ich sehe offenbar den Wald vor lauter Bäumen nicht :-)
Folgender Code:
Der kleine Test in der Mitte läuft wunderbar und spuckt eine kleinen Teil der Daten aus.
Aber bei Adapter.Fill erhalte ich den Fehler:
Mir sagt diese Meldung leider garnichts. Die Tabelle ist vorhanden, und kann gelesen werden. Sie ist von niemand anderem geöffnet, liegt einfach nur als Datei herum :-)
Wer zeigt mir einen Weg durch den Wald?
Danke fürs Lesen, Uwe
Ich sehe offenbar den Wald vor lauter Bäumen nicht :-)
Folgender Code:
Code:
Dim file As String = "C:\test\Kunden.dbf" Dim filePath As String = IO.Path.GetDirectoryName(file) Dim ConnString As String = "Provider=VFPOLEDB.1;Data Source=" & filePath & _ ";Mode=ReadWrite|Share Deny None" Dim conn As New OleDbConnection(ConnString) conn.Open() Dim cmdString As String = "select * from Kunden" ' Test, ob die connection wirklich offen und lesbar ist Dim cmd As New OleDbCommand(cmdString, conn) Dim reader As OleDbDataReader = cmd.ExecuteReader() While reader.Read() Console.WriteLine(reader.Item(0).ToString) End While reader.Close() ' Test ende Dim adapter As New OleDbDataAdapter(cmdString, conn) Dim customers As DataSet = New DataSet adapter.Fill(customers, "Kunden") conn.Close()
Aber bei Adapter.Fill erhalte ich den Fehler:
Anbieter konnte den Object-Wert nicht ermitteln. Zum Beispiel: die Zeile wurde gerade erstellt,
der Standard für die Object-Spalte nicht verfügbar und der Consumer hat noch keinen neuen Object-Wert gesetzt.
der Standard für die Object-Spalte nicht verfügbar und der Consumer hat noch keinen neuen Object-Wert gesetzt.
Wer zeigt mir einen Weg durch den Wald?
Danke fürs Lesen, Uwe
Comment