تقييم الموضوع :
  • 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 151 22-04-16, 10:51 PM
آخر رد: اسلام الكبابى
  أريد كودآ سهلآ بدلآ من هذا الكود الغبى اسلام الكبابى 2 427 13-04-15, 08:00 PM
آخر رد: اسلام الكبابى
  اضافة سجل باستخدام الكود اسلام الكبابى 1 522 25-03-15, 09:05 PM
آخر رد: اسلام الكبابى
  كتابة كود داخل الاكسس بواسطه الكود من الفيجوال hagasoft 1 719 28-07-13, 12:13 AM
آخر رد: hskurd
  ما الخطأ في هذا الكود Ahmed Abdulla 7 1,482 25-05-13, 10:58 PM
آخر رد: Ahmed Abdulla
  تعديل علي هذا الكود Ahmed Abdulla 9 1,278 22-05-13, 10:00 AM
آخر رد: Ahmed Abdulla
  ما الخطأفي الكود التالي ado كمبو بوكس المبرمج البسيط 12 1,120 27-04-13, 12:18 PM
آخر رد: تركي الحلواني
  تصحيح كود للبحث عن طريق اداة adodc مبرمج بلا حدود 4 843 22-04-13, 06:36 PM
آخر رد: مبرمج بلا حدود
  برنامج لصنع ( تكوين ) قاعدة بيانات أكسس من خلال الكود Ahmad Jawad 5 1,005 03-03-13, 02:19 AM
آخر رد: zar9awi06
  ado : ما الخطأ في الكود هذا المبرمج البسيط 2 471 10-02-13, 11:09 AM
آخر رد: تركي الحلواني

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


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