منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

السلام عليكم اخواني


اريد كود الحفظ في الداتا بيز مع العلم ان الداتا بيز تبعي  sql  server واستخدم فجول دوت نت 2010
ارجو المساعده

Table_Name = اسم الجدول بقاعدة البيانات
FiledName1 = اسم الحقل الأول وهكذا ...
Connection_String = نص جملة الإتصال بالخادم

(29-06-15, 09:44 AM)Genius Live كتب : [ -> ]

this'll help you  'ISA' 

            Dim INS As String = "INSERT INTO [Table_Name] " & _

           "([FiledName1] " & _

           ",[FiledName2] " & _

           ",[FiledName3]) " & _

           "VALUES ('" & TextBox1.Text.Trim & "' " & _

           ",'" & TextBox2.Text.Trim & "' " & _

           ",'" & TextBox3.Text.Trim & "') " & _

            Dim con As New SqlConnection("Connection_String")

            If con.State = ConnectionState.Open Then con.Close()

            Dim A As New SqlCommand

            A = New SqlCommand(INS, con)

            A.ExecuteNonQuery()

Table_Name = اسم الجدول بقاعدة البيانات
FiledName1 = اسم الحقل الأول وهكذا ...
Connection_String = نص جملة الإتصال بالخادم
 اخي ممكن توضح لي اكتر

---

اخي ممكن توضح لي اكتر

Imports System
imports System.Data.SqlClient

Dim ConnectionString As String
Dim connection As SqlConnection
ConnectionString = “Data Source=IT-PC\vb4arb123;Initial Catalog=vb4arb_db;User ID=administrator;Password=vb4arb.com”
Connection = New SqlConnection (ConnectionString)

أهلين أخي الغالي أتمنى أني أقدر أساعدك باللي أعرفه 

1- تقوم بتعريف متغير  Dim cmd As New SqlCommand

2-  في الحدث كليك التابع لزر الحفظ  ضع هذا الكود مع التعديل عليه حسب قاعدة بياناتك 
cmd = New SqlCommand("INSERT INTO أسم الجدول(الحقل الأول, الحقل الثاني)Values(لحقل الأول@, الحقل الثاني@), conn)"  هذه العلامه لأضافة السجل مباشرة لقاعدة البيانات سكيول سيرفر @

أتمنى أني قدرت أساعدك في شي