أبو ألين قام بنشر أبريل 13, 2022 مشاركة قام بنشر أبريل 13, 2022 السلام عليكم ورحمة الله وبركاته، الاساتذه الفضلاء. هل كتابة عبارة SQL بهذه الطريقة وداخلها دالة .. هل تعمل بهذا الشكل وتكون صحيحة ام ينقصها شي لأني لم اعرف ماهو الخلل يعطيني خطأ Object Required . Forms!MainScreen!lstLastTrans.RecordSource = "SELECT TransactionsT.TransID, TransactionsT.idEmp, TransactionsT.TransSubject,TransactionsT.TransCreatedOn='" & DateDiff("dd", TransactionsT.TransCreatedOn, Now()) & "'AS [ãÏÉ ÇáãÚÇãáÉ],TransToDept FROM TransactionsT" & _ "WHERE TransSubject Is Not Null AND TransStatus Not Like 'ãäÊåíÉ' AND TransType Is Not Null AND TransTitle Is Not Null" & _ "ORDER BY TransID DESC ,TransCreatedOn='" & DateDiff("dd", TransactinosT.TransCreatedOn, Now()) & "'DESC; " رابط هذا التعليق شارك More sharing options...
Eng.Qassim قام بنشر أبريل 13, 2022 مشاركة قام بنشر أبريل 13, 2022 جرب الجملة التالية ..فقط قم بتغيير 'b' بالعبارة لديك لانها غير مفهومة Forms!MainScreen!lstLastTrans.RowSource = "SELECT TransactionsT.TransID, TransactionsT.idEmp, TransactionsT.TransSubject, TransactionsT.TransCreatedOn, TransactionsT.TransToDept, TransactionsT.TransStatus, TransactionsT.TransType, TransactionsT.TransTitle, DateDiff(""d"",[TransactionsT]![TransCreatedOn],Now()) AS TransCreatedOn1 " & vbCrLf & _ "FROM TransactionsT " & vbCrLf & _ "WHERE (((TransactionsT.TransSubject) Is Not Null) AND ((TransactionsT.TransStatus) Not Like 'b') AND ((TransactionsT.TransType) Is Not Null) AND ((TransactionsT.TransTitle) Is Not Null)) " & vbCrLf & _ "ORDER BY DateDiff(""d"",[TransactionsT]![TransCreatedOn],Now()) DESC;" 1 رابط هذا التعليق شارك More sharing options...
أبو ألين قام بنشر أبريل 14, 2022 الكاتب مشاركة قام بنشر أبريل 14, 2022 عملت بشكل رائع استاذي الف الف شكر. لدي نفس الجملة السابقة، ولكن اضفت لها شرط واعتقد ان المشكلة في هذا السطر .. ((TransactionsT.TransToDept) Like" & Forms!MainScreen!txtDepartment & ")) هل بالامكان تصحيحه اذا تكرمت .. شكرا جزيلا لكم رابط هذا التعليق شارك More sharing options...
ابو جودي قام بنشر أبريل 14, 2022 مشاركة قام بنشر أبريل 14, 2022 ممكن مرفق من القاعدة وتحديد مكان العمل فيها الذى يحوى تلك المشكلة وياريت شرح مبسط للنتيجة اللى حضرتك تحتاج الوصول اليها 1 رابط هذا التعليق شارك More sharing options...
أفضل إجابة Moosak قام بنشر أبريل 14, 2022 أفضل إجابة مشاركة قام بنشر أبريل 14, 2022 12 ساعات مضت, uzer said: ((TransactionsT.TransToDept) Like" & Forms!MainScreen!txtDepartment & ")) جرب هذا : ((TransactionsT.TransToDept) Like '" & Forms!MainScreen!txtDepartment & "'")) 1 رابط هذا التعليق شارك More sharing options...
أبو ألين قام بنشر أبريل 14, 2022 الكاتب مشاركة قام بنشر أبريل 14, 2022 7 دقائق مضت, Moosak said: جرب هذا : ((TransactionsT.TransToDept) Like '" & Forms!MainScreen!txtDepartment & "'")) الف الف شكر استاذي موسى .. الان عمل الكود بشكل رائع .. يعطيك الف عافية .. ❤️ 1 رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
من فضلك سجل دخول لتتمكن من التعليق
ستتمكن من اضافه تعليقات بعد التسجيل
سجل دخولك الان