Ongelmana on, kun haetaan kannasta arvot combobox: n, käsittääkseni on mahdollista lisätä myös combobox: n tag:n vaikka ID- arvo, mutten onnistunut siinä. Olisi helpompi seuraavan päivityskyselyn kannalta luoda SQL- lause tagiin pohjautuen. Esimerkki:
Dim sSQL as string
Dim oRS as ADODB.RecordSet
sSQL = "SELECT Esimerkki_ID, Esimerkki_Nimi FROM Esimerkki"
set oRS = modSQL.HaeRecordSet 'recordsetin hakeva funktio
cmbEsimerkki.AddItem oRS.Fields("Esimerkki_ID..tämä tagiin ja Esimerkki_Nimi varsinaiseksi Itemiksi...
Tag on VB:ssä tarkoitettu lähinnä ogjektin identifiointiin. Käytä ItemData-ominaisuutta.
Mitenkäs tuo mahtaa toimia, kun laitoin
cmbEsimerkki.AddItem oRS.Fields("Esimerkki_Nimi").Value
cmbEsimerkki.ItemData(cmbEsimerkki.NewIndex) = oRs.Fields("Esimerkki_ID").Value
, jotenkin noin, niin tunnisti aina ID:ksi viimeisen rivin Id: n..??
Tarkista nyt tuo oRs.Fields("Esimerkki_ID").Value että varmasti tulee oikea arvo ItemDataan. Kyllähän sieltä comoboxista tulee ulos se mitä sisään on tungettu.
Jep, kiitoksia..Nyt toimii kun munuainen..
Aihe on jo aika vanha, joten et voi enää vastata siihen.