تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[VB.NET] مشكلة فى كود sql
#1
دلوقتى عايز احفظ البيانات فى القاعدة البيانات بس كل ماجى احفظ يقولى فى خطاء فى الكود ده


ده الكود بالكامل

كود :
Imports System.Data
Imports System.Data.SqlClient
Imports Microsoft.VisualBasic
Public Class Form2
   Dim conn As New SqlConnection("Data Source=DESKTOP-C3FPNGU;Initial Catalog=New_customer;Integrated Security=true")
   Dim da As New SqlDataAdapter
   Dim ds As New DataSet
   Dim cmd As New SqlCommand

   Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
       cmd = New SqlCommand("INSERT INTO Customer(land_line, [N1-landline], N, Address, mobile_number, National_ID, Package_type) VALUES (@land_line," &
          "  @[N1-landline], @N, @Address, @obile_number, @National_ID, @Package_type)", conn)



       With cmd.Parameters
           .AddWithValue("@land_line", TextBox1.Text).DbType = DbType.Double
           .AddWithValue("@[N1-landline]", TextBox2.Text).DbType = DbType.String
           .AddWithValue("@N", TextBox3.Text).DbType = DbType.String
           .AddWithValue("@Address", TextBox4.Text).DbType = DbType.String
           .AddWithValue("@mobile_number", TextBox5.Text).DbType = DbType.Double
           .AddWithValue("@National_ID", TextBox6.Text).DbType = DbType.Double
           .AddWithValue("@Package_type", ComboBox2.Text).DbType = DbType.Double

       End With
       If conn.State = ConnectionState.Open Then
           conn.Close()
       End If
       conn.Open()
       cmd.ExecuteNonQuery()
       conn.Close()

   End Sub

   Private Sub Form2_Load(sender As Object, e As EventArgs) Handles MyBase.Load
       Dim da As New SqlDataAdapter("SELECT * FROM Customer", conn)
       da.Fill(ds, "Customer")

   End Sub
End Class

الرد
تم الشكر بواسطة:
#2
معلونة لم يستطع الكود تحويلها من نص الى رقم

هذا تعديل
PHP كود :
With cmd.Parameters
           
.AddWithValue("@land_line"TextBox1.Text
           .
AddWithValue("@[N1-landline]"TextBox2.Text)
           .
AddWithValue("@N"TextBox3.Text)
           .
AddWithValue("@Address"TextBox4.Text)
           .
AddWithValue("@mobile_number"TextBox5.Text)
           .
AddWithValue("@National_ID"TextBox6.Text)
           .
AddWithValue("@Package_type"ComboBox2.Text)
       
End With 

لكن اجعل الادوات التي المفروض تحتوي رقم في Val مثل
PHP كود :
.AddWithValue("@mobile_number"Val(TextBox5.Text)) 
الرد
تم الشكر بواسطة:
#3
نفس المشكلة
الرد
تم الشكر بواسطة:
#4
حدد نوع كل عمود لنعرف المشكلة
الرد
تم الشكر بواسطة:
#5
نوع كل عمود فى قاعدة البيانات ؟


عايز اعمل سجل جديد
الرد
تم الشكر بواسطة:
#6
عندك land_line وSubscription price وmobile_number وNational_ID هذه كلها ارقام لازم تتاكد ان الأداوات الخاصة بها تحتوي ارقام فقط
وعندك signup date تاريخ لازم تتاكد الاداة الخاصة بها تحتوي تاريخ صحيح
الرد
تم الشكر بواسطة:
#7
معلش انا لسه جديد فى قواعد البيانات ممكن تقولى يعنى اتاكد ازاى ؟
الرد
تم الشكر بواسطة:
#8
(11-04-17, 08:04 PM)abdualla كتب : لكن اجعل الادوات التي المفروض تحتوي رقم في Val مثل
PHP كود :
.AddWithValue("@mobile_number"Val(TextBox5.Text)) 

يعني الشغلة ما هي قواعد بيانات
الشغلة تحويل نوع أي بيانات في الفجوال بيسك
الرد
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  مشكلة فى التعديل salah mansour 7 95 منذ 11 ساعة مضت
آخر رد: فراس محي
  [VB.NET] مشكلة في استخراج روابط هذه الصفحة بال HtmlAgilityPack mervandzz 2 39 13-10-18, 03:53 PM
آخر رد: mervandzz
  مشكلة فى اختفاء فورم salah mansour 0 35 12-10-18, 01:47 AM
آخر رد: salah mansour
  [VB.NET] مشكلة بكود التحديث لقاعدة البيانات محمد اسماعيل 4 90 11-10-18, 06:45 AM
آخر رد: محمد اسماعيل
  مشكلة فى تشغيل قارئ من بين جميع القراء ابو روضة 10 221 10-10-18, 12:00 AM
آخر رد: AymanRamadanSaad
  [VB.NET] مشكلة في كود تغيير لغة البرنامج ay.alhaj 13 193 09-10-18, 08:52 PM
آخر رد: ay.alhaj
  [سؤال] مشكلة في إرسال بيانات من الفيجوال الى الوورد سعود الشامان 7 350 08-10-18, 01:56 AM
آخر رد: عبد العزيز البسكري
  مشكلة الكرستال ريبورت DOX.1 1 45 07-10-18, 07:43 PM
آخر رد: rnmr
Photo [VB.NET] مشكلة فى قراءة ملف اكسيل كما فى الصورة المرفقة monm 5 132 05-10-18, 12:26 PM
آخر رد: asemshahen5
  مشكلة شاشة التوقف المتألق9 3 85 30-09-18, 02:16 PM
آخر رد: المتألق9

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


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