Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

SaveAll ...
Autor: unbekannt
Datum: 02.02.02 21:34
'Allgemeine Deklarationen Private DB As DataBase Private Const sDBNAME = "PFAD_u_Name_der_DB" Private Const sTABName = "Tabelle" Private Sub OpenDB() Set DB = DBEngine.OpenDatabase(sDBName, False, False) End Sub Private Sub CloseDB() DB.Close Set DB = Nothing End Sub Private Sub NewDS() Dim o As Control Dim Rs As RecordSet OpenDB Set RS = DB.OpenRecordSet(sTabName, dbOpenDynaset) With Rs .AddNew For Each o In Form1.Controls .Fields(o.Tag).Value = o.Text Next .Update End With CloseDB End Sub Private Sub LoadDS() Dim o As Control ClearDS OpenDB Set Rs = DB.OpenRecordSet(sTabName, dbOpenDynaset) If Rs.EOF Then Exit Sub For Each o In Form1.Controls If o.Tag<>"" Then o.Text = Rs.Fields(o.Tag).Value End If Next CloseDB End Sub morgen geht's weiter..... cu Lordchen

Auslesen aus Datenbanken	189	Piranha	02.02.02 20:35
Re: Auslesen aus Datenbanken	246	unbekannt	02.02.02 20:41
Re: Auslesen aus Datenbanken	50	Piranha	02.02.02 20:47
Re: Auslesen aus Datenbanken	266	unbekannt	02.02.02 20:51
Re: Auslesen aus Datenbanken	53	-ipa-	02.02.02 20:53
Kommt gleich, ... aber warten auf Piranha. (oT)	238	unbekannt	02.02.02 20:56
Re: Kommt gleich, ... aber warten auf Piranha. (oT)	48	-ipa-	02.02.02 20:58
Re: Auslesen aus Datenbanken	47	Piranha	02.02.02 20:58
Noch kurz: Wie heißen die Felder in der DB-Tabelle? (oT)	247	unbekannt	02.02.02 21:00
Re: Noch kurz: Wie heißen die Felder in der DB-Tabelle? (oT)	52	Piranha	02.02.02 21:02
Just wait a moment .... oT	255	unbekannt	02.02.02 21:06
Re: Noch kurz: Wie heißen die Felder in der DB-Tabelle? (oT)	274	unbekannt	02.02.02 21:17
Re: Noch kurz: Wie heißen die Felder in der DB-Tabelle? (oT)	38	Piranha	02.02.02 21:30
Logisch, ich tippe mir ja noch die Finger wund .... (oT)	234	unbekannt	02.02.02 21:36
Oder meinst Du ein DB-proggi ist in 5 Min fertig ? (oT)	244	unbekannt	02.02.02 21:38
sagen wir: ich hätte es gehofft (o.T)	39	Piranha	02.02.02 21:42
Dann geht das mit einem Data-Control einfacher. Aber ...	262	unbekannt	02.02.02 21:48
Re: Dann geht das mit einem Data-Control einfacher. Aber ...	39	Piranha	02.02.02 21:52
Nein (o.T)	40	Piranha	02.02.02 21:53
Sei froh! Morgen machen wir weiter, ist nicht mehr viel	272	unbekannt	02.02.02 21:59
Bin jetz wieder da...(o.T.)	41	Piranha	03.02.02 11:54
SaveAll ...	300	unbekannt	02.02.02 21:34
Re: SaveAll ...	84	Piranha	02.02.02 21:40
Also,	345	unbekannt	02.02.02 21:43
Sorry, pre vergessen:	270	unbekannt	02.02.02 21:41

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