Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Re: DBGrid - sortieren / suchen /Datensatz kopieren
Autor: Tom
Datum: 19.10.01 08:23
allo Heiko Zum Übertragen in eine andere Tabelle mußt du folgendes machen: 'Datenbankvariablen deklarieren Dim Datenbank As Database 'Tabellenvariablen deklarieren Dim RSKunden As Recordset Dim RSKundenSave as Recordset MDBDateiPfad = "catenbank.mdb" Set Datenbank = Workspaces(0).OpenDatabase(MDBDateiPfad) sql = "select * from Kunden order by Name" Set abfragepunkte = Datenbank.CreateQueryDef("", sql) Set RSKunden = abfragepunkte.OpenRecordset() sql = "select * from KundenSave order by Name" Set abfragepunkte = Datenbank.CreateQueryDef("", sql) Set RSKundenSave = abfragepunkte.OpenRecordset() IF RSKunden.RecordCount > 0 then RSKunden.MoveFirst else exit sub END IF do while RSKunden.EOF = FALSE RSKundenSave.Addnew RSKundenSave.Fields("Name") = RSKunden.Fields("Name") RSKundenSave.Fields("Vorname") = RSKunden.Fields("Vorname") RSKundenSave.Fields("PLZ") = RSKunden.Fields("PLZ") RSKundenSave.Update RSKunden.MoveNext loop

DBGrid - sortieren / suchen /Datensatz kopieren	77	HeikoA	18.10.01 01:02
Re: DBGrid - sortieren / suchen /Datensatz kopieren	49	Tom	18.10.01 10:48
Re: DBGrid - sortieren / suchen /Datensatz kopieren	43	HeikoA	18.10.01 11:44
Re: DBGrid - sortieren / suchen /Datensatz kopieren	42	Tom	18.10.01 11:59
Re: DBGrid - sortieren / suchen /Datensatz kopieren	48	HeikoA	18.10.01 13:08
Re: DBGrid - sortieren / suchen /Datensatz kopieren	54	Tom	19.10.01 08:23

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