الطـاير

Private Sub Append_Click() ' تنفيذ الكود هنا TWAIN_SetFileAppendFlag 1 TWAIN_AcquireMultipageFile 0, "C:\Users\Altayer\Desktop\Scan.PDF" End Sub الحمد لله وجدت الكود هذا وحل لي المشكلة واضافة الأوراق الى الملف الموجود بالفعل في اخر الملف المطلوب هو تعديل الكود ليضيف الأوراق الى اول الملف ؟

جزاك الله خير اخوي دروب مبرمج مثالك جميل لكن يحول الصور الى PDF ما اريده هو اضافه اوراق من الاسكانر مباشرة الى ملف PDF موجود بالفعل دون فتح الملف علما باني استخدم وسيط مساعد وهو EZTwain

يا ريت حد من اصحاب الخبرة يفيدني بالموضوع ده بقالي سنين بحاول في الكود ده

Private Sub الموضوع_DblClick(Cancel As Integer) Dim stAppName As String Dim File As String Dim YS As String File = Me.الوارد YS = Me.السنة stAppName = "C:\Program Files (x86)\Adobe\Acrobat 11.0\Acrobat\acrobat.exe \\recserver\Rec\R\wared\" & YS & "\" & File & ".pdf" Call Shell(stAppName, 1) End Sub السلام عليكم يا جماعة الخير عندي الكود هذا يفتح ملف PDF وبعد ما افتحه اقدر اضيف له أوراق من الاسكانر المطلوب : تعديل الكود لاضافة الورق لملف PDF تلقائي وحفظ الملف دون فتحة وجزاكم الله خير

جزاكم الله خير جميعا على هذا الصرح الطيب

سحاول ان شاء الله واعطيك الخبر جزاك الله خير

بالفعل انا عندي زر اخر لإضافة الملف لمسار السنة المطلوب في حالة الاضافة ان تكون الاضافة من الاسكانر للملف المخزن مباشرة ؟ هل البرنامج تبعك يدعم ذلك من الاسكنر مباشرة للملف ؟ وجزاك الله خير على تعبك ساقوم بتتبع الشرح في البرنامج المرفق وسوافيك بالنتيجة ان شاء الله دمت سالما حاولت ولكن لا يعمل الا مع ملفين موجودين بالفعل وانا اريد اضافة من الاسكانر لملف موجود

بالفعل انا عندي زر اخر لإضافة الملف لمسار السنة المطلوب في حالة الاضافة ان تكون الاضافة من الاسكانر للملف المخزن مباشرة ؟ هل البرنامج تبعك يدعم ذلك من الاسكنر مباشرة للملف ؟ وجزاك الله خير على تعبك ساقوم بتتبع الشرح في البرنامج المرفق وسوافيك بالنتيجة ان شاء الله دمت سالما

تسلم اخوي جعفر جزاك الله خير هذا كود الزر هل هو مفتوح ام لا Dim stAppName As String Dim File As String Dim YS As String File = Me.TT YS = Me.Years If Me.YesNo.Value = "no" Then MsgBox "عذرا ... ربما لم يتم سحب الملف", vbCritical, "لا يوجد ملف" DoCmd.CancelEvent Else stAppName = "C:\Program Files (x86)\Adobe\Acrobat 11.0\Acrobat\acrobat.exe \\recserver\Rec\R\wared\" & YS & "\" & File & ".pdf" Call Shell(stAppName, 1) End If

السلام عليكم اخواني واحبابي عندي برنامج سجل فيه ذر فتح ملف PFD شغال تمام وبعد ما يفتح الPDF اقدر اضيف منه اوراق زيادة بكم العمل يتطلب ذلك هل ممكن اطور الذر ده بحيث لما اضع ورق بالاسكنر واضغط على الذر يقوم تلقائي باضافة الورق لمف PDF ? وشكرا

السلام عليكم عندي نموذج فرعي به حقل (الشركات) المطلوب هو عند اضافة القيمة "الشركات الكبرى" في حقل (الشركات) يقوم هو مباشرة بأضافة عدد سجلات الشركات الكبرى الموجودة لدى اياً كان عددها كل شركة على حدا في سجل لوحدها وجزاكم الله خير

