تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
مشكلة dbnull
#1
السلام عليكم
هي المشكلة هنا فين يا اخواني
   Function GetAutoNum(TableName As String, ColName As String) As String
       Dim Str As String

       Str = "Select max (" & ColName & ") + 1 from " & TableName
       Dim tb1 As New DataTable
       tb1 = GetTable(Str)
       Dim AutoNum As String
       If tb1.Rows(0)(0) Is DBNull.Value Then
           AutoNum = "1"
       Else
           AutoNum = tb1.Rows(0)(0)
           Return AutoNum
       End If

   End Function


الملفات المرفقة صورة/صور
   
الرد }}}}
تم الشكر بواسطة:
#2
هذه الدالة للترقيم التلقائى
Private Sub MAXRECORD()
On Error Resume Next
Dim V As Integer
Dim SQL As String = "SELECT MAX(id) FROM StoresProducts"
Dim CMD As SqlClient.SqlCommand = New SqlClient.SqlCommand
Dim SqlConnection1 As SqlConnection = New SqlConnection
With CMD
.CommandType = CommandType.Text
.Connection = SqlConnection1
If SqlConnection1.State = ConnectionState.Open Then SqlConnection1.Close()
SqlConnection1.Open()
.CommandText = SQL
V = .ExecuteScalar()
End With
Me.TxtId.Text = Val(V) + 1
SqlConnection1.Close()
End Sub

غير الكود واسم التكست بوكس
ونادى على الدالة فى زر جديد
[
الرد }}}}
تم الشكر بواسطة: المبرمج العبقري
#3
http://vb4arb.com/vb/thread-17049.html
الرد }}}}
تم الشكر بواسطة: المبرمج العبقري
#4
شكرا يا اخواني اتحلت المشكلة بارك الله فيكم
الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  مشكلة في عرض النص بالعربي في #Region فقط ali.alfoly 0 12 منذ 1 ساعه مضت
آخر رد: ali.alfoly
  مشكلة ف الحفظ والتعديل بعد تحويل المشروع لملف تنفيذي apo yousef 0 15 منذ 11 ساعة مضت
آخر رد: apo yousef
  [VB.NET] مشكلة في كيفية اعادة الاتصال في TcpClient YazanOtoum 1 42 أمس, 01:03 PM
آخر رد: YazanOtoum
  ار جو المساعدة ما هي مشكلة كود التعديل والحذف boofa2015 1 24 أمس, 11:12 AM
آخر رد: dark1459
  [VB.NET] كيفية حل مشكلة Global.[String] فى ملف Settings.Designer.vb الماجيك مسعد 2 44 أمس, 03:08 AM
آخر رد: الماجيك مسعد
  [VB.NET] مشكلة في حدف صورة من مسار بمجلد بالكمبيوتر ناصر شير 6 93 18-02-17, 02:37 PM
آخر رد: ناصر شير
  [سؤال] حل مشكلة برنامج لتغير التاريخ عبدالرحمن المكاوي 6 121 17-02-17, 11:19 PM
آخر رد: EnormousSoft
  [VB.NET] مشكلة نقل الكود من Form2 الي Form1 3asfa~mdmra 2 70 17-02-17, 02:44 AM
آخر رد: الماجيك مسعد
  [كود] حل مشكلة في كود عبدالرحمن المكاوي 12 151 16-02-17, 12:30 AM
آخر رد: مساعدة
  مشكلة واحدة على انتهاء المشروع Mohamed20 0 34 13-02-17, 01:49 AM
آخر رد: Mohamed20

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم