تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
طباعة ملف word او text او حتى صورة
#1
السلام عليكم ورحمة الله وبركاتة .....
وبعد شهر مبارك اعادة الله علينا وعليكم بالخير والبركات
.

هل من الممكن تزويدي بكود يقوم بطباعة ملف وورد او 
 ايا كان نوع الملف موجود على الجهاز

وشكرا للجميع مقدما 
الرد
تم الشكر بواسطة: ابراهيم ايبو
#2
انشي مشروع جديد
انتقل لمحرر الشفرات اكتب الشفرة التالية:
PHP كود :
Dim WithEvents PD As New Printing.PrintDocument 

اختر الاداة الجديدة من اعلى المحرر ثم الحدث كما المناسب او انسخ الشفرة التالية مباشرة:

PHP كود :
Private Sub PD_PrintPage(ByVal sender As ObjectByVal e As System.Drawing.Printing.PrintPageEventArgsHandles PD.PrintPage
        e
.Graphics.DrawImage(PictureBox1.Imagee.MarginBounds.Lefte.MarginBounds.Top)
    
End Sub 

ثم انقر الزر و اكتب الشفرة التنفيذية التالية :
PHP كود :
Private Sub Button1_Click(ByVal sender As ObjectByVal e As System.EventArgsHandles Button1.Click
        PD
.Print()
    
End Sub 

قبل كل هذا اضف زر و اداة عرض الصور (PictureBox1)
هَٰٓؤُلَآءِ قَوْمُنَا ٱتَّخَذُوا۟ مِن دُونِهِۦٓ ءَالِهَةً لَّوْلَا يَأْتُونَ عَلَيْهِم بِسُلْطَٰنٍۭ بَيِّنٍ فَمَنْ أَظْلَمُ مِمَّنِ ٱفْتَرَىٰ عَلَى ٱللَّهِ كَذِبًا
الرد
تم الشكر بواسطة: ابراهيم ايبو , حريف برمجة
#3
على مايبدو اني لم اصغ السؤال بالشكل الصحيح 

انا اريد ان يكون مسار الملف ثابت 
 
مثال 
كود :
   Dim newfile As String = Application.StartupPath & "\Sanad22.doc"
الرد
تم الشكر بواسطة: ابراهيم ايبو
#4
وعليكم السلام ورحمة الله وبركاته

استخدم الكود التالى
كود :
       Dim info As ProcessStartInfo = New ProcessStartInfo("ضع هنا مسار الملف المطلوب طباعته")
       info.Verb = "Print"
       info.CreateNoWindow = True
       info.WindowStyle = ProcessWindowStyle.Hidden
       Process.Start(info)

تحياتى لك
وتمنياتى لك التوفيق
{ وَقُل رَّبِّ زِدْنِي عِلْمًا }
[ كن على يقين من اعمالنا نخطئ ومن اخطائنا نتعلم ولذلك لا شي مستحيل ]

ساهم دائماً فى    لكل من يقوم بالمساهمة
فى حل المشكلة او الاستفسار لديك فالجميع هنا يعمل 
على مساعدة الاخرين لوجه الله وان تحتسب له اجر عند الله


 شرح كيفية عمل قاعدة بيانات تعمل على اكثر من جهاز على الشبكة الداخلية
الرد
#5
شكرا اخي الجوكر على المساعدة 

والله يكتبها في ميزان حسناتك

ويسقيك من حوض نبينا وحبيبنا محمد 

صلى الله علية وسلم
الرد
تم الشكر بواسطة: حريف برمجة , elgokr
#6
الشكر لله والحمد لله
والحمد لله على كل حال

تحياتى لك
وتمنياتى لك التوفيق
{ وَقُل رَّبِّ زِدْنِي عِلْمًا }
[ كن على يقين من اعمالنا نخطئ ومن اخطائنا نتعلم ولذلك لا شي مستحيل ]

ساهم دائماً فى    لكل من يقوم بالمساهمة
فى حل المشكلة او الاستفسار لديك فالجميع هنا يعمل 
على مساعدة الاخرين لوجه الله وان تحتسب له اجر عند الله


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


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  الرجاء المساعده فى عمل زر يقوم بتغيير صورة الفورم الى صورة اخرى من Resources على زهران 7 125 منذ 8 ساعة مضت
آخر رد: asemshahen5
  كيفية نقل صورة الى ملف وورد الرائد 3 92 11-09-19, 06:45 PM
آخر رد: الرائد
  مشكلة في طباعة باركود alshandodi 3 135 06-09-19, 06:09 PM
آخر رد: Rabeea Qbaha
  [VB.NET] اريد التعديل ع كود للكتابه ع صورة e-coder 5 198 19-08-19, 12:47 AM
آخر رد: ابراهيم ايبو
  Get connection string from text file moh8880 1 83 12-08-19, 10:35 AM
آخر رد: سعود
  مشكله في ادراج صورة لقاعدة بيانات سيكول makky 13 402 09-08-19, 11:23 AM
آخر رد: makky
  جلب صورة البروفيل anes 7 287 06-08-19, 01:29 PM
آخر رد: bidaya
  مشكلة بالكرستال ريبورت عن الضغط على زر طباعة مختار2 1 134 27-07-19, 12:53 AM
آخر رد: خالد كامل1
  [سؤال] خطاء طباعة التاريخ عكس في الوورد dell 4 254 26-07-19, 11:19 AM
آخر رد: dell
  [سؤال] كيف أنعش مربع الصورة بعد تدميرها لضرورة حذف صورة من مسار مربوط بها سعود 2 147 25-07-19, 07:16 AM
آخر رد: حريف برمجة

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم