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

Imports System.Data
Imports System.Data.OleDb
Public Class Form3
Private Sub Form3_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
MdiParent = Form1
End Sub

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim str As String
str = " Provider=Microsoft.ACE.OLEDB.12.0;Data Source=C:\Users\Future\Desktop\Howmork3\footb.accdb"
Dim con As OleDbConnection
con = New OleDbConnection(str)
con.Open()
Dim sql As String
sql = "update footbo set pname=@name,numberofscores=@number where id=@id "
Dim comand As OleDbCommand
comand = New OleDbCommand(sql, con)
comand.Parameters.AddWithValue("@id", TextBox1.Text)
comand.Parameters.AddWithValue("@name", TextBox2.Text)
comand.Parameters.AddWithValue("@number", TextBox3.Text)
comand.ExecuteNonQuery()
End Sub
End Class
ممكن المساعدة اشو من انفذ ما يعمل شنو الخخل بالكود

اولا : هذه القسم للمشاريع والامثلة فقط ... وليس للأسئلة
فرجاءً إطرح مشكلتك في قسم الإسئلة لكي يراها الجميع وتجد مبتغاك

ثانيا : ما هي هذه اللغة ( حد فاهم حاجة )

(12-03-14, 07:51 PM)muqtada zuhier كتب : [ -> ]اشو من انفذ ما يعمل شنو الخخل