منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
اريد كود جلب آخر رقم - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغات البرمجة الاخرى (http://vb4arb.com/vb/forumdisplay.php?fid=4)
+--- قسم : قسم لغة vb6.0 (http://vb4arb.com/vb/forumdisplay.php?fid=18)
+---- قسم : قسم أسئلة vb6.0 (http://vb4arb.com/vb/forumdisplay.php?fid=28)
+---- الموضوع : اريد كود جلب آخر رقم (/showthread.php?tid=832)



اريد كود جلب آخر رقم - احساس شاعر - 03-11-13

السلام عليكم ورحمة الله وبركاته

بعد أذنكم اريد كود جلب آخر رقم من قاعدة البيانات

حيث ان الجدول : tab
والعمود : ID
والربط : adodc

ولكم جزيل الشكر



RE: اريد كود جلب آخر رقم - ناجي إبراهيم - 03-11-13

السلام عليكم...

استخدم جملة SELECT كالتالي:
كود :
RS.Open "SELECT MAX(ID) AS MaxID FROM tab", cnn

X = RS("MaxID")

حيث cnn اسم الـ Connection.

نرجو الاستفادة و السلام.


RE: اريد كود جلب آخر رقم - asto - 04-11-13

كود :
adodc1.recordset.movelast
text1.text=Adodc1.Recordset.Fields("ID")