عبيد شهاب قام بنشر يوليو 10, 2005 قام بنشر يوليو 10, 2005 (معدل) بسم الله الرحمن الرحيم السلام عليكم ورحمة الله وبركاته الاخوة الافاضل كيف يمكنني انشاء نموذج اكسس اطلب منه طباعة ملف وورد من خلال زر امر او ارتباط تشعبي واوكد " طباعة " وليس معاينة اي بمجرد الضغط على زر الامر يتم ارسال ملف الوورد الى الطابعة . بارك الله فيكم وارجو الرد السريع للحاجة . تم تعديل يوليو 10, 2005 بواسطه obaid70
الدكتور خضر الرجبي قام بنشر يوليو 10, 2005 قام بنشر يوليو 10, 2005 السلام عليكم أخي obaid70 ، بارك الله فيك كنت قد أرفقت مثالا عن فتح ملف وورد من أكسيس وسالني أحدهم عن كيفية طباعة الملف تلقائيا ، هنا الموضوع الذي ستجد فيه التفاصيل . أملا أن يحقق مطلبك ومتمنيا لك يوما سعيداً. مع الاحترام والتقدير
عبيد شهاب قام بنشر يوليو 11, 2005 الكاتب قام بنشر يوليو 11, 2005 (معدل) بسم الله الرحمن الرحيم بارك الله فيك اخي خضر وجزاك الف خير وزادك علماً ونورا ولكن ارجو ان تكمل معروفك وتضيف زر الطباعة الى المثال المرفق . وبالنسبة لمثال الاخت المبدعة زهرة هو ما اريده بالضبط ولكني لم اعرف كيف استفيد منه انا لدي مجلد يحوي على عشرة ملفات وورد واريد ان اضع لكل ملف زر امر بحيث اطبع الملف الذي احتاجه بضغط الزر الخاص به اريد ان يتم تعديل المثال وفق هذا الشئ . وجزاكم الله خيرا . تم تعديل يوليو 11, 2005 بواسطه obaid70
الدكتور خضر الرجبي قام بنشر يوليو 11, 2005 قام بنشر يوليو 11, 2005 السلام عليكم حياك الله أخي obaid ، ولكني ارجو منك فضلاً زيارة الموضوع مرة أخرى حيث تم الاضافة عليه مؤخراً بفكرة رائعة من اختنا الخبيرة زهرة. مع الاحترام والتقدير
عبيد شهاب قام بنشر يوليو 11, 2005 الكاتب قام بنشر يوليو 11, 2005 وعليكم السلام اخي خضر يبدو انني قمت بتعديل الرد قبل ان اتلقى ردك الاخير بصراحة فوجئت بهذا الرد السريع منك بارك الله فيك ارجو العودة الى قراءة الرد السابق بعد تعديله ومشكور مرة ثانية على هذه الاستجابة الرائعة .
الدكتور خضر الرجبي قام بنشر يوليو 11, 2005 قام بنشر يوليو 11, 2005 السلام عليكم أخي obaid70 ، بارك الله فيك هذا هو الملف المرفق في المشاركة وفيه المثال الذي يقوم بالطباعة مباشرة لملفات الوورد. مع الاحترام والتقدير DR.rar
عبيد شهاب قام بنشر يوليو 12, 2005 الكاتب قام بنشر يوليو 12, 2005 اخي الكريم الملف هذا عندي منذ وصول المشاركة 2 لكن المشكلة ان هذا النموذج لا يطبع إلا العبارة التي وضعتها الاخت زهرة وهي عبارة الترحيب رغم انني قمت بتغيير المسار وكذلك غيرت اسم الملف والنتيجة هي دائما عبارة الترحيب واريد ان اسأل هل حاولت اجراء تجربة على ملف خاص بك ؟ اذا لم تجرب فحاول واخبرني بالنتيجة وفقك الله .
الدكتور خضر الرجبي قام بنشر يوليو 12, 2005 قام بنشر يوليو 12, 2005 السلام عليكم حياك الله أخي obaid70 ، قمت بتعديل الملف ليعمل بسهولة كما تريد فقط في حدث النقر لزر الأمر غير اسم ودليل الملف ، وإن شاء الله سيعمل كما تريد مع الاحترام والتقدير DR_fix1.rar
عبيد شهاب قام بنشر يوليو 12, 2005 الكاتب قام بنشر يوليو 12, 2005 (معدل) بسم الله الرحمن الرحيم الشكر كل الشكر لك اخي خضر وبارك الله فيك على هذا الاهتمام والتواصل واسمح لي ان اطمع بكرمك وان اطلب منك هذا الطلب الاخير بالنسبة لهذا الموضوع ان شاء الله تعالى : كيف يمكن اضافة ازرار اخرى لطباعة مستند ثاني وثالث ورابع ......الخ لكل مستند اسم خاص به والى نفس النموذج طبعا . تم تعديل يوليو 12, 2005 بواسطه obaid70
الدكتور خضر الرجبي قام بنشر يوليو 12, 2005 قام بنشر يوليو 12, 2005 السلام عليكم أخي obaid70 ، بارك الله فيك 1. اعمل زر جديد . 2. في حدث عند النقر للزر الجديد ، أطلب الإقتران نفسه مع تغيير اسمه فقط ودليل الملف الجديد وهكذا لكل الأزرار. مع الاحترام والتقدير
عبيد شهاب قام بنشر يوليو 12, 2005 الكاتب قام بنشر يوليو 12, 2005 السلام عليكم لم تنجح معي التجربة ياريت ترسلي المثال بعد تعديله . يعني انت اعمل زر جديد وطبّق عليه الاقتران الله يبارك فيك .
الدكتور خضر الرجبي قام بنشر يوليو 12, 2005 قام بنشر يوليو 12, 2005 السلام عليكم أخي obaid70 ، حياك الله في المرفق ستجد أنني قمت بتصميم 10 أزرار لطباعة الملفات العشرة التي تريدها الطريقة التي تضع بها اسم الملف المطلوب هي كما يلي ، لنقل أنك تريد عند الضغط على زر طباعة الملف الثاني أن تطبع الملف الذي اسمه obaid.doc ملف وورد والموجود في الدليل الرئيس لجهاز التخزين :C ، فتقوم بما يلي : 1. تدخل لوضع التصميم للنموذج 2. تضغط على زر الماوس اليمين فوق زر الأمر الملف الثاني وتختار الخصائص properties من الصندوق الذي سيظهر وثم ستظهر لك الصوورة التالية : وبعدها تختار لسان التبويب حدث event وتدخل إلى إجراء حدث عند النقر وحينها سيظهر لك الكود التالي : Private Sub doc2_Click() Dim WordObj As Object Set WordObj = CreateObject("Word.Application") WordObj.Documents.Open "C:\file1.doc" WordObj.PrintOut Background:=False WordObj.Quit Set WordObj = Nothing End Sub تغير اسم الملف فقط من file1.doc إلى obaid.doc وسيعمل معك البرنامج بإذن الله كما تود. تعمل نفس الشيء مع باقي الأزرار لتحدد أسماء الملفات التي تود طباعتها. مع الاحترام والتقدير DR_fix2.rar 1
عبيد شهاب قام بنشر يوليو 13, 2005 الكاتب قام بنشر يوليو 13, 2005 السلام عليكم الاستاذ خضر المحترم بارك الله فيك على هذا المجهود اتعبتك معاي لكن في النهاية هذا هو المطلوب جزاك الله الف خير وجعله في ميزان اعمالك وارجو ان لا ازعجك ان احتجتك في مسائل اخرى شكرا استاذي خضر
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.