اذهب الي المحتوي
أوفيسنا

اضافة معيار علي جملة select


ِAbo_El_Ela
إذهب إلى أفضل إجابة Solved by jjafferr,

الردود الموصى بها

  • أفضل إجابة

وعليكم السلام 🙂

 

الظاهر هذا الكود في VBA ، فخليني اعلمك كيف تصطاد🙂

 

اجعل كودك هكذا :

dim mySQL as string

mySQL="SELECT * FROM tblVacation where (((tblVacation.emp_code)= " & [TempVars]![EmpIdTemp] & " )) ORDER BY vacationstartdate Asc;"

debug.print mySQL

.

في اسفل النافذة بتحصل على كود مثل التالي:

SELECT * FROM tblVacation where (((tblVacation.emp_code)= 1234 )) ORDER BY vacationstartdate Asc;

.

انسخ الكود ،

افتح استعلام جديد ، ولما تجيك نافذة اختيار الجداول ، اغلق النافذة ، 

ثم انقر بالفأرة اليمين في منتصف الاستعلام ، واختار SQL

الصق الكود اعلاه ،

ثم اختار Design ، فتحصل على استعلام عادي ،

واضف الشرط الجديد ،

ثم انقر الزر اليمين ، و اختار SQL مرة اخرى ، فتحصل على الكود المطلوب :

1590.gif.1d4f750d056b7d5ad9566b2e4038f017.gif

.

والآن يمكن تنظيف الكود كالتالي:

من
SELECT [VacationLife] AS Expr1, *
FROM tblVacation
WHERE ((([tblVacation].[emp_code])=1234) AND (([VacationLife])="سارية"))
ORDER BY vacationstartdate;

الى
SELECT [VacationLife], * FROM tblVacation WHERE [emp_code]=1234 AND [VacationLife]='سارية' ORDER BY vacationstartdate


ثم الى
"SELECT [VacationLife], * FROM tblVacation WHERE [emp_code]= " & [TempVars]![EmpIdTemp] & " AND [VacationLife]='سارية' ORDER BY vacationstartdate"

 

  • Like 1
رابط هذا التعليق
شارك

من فضلك سجل دخول لتتمكن من التعليق

ستتمكن من اضافه تعليقات بعد التسجيل



سجل دخولك الان
  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information