اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

اضافة معيار علي جملة 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
رابط هذا التعليق
شارك

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

زائر
اضف رد علي هذا الموضوع....

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

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

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

Important Information