تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
سؤال : رجاء اريد اتمام كود الجمع التالي ....
#1
السلام عليكم

كنت اطبق الدالة sum في فيجوال 6 على النحو التالي

SQL = "SELECT sum(km) as my_sum from Hesab where sen = '" & Text57.Text & "' ....الخ
 
 Set T5 = D1.OpenRecordset(SQL, dbOpenDynaset)

  Text59.Text = T5.Fields("my_sum")

كيف تصبح في فيجوال نت 11  ارجو تعديل التالي

        T1 = D1.OpenRecordset("Tabel", dao.RecordsetTypeEnum.dbOpenTable)
        sql = "SELECT sum(km) as km FROM Tabel where idm = '" & M & "' and rmzf = 'mmsh' ORDER BY id"
        T1 = D1.OpenRecordset(sql, , dao.RecordsetTypeEnum.dbOpenTable)
       
        KM = sql

شكرا
الرد
تم الشكر بواسطة:
#2
الرد
تم الشكر بواسطة: عبد العزيز البسكري , mh66 , ابو انس



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


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