title image


Smiley Re: Datenbank mit Access
Ungefähr so:Datenbank öffen:Public db As ADODB.Connectiondb.Open "PROVIDER=Microsoft.Jet.OLEDB.4.0;Data Source=" + dbName + ";"dbName ist dann dein Datenbankname.Recordset aufmachen:Public grsStatusarten As ADODB.RecordsetSet grsStatusarten = New ADODB.Recordset grsStatusarten.Open "SELECT * FROM STATUSTEXTE", db, adOpenStatic, adLockReadOnlyCombo füllen:Do While (Not grsStatusarten.EOF) cboStatusart.AddItem (grsStatusarten.Fields("Beschreibung").Value) grsStatussarten.MoveNext LoopcboStatusart ist deine Combo und "Beschreibung" dein Spaltenname. Wenn du den Recordset nicht mehr brauchst, kannst du ihn mitgrsStatusarten.closeset grsStatusarten=nothingwieder zumachen.Christof

geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: