VB konkurenca ne DB

[Mr_Johns]

Hi everybody,

Problemi eshte ky: Ne VB6 nuk arri te rifreskoj permbajtjen e nje Datalist ne kohen e duhur por vetem pasi klikohet per here te dyte ne nje emer te datalistes.
Datalista i merr te dhenat me ane te nje Adodc qe lidhet me nje database access.
E cuditshmja eshte se ne qofte se fus nje MsgBox("") para thirjes adodc1.refresh
gjigjcka funksionon si duhet.
C'far ndodh me riinizializimin e objekteve te nje forme kur fokusi kalon nga nje forme tek tjetra?
Modifikimin e db e bej me nje objekt data dhe me e keqja eshte se mund te krijoj nje cikel qe merr nje nga nje rekordet e dB.

thanx
Mr Johns

[edspace]

Mirëserdhe në forum!

Kërkova për këtë problem në google groups dhe pashë që e kishin patur dhe njerëz të tjerë. Problemi është se rifreskimet nuk bëhen në çast dhe duhet pak kohë. Prandaj nqs ti vendos një msgbox() freskimet bëhen në rregull.

Zakonisht është më mirë nqs ti përdor të njëjtën lidhje (connection) për të dy formularët që modifkojnë dhe përmbajnë datalist.

Provo njëherë këtë tek formulari ku modifikon datalistën ose tek metoda got_focus() e formularit që përmban datalist.
Adodc.Refresh
form_me_datalist.emri_i_datalist.ReFill
form_me_datalist.emri_i_datalist.Refresh

Nqs nuk mund të përdorësh të njëjtën lidhje për të dy formularët ose kodi më lart nuk ka efekt, një tjetër mënyrë është që të vendosësh një pushim të vogël tek i njëjti vënd ku vendos msgbox().

Dim K as Long
K=Timer
Do until Timer > K+5
Doevents
Loop


Gjithashtu provo ta boshatisësh rowsource para se të freskosh adodc.
set DataList.Rowsource =Nothing
ADODC.refresh
set DataList.Rowsource =Adodc

msgbox "Fol Shqip"