Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Tabelle durchsuchen und editieren
Autor: Michi-newbie
Datum: 16.01.03 18:19
Hallo, ich habe da eni Problem, dass mit langsam ein wenig auf die Nerven geht Folgendes: Ich möchte eine Tabelle (db1.mdb->Bier) durchsuchen. Er soll in der Spalte "Produkt" nach "List1.text " suchen und es dann durch "Text1.text" ersetzen. So hab ich es gemacht: ============================================== Dim Db As Database Dim Tabelle As Recordset Dim dbFile As String dbFile = App.Path + "\DB1.MDB" Set Db = Workspaces(0).OpenDatabase(dbFile, False, False) Set Tabelle = Db.OpenRecordset("Bier") Tabelle.Index = "Produkt" Tabelle.Seek "=", List1.Text If Not Tabelle.NoMatch Then Tabelle.Edit Tabelle("Produkt") = Text1.Text Tabelle("Preis") = Text2.Text Tabelle.Update End if ============================================== Aber dann kommt imner: "Produkt ist in dieser Tabelle kein Index" kann mir einer helfen? Danke schonmal Michael V.

Tabelle durchsuchen und editieren	81	Michi-newbie	16.01.03 18:19
Re: Tabelle durchsuchen und editieren	218	Dieter	16.01.03 18:31
Re: Tabelle durchsuchen und editieren	39	Michi-newbie	16.01.03 18:37
Re: Tabelle durchsuchen und editieren	217	Dieter	16.01.03 18:54
Re: Tabelle durchsuchen und editieren	34	Michi-newbie	18.01.03 21:55

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