PDA

View Full Version : autorunکردن فیلد ردیف در dbgride ویژوال بیسیک


roya sefid
پنج شنبه 04 بهمن 1386, 18:36 عصر
سلام
من رز هستم ازشما بچه ها می خواستم تا بهم کمک کنید تابتونم فیلد ردیف یک دیتا گراد در وی بی رو به صورت اتوران دراورم
مرسی قربان شما رز
مبین رنجبر
پنج شنبه 04 بهمن 1386, 19:33 عصر
منظور شما از Autorun چیه ؟ می خواهید چه کاری انجام بدید ؟
اوبالیت به بو
پنج شنبه 04 بهمن 1386, 22:35 عصر
فکر کنم منظورشون AutoNumber هستش.
hamid5300
جمعه 05 بهمن 1386, 01:59 صبح
If Adodc1.Recordset.RecordCount <> 0 Then
Adodc1.Recordset.MoveLast
Dim a As Long
a = Text1.Text
Adodc1.Recordset.AddNew
Text1.Text = a + 1
Else
Adodc1.Recordset.AddNew
Text1.Text = 1
End If

این کد را باید در کلیک کامند قرار بدی و با استفاده از یک تکست باکس و دیتا گرید و کنترل Adodc به پایگاه داده وصل بشی.