Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Datenbankabfrage
Autor: Hans Joa.
Datum: 02.12.02 10:08
Hallo, bei meiner Datenbankabfrage läuft etwas instabil. Am Sonntag erstellte ich die Routine und nach einigen Versuchen funktionierte das Programm. Beim neuen Test am Montag trat mit der gleichen Routine und Voraussetzungen folgender Fehler auf. Das Programm erkennt die Access Datei und die Tabelle. Der Vergleich verläuft positiv aber im Else Zweig erhalte ich aus dem Feld nicht den vorhandenen Wert sondern "". Hier die Anfängerroutine: Function GetNumberToName(ByVal TNNumber as String) As String Dim Rs As Recordset Dim SQL As String Dim dbFile As String Dim Db As Database dbFile = "C:\Programme\TESTDIR\ISDNCall.mdb" Set Db = Workspace(0).OpenDatabase(dbFile, False, False) SQL = "SELECT * FROM Phonebook Where Number = '0525292291''" Set Rs = Db.OpenRecordset(SQL, dbOpenForwardOnly) If Rs.EOF Then GetNumberToName = "unbekannt" Else GetNumberToName = Rs(Name) 'Hier erhalte ich den Wert ""! End If Db.Close Set Db = Nothing End Function *Das Feld "Name" ist vorhanden und beinhaltet einen Wert. Auch alle anderen Felder liefern ""!! Ist hier etwas falsch gemacht worden? MfG Hans Joachim

Datenbankabfrage	386	Hans Joa.	02.12.02 10:08
Re: Datenbankabfrage	224	Dieter	02.12.02 10:14
Re: Datenbankabfrage	219	Hans Joa.	02.12.02 11:19
Re: Datenbankabfrage	226	Dieter	02.12.02 11:24
Re: Datenbankabfrage	207	Hans Joa.	02.12.02 12:32
Re: Datenbankabfrage	215	Dieter	02.12.02 12:49
Re: Datenbankabfrage	218	Hans Joa.	02.12.02 14:19
Re: Datenbankabfrage	212	David M	02.12.02 10:17

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