جزاك الله خير شاهد الصورة تعرف الحل New Picture.bmp

هل من حل او فيه احد مرت عليه ؟

اذا كانت النسخة مفتوحة فانت قطعت الربط ولازم المستخدم يقفل اجباري واذا حاول يفتح ثاني لا تفتح النسخة ابدأ ، صارلي سنوات احاول فيها ماكو فايده

السلام عليكم احبابي - عندي برنامج شؤون موظفين يعمل على شبكة داخلية بشكل يومي من قبل مجموعة من المستخدمين عن طريق وضع شورت كت على اجهزتهم - انا بطور في البرنامج بشكل شبة يومي طبعا على نسخة خارجية - طبعا بعد ما اطور عليها بقوم بنسخها فوق القديمة استبدال يعني وعشان اعمل كدة لازم اطلب من الجميع اغلاق البرنامج عشان اقدر اضع النسخة المطورة بدون حدوث مشاكل . السؤال بقى : هل عشان كل مرة احط نسخة مطورة من البرنامج لازم اطلب من الجميع اغلاق البرنامج ، ولو حصل وحطيت النسجة بدون ما حد يقفل الدنيا تتبهدل ومحدش يعرف يفتخها تاني ويحصل مشاكل فيها ؟ هل فيه طريقة سهله ؟ وجزاكم الله خير

السلام عليكم اخواني الاحباب عندي كود عرض الكتب بي دي اف PDF الكود شغال تمام في نفس النموذج لكن اريد تعديله لظهر في نموذج اخر فرعي اريد التعديل هنا Me.AcroPDF0.LoadFile ("\\recserver\Rec\R\Wared\" & Me.[yeae] & "\" & Me.[file] & ".PDF")

الله يفتح عليك يا استاذ وائل يا غالي جزاك الله خير

السلام عليكم اخواني الاحباب ان شاء الله طلب بسيط : لدي حقل نص واريده ان يلتزم بعدد ارقام معينة 14 رقم قومي لا يزيد ولا يقل عنهم ، حتى لا يكون هناك خطأ من المستخدم في عملية ادخال البيانات وجزاكم الله خير

جزاك الله خير اخوي صالح ان بالفعل شوفت مثال نفس هذا في المنتدى لكن اريد ان يبحث في نفسه دون اللجوء اللى وضع مربع نص غير منضم آخر لأن هذه العلمية تسببت في بطئ شديد في البرنامج اثناء البحث

السلام عليكم اخواني الاحباب بحثت كثير قبل كتابة الموضوع ووجدت نماذج قريبة من بحثي لكن لم تفي بالغرض كل ما اريده هو بحث (اثناء الكتابة) داخل كومبو بوكس أي لو كتبت مثلا حرف "ب" يفلتر كل القيم الموجود بها حرف "ب" ثم اقوم يعني الحدث يكون في On change يعمل Dropdown وجزاكم الله خير

اخوي انا اسأل فيه حل ؟ وين اصحاب الخبرة جزاكم الله خير

فيه حل ؟؟؟

السلام عليكم يا جماعة لفيت لفيت عشان الاقس طريقة لعمل مينو بار في اكسس 2010 مش لاقي نفس اللي في الصورة هل من طريقة لعملها جزاكم الله خير

جزاكم الله خير يا جماعة الخير لقد وجت الحل في هذاالموضوع جزاكم الله خير يا جماعة الخير لقد وجت الحل في هذاالموضوع لكلن بقي شي بسيط وهو ان حساب الايام بيكون ناقص يوم ؟؟؟

السلام عليكم يا جماعة عندي برنامج شؤون موظفين مطلوب مني معرفة عدد ايام الاجازات لسنة 2015 لكل موظف وكذلك الطبيات والغيابات .... الخ فقط داخل سنة 2015 مثال : يعني لو موظف اخذ اجازة 10 ايام من 27/12/2014 إلى 5/1/2015 كل ما اريد هو مجموع 5 ايام في 2015 ويتجاهل ما اخذه في 2014 هل يوجد موديل تقوم بحساب هذا الشرط ؟ وجزاكم الله خير