تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
تصحيح هذا الكود
#1
أرجو كتابة الجملة الناقصة فى هذا الكود


كود:
AValue1 = txtFields(1).Text: AValue2 = txtFields(2).Text
Set RS1 = New ADODB.Recordset
RS1.Open "select * FROM " & ATablee & " WHERE (" & AField1 & " = " & CStr(AValue1) & ") ", DB, adOpenStatic, adLockReadOnly
If RS1.RecordCount = 0 Then CORRECT = 0: GoTo 25
Set RS2 = New ADODB.Recordset
RS2.Open "select * FROM " & ATablee & " WHERE (" & AField2 & " = " & CStr(AValue2) & ") ", DB, adOpenStatic, adLockReadOnly

RSend.Open
RS2 ما يحقق شرط RS1 أريد كتابة الجملة السابقة بمعنى اختر من
RS1 ما يحقق شرط RS2 أو بمعنى اختر من
أو بمعنى اختر من قاعدة البيانات ما يحقق الشرطين معآ

Adodc1.RecordSource = RS.Source
GoTo 50

25 Z = MsgBox("لا يوجد أى سجلات", vbOKOnly, "")
50 End Sub
أريد استكمال الكود بتعديل جملة الRSend
ولا أريد الكود فى جملة واحدة كهذه


كود:
RSend.Open "select * FROM " & ATablee & " WHERE (" & AField1 & " = " & CStr(AValue1) & ") and (" & AField2 & " = " & CStr(AValue2) & ")", DB, adOpenStatic, adLockReadOnly

ولكم ألف شكر
الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  خطأ فى الكود 2147217865- اسلام الكبابى 2 327 22-04-16, 10:51 PM
آخر رد: اسلام الكبابى
  أريد كودآ سهلآ بدلآ من هذا الكود الغبى اسلام الكبابى 2 753 13-04-15, 08:00 PM
آخر رد: اسلام الكبابى
  اضافة سجل باستخدام الكود اسلام الكبابى 1 742 25-03-15, 09:05 PM
آخر رد: اسلام الكبابى
  كتابة كود داخل الاكسس بواسطه الكود من الفيجوال hagasoft 1 845 28-07-13, 12:13 AM
آخر رد: hskurd
  ما الخطأ في هذا الكود Ahmed Abdulla 7 1,722 25-05-13, 10:58 PM
آخر رد: Ahmed Abdulla
  تعديل علي هذا الكود Ahmed Abdulla 9 1,572 22-05-13, 10:00 AM
آخر رد: Ahmed Abdulla
  ما الخطأفي الكود التالي ado كمبو بوكس المبرمج البسيط 12 1,387 27-04-13, 12:18 PM
آخر رد: تركي الحلواني
  تصحيح كود للبحث عن طريق اداة adodc مبرمج بلا حدود 4 1,041 22-04-13, 06:36 PM
آخر رد: مبرمج بلا حدود
  برنامج لصنع ( تكوين ) قاعدة بيانات أكسس من خلال الكود Ahmad Jawad 5 1,171 03-03-13, 02:19 AM
آخر رد: zar9awi06
  ado : ما الخطأ في الكود هذا المبرمج البسيط 2 598 10-02-13, 11:09 AM
آخر رد: تركي الحلواني

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


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