تقييم الموضوع :
  • 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)) 

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


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
Exclamation ما هذا ؟ مشكلة في اداة ShockwaveFlash لعرض فيديوهات الـ Youtube YousefOkasha 5 50 منذ 2 ساعة مضت
آخر رد: محمد كريّم
  مشكلة فى استدعاء الفاتورة للتعديل عليها atef_020 27 368 أمس, 10:23 PM
آخر رد: atefkhalf2004
  [VB.NET] كيف يمكن تفادي مشكلة اقلاع البرنامج اكثر من مرة larbihamri 4 82 20-07-18, 03:29 AM
آخر رد: YousefOkasha
  مشكلة ظهور الارقام في تقرير الكريستال ريبورت باللغة الانجليزية محمد صلاح ابراهيم 1 57 15-07-18, 05:07 PM
آخر رد: elgokr
Exclamation مشكلة في تثبيت Visual Studio 2013 YousefOkasha 7 299 13-07-18, 10:33 PM
آخر رد: YousefOkasha
  [سؤال] مشكلة عند عمل رن للمشروع khaled_2017 9 171 13-07-18, 07:32 PM
آخر رد: elgokr
  [VB.NET] مشكلة عند اضافة البيانات للسيرفر محمد اسماعيل 7 98 11-07-18, 04:28 AM
آخر رد: elgokr
  [VB.NET] مشكلة في الكريستال ريبورت فراس الغزي 1 61 09-07-18, 03:00 PM
آخر رد: elgokr
  مشكلة في ال .NETFramework YousefOkasha 18 191 01-07-18, 03:33 AM
آخر رد: elgokr
  مشكلة فى طباعة بون كاشير Osama Bayoumy 12 206 28-06-18, 06:58 AM
آخر رد: elgokr

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


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