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

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

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


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


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  مطلوب كود التقاط صورة من الكاميرا وادراجه في بكتشر samira20 1 61 07-12-19, 07:26 PM
آخر رد: محمد كريّم
  سؤال عن طباعة wanna_know 2 83 03-12-19, 03:17 AM
آخر رد: اسامه الهرماوي
  [كود] مبتدئ : اخواني كيف احفظ list box الى ملف Text malek369 5 110 02-12-19, 01:36 PM
آخر رد: معاند الحظ
  كود لرفع صورة على الفيس بوك ابو روضة 11 469 30-11-19, 12:24 PM
آخر رد: ابو روضة
  [VB.NET] طباعة صورة اسامه الهرماوي 0 63 27-11-19, 02:35 PM
آخر رد: اسامه الهرماوي
  كيف أفتح كل صورة من رابط داخل البيكتر بوكس bidaya 8 235 18-11-19, 09:21 PM
آخر رد: 3booody
  [VB.NET] طباعة تقرير ريبورت فيو في طابعتين في نفس الوقت larbihamri 4 170 30-10-19, 02:12 PM
آخر رد: larbihamri
Exclamation [VB.NET] ثلاثة ايام من المحاولة , >الفاشلة< : كود تصوير 60 صورة في الثانية SnTnt 8 269 29-10-19, 12:04 AM
آخر رد: SnTnt
  [VB.NET] تحديد مكان في صورة اللورد محمود 7 278 12-10-19, 03:36 AM
آخر رد: ميدو الفنان
  الرجاء المساعده فى عمل زر يقوم بتغيير صورة الفورم الى صورة اخرى من Resources على زهران 13 594 05-10-19, 12:16 PM
آخر رد: alshandodi

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


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