HjSoft
یک شنبه 08 اردیبهشت 1387, 16:17 عصر
می خوام اطلاعات بانک رو به یک لیست باکس بیارم من از این کد استفاده میکنم >>>
Do While Adodc1.Recordset.EOF = False
tele = Adodc1.Recordset.Fields(1) 'tele Add
lstNames.AddItem tele
Adodc1.Recordset.MoveNext
Loop
اما Runtime 91 میاد مشکل در چیست ؟ اما همین کد در برنامه های دیگر درست میکند اگر از runtime استفاده کنیم هنگ میکنه !! اگه راهی بلدید بگذارید
Do While Adodc1.Recordset.EOF = False
tele = Adodc1.Recordset.Fields(1) 'tele Add
lstNames.AddItem tele
Adodc1.Recordset.MoveNext
Loop
اما Runtime 91 میاد مشکل در چیست ؟ اما همین کد در برنامه های دیگر درست میکند اگر از runtime استفاده کنیم هنگ میکنه !! اگه راهی بلدید بگذارید