تقييم الموضوع :
  • 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
الشكر لله والحمد لله
والحمد لله على كل حال

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

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


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


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  جلب صورة البروفيل anes 3 88 18-07-19, 02:28 AM
آخر رد: bakriano30@yahoo.com
  طباعة ارقام باللغة العربية Hassan.syria 7 177 17-07-19, 11:12 AM
آخر رد: Hassan.syria
  طباعة داتا جريد فيو alshandodi 4 204 12-07-19, 01:36 AM
آخر رد: ابراهيم ايبو
  [سؤال] كيف نطبع صورة بحجم الورقة زيد 9 3,341 15-06-19, 04:23 PM
آخر رد: elgokr
  [سؤال] كيف اجلب احداثيات الماوس بالنسبة لكونترول معين ولتكن صورة ابراهيم ايبو 5 216 31-05-19, 04:15 AM
آخر رد: sami4
  هل يمكن طباعة التقرير في كريستال ريبورت مباشرة دون عرض التقرير abu.hanen4u 4 206 31-05-19, 01:15 AM
آخر رد: sami4
  كيفية طباعة الفواتير الريسيت alipro 0 139 30-05-19, 01:41 AM
آخر رد: alipro
  [سؤال] كيف اضافة صورة عن طريق الاسكانر وهج الصحراء 2 208 19-04-19, 12:42 PM
آخر رد: elgokr
  أريد مثال علي كيفية التعرف علي وجه شخص من خلال فديواو صورة ؟ PeterGhattas082460 3 244 18-04-19, 06:04 AM
آخر رد: محمد كريّم
  [كود] طريقة البحث عن صورة في قاعدة البيانات access باستعمال صورة أخرى technomedia 6 323 20-02-19, 04:01 PM
آخر رد: elgokr

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


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