16-04-13, 12:44 AM
مرحبا المبرمج البسيط ،، العفو عزيزي ما سوينا غير الواجب
على العموم رسالتك وصلت وقمت بإرسال رسالة لك فظهر مسج ان المبرمج البسيط رسائلة وصلت للحد النهائي ولا يمكن إرسال رساله له ... للمعلومية
بخصوص تعبئة كومبو او لست هذا الكود
على العموم رسالتك وصلت وقمت بإرسال رسالة لك فظهر مسج ان المبرمج البسيط رسائلة وصلت للحد النهائي ولا يمكن إرسال رساله له ... للمعلومية
بخصوص تعبئة كومبو او لست هذا الكود
كود :
If rs.State = 1 Then rs.Close
rs.Open "SELECT * from item", cn, adOpenKeyset, adLockPessimistic
Combo1.Clear
List1.Clear
Do While rs.EOF = False
Combo1.AddItem rs!num
List1.AddItem rs!num
rs.MoveNext
Loop
rs.Close
