+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة السي شارب C#.NET (http://vb4arb.com/vb/forumdisplay.php?fid=175)
+--- قسم : قسم تقنية LinQ (http://vb4arb.com/vb/forumdisplay.php?fid=204)
+--- الموضوع : مساعده فى فورم اضافه سجل جديد (/showthread.php?tid=37353)
مساعده فى فورم اضافه سجل جديد - سلام و محبه - 02-01-21
السلام عليكم و رحمة الله و بركاته
عند اضافه سجل جديد فى جدول bank اريد الحصول على عدد السجلات و يضيف 1 اذا كان لايوجد سجلات فكتبت التالى
كود :
Dim getdate As New db_accountDataContext
Dim maxid = Aggregate newid In getdate.banks Into Max(newid.bank_id)
TxtBank_id.Text = maxid + 1عدلت الكود ليصبح هكذا
كود :
Dim getdata As New db_accountDataContext
Dim b = From cors In getdata.banks Select cors
Dim maxid = Aggregate newid In getdata.banks Into Max(newid.bank_id)
If IsDBNull(b) Then
TxtBank_id.Text = 1
Else
TxtBank_id.Text = maxid + 1
End Ifمرفق ملف ال فيجوال و الداتابيس من نوع سيكوال سيرفر 2008
[attachment=26225]مرفق ملف ال فيجوال و الداتابيس من نوع سيكوال سيرفر 2008
غيرت اسم الداتابيس فى المرفقات ليصبح s
RE: مساعده فى فورم اضافه سجل جديد - سلام و محبه - 03-01-21
[attachment=26240][attachment=26238]شكرا اخ ابراهيم
سارفق لك المشروع ارجو تعديله و تجربته لقد حاولت و لم اعرف المشروع عباره عن 2 فورم
فورم للعرض و فورم للاضافه