السلام عليكم ورحمة الله وبركاته
اخوانى انا والله انا عارف انى عاملكم ازعاج
بس انا والله العظيم انا الان بدرس اكثر من لغة
ليس من الترفيه
بل من اجل لقمة العيش
والله المستعان
فى هذا الموضوع انا طالب شيىء بسيط جدا اتمنى من حضرتكم ان تساعدونى فيه او على الاقل اعطونى رابط وانا اقرا بها
انا عايز كود لعمل تعديل لحقل معين فى الداتا بيز بالاستخدام فيجوال بيسك دوت نت
واكسس
============================
وعايز تصليح هذا الكود
Dim ConStr As String = "Provider"
Dim x As String
Dim Conn As New OleDbConnection(ConStr)
Dim DataSet1 As New DataSet
Dim SQLstr As String
x = InputBox("TTT")
SQLstr = "SELECT * FROM Table1 WHERE name= '" & x & "'"
Conn.Open()
Dim DataAdapter1 As New OleDbDataAdapter(SQLstr, Conn)
DataAdapter1.Fill(DataSet1, "Table1")
Conn.Close()
If Me.BindingContext(DataSet1, "Table1").Count = 0 Then
MsgBox("no ")
Else
MsgBox("yes ")
Exit Sub
End If
هذا الكود يعمل بحث فقط
وانما هو لا يضع بيانات داخل
text1, text2,text3
وانا قرأت درس لاخ هو عامل كتاب حلو جدا
بس المشكلة انو عامل كود بحض بوضع البيانات داخل داتا جريد
وانا مش عاوز وضع بيانات داخل داتا جريد
انا عاوز بعد اتمام عملة البحض توضع البيانات التى تم البحث عن داخل التيكست
اتمنى ان تساعدونى