تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[سؤال] اريد كود الحفظ sql server وفجول دوت نت 2010
#1
السلام عليكم اخواني


اريد كود الحفظ في الداتا بيز مع العلم ان الداتا بيز تبعي  sql  server واستخدم فجول دوت نت 2010
ارجو المساعده
الرد }}}
تم الشكر بواسطة:
#2
this'll help you  'ISA'  Rolleyes
            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 = نص جملة الإتصال بالخادم
{‏‏ يَرْفَعِ اللَّهُ الَّذِينَ آمَنُوا مِنكُمْ وَالَّذِينَ أُوتُوا الْعِلْمَ دَرَجَاتٍ‏ }

 " Mohamed M. Bedair     -     " Abu Anas
Genius Live , Egypt
الرد }}}
تم الشكر بواسطة:
#3
(29-06-15, 09:44 AM)Genius Live كتب :
this'll help you  'ISA'  Rolleyes
            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 = نص جملة الإتصال بالخادم
 اخي ممكن توضح لي اكتر

اخي ممكن توضح لي اكتر
الرد }}}
تم الشكر بواسطة:
#4
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)



وما نيل المطالب  بالتمني ,,,

لكن تأخذ الدنيا غلابا ........................


الرد }}}
تم الشكر بواسطة:
#5
أهلين أخي الغالي أتمنى أني أقدر أساعدك باللي أعرفه 

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

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

أتمنى أني قدرت أساعدك في شي
الرد }}}
تم الشكر بواسطة:



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


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