vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
 vb@rchiv Offline-Reader - exklusiv auf der vb@rchiv CD Vol.4  
 vb@rchiv Quick-Search: Suche startenErweiterte Suche starten   Impressum  | Datenschutz  | vb@rchiv CD Vol.6  | Shop Copyright ©2000-2025
 
zurück

 Sie sind aktuell nicht angemeldet.Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Fortgeschrittene Programmierung
Re: Abfrageergebnis in Combo einfügen 
Autor: unbekannt
Datum: 12.10.02 17:24
Hi Redo,

folgendes (in Fett) hat gefehlt: 

 
FillCboKalicfg(cbo1 As ComboBox, cbo2 As ComboBox)
Dim j As Integer
Dim DB As Database

Set DB = DBEngine.Workspaces(0).OpenDatabase("C:\My_Access\Konfiguration2.MDB")
Dim SQL As String
Dim RS As Recordset
sens1 = cbo1.List(cbo1.ListIndex)
SQL = "SELECT KdKalibrierung, KdSensorkali FROM tblKalibrierdaten WHERE KdSensorkali =" + CStr(sens1)

Set RS = DB.OpenRecordset(SQL)
For j = 1 To RS.RecordCount
cbo2.AddItem RS("KdKalibrierung")
Next j
RS.Close
End Sub
0
alle Nachrichten anzeigenGesamtübersicht  |  Zum Thema  |  Suchen

 ThemaViews  AutorDatum
Abfrageergebnis in Combo einfügen67redo12.10.02 17:19
Re: Abfrageergebnis in Combo einfügen219ModeratorDieter12.10.02 17:24
Re: Abfrageergebnis in Combo einfügen230unbekannt12.10.02 17:24
Vielen Dank Ihr guten(oT)34redo12.10.02 21:02

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übersichtSuchen 

nach obenzurück
  
   

Copyright ©2000-2025 vb@rchiv Dieter Otter
Alle Rechte vorbehalten.
Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.

Diese Seiten wurden optimiert für eine Bildschirmauflösung von mind. 1280x1024 Pixel