[vb6.0] طلب: كيفية عمل طباعة لملف الوورد بواسطة الطباعة الإفتراضية للحاسوب - نسخة قابلة للطباعة +- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb) +-- قسم : قسم لغات البرمجة الاخرى (http://vb4arb.com/vb/forumdisplay.php?fid=4) +--- قسم : قسم لغة vb6.0 (http://vb4arb.com/vb/forumdisplay.php?fid=18) +--- الموضوع : [vb6.0] طلب: كيفية عمل طباعة لملف الوورد بواسطة الطباعة الإفتراضية للحاسوب (/showthread.php?tid=13668) |
طلب: كيفية عمل طباعة لملف الوورد بواسطة الطباعة الإفتراضية للحاسوب - hamada salah90 - 31-10-15 السلام عليكم ورحمة الله وبركاته
لدي كود لفتح ملف الوورد وهو
Static MonWd As Word.Application
Static wmonwd As Word.Document
Set MonWd = New Word.Application
MonWd.Visible = True
Dim z
z = List1.Text
Set wmonwd = MonWd.Documents.Open(App.Path & "\Tests\" & (z) & ".doc")
With wmonwd
ولدي ايضا كود لحفظ ملف الوورد وهو
.SaveAs FileName:=App.Path & "\Tests\Archeive\" & Trim$(txtCode.Text) & " " & Trim$(z) & ".doc"
'======--------------------=============------------==============
End With
Set MonWd = Nothing
Set wmonwd = Nothing
ولكن أريد كود لطباعة الملف الذي تم فتحه وحفظه سابقا
وهذا مثال مرفق
RE: طلب: كيفية عمل طباعة لملف الوورد بواسطة الطباعة الإفتراضية للحاسوب - administrator - 31-10-15 PHP كود : MonWd.PrintOut RE: طلب: كيفية عمل طباعة لملف الوورد بواسطة الطباعة الإفتراضية للحاسوب - hamada salah90 - 31-10-15 شكراااا RE: طلب: كيفية عمل طباعة لملف الوورد بواسطة الطباعة الإفتراضية للحاسوب - administrator - 31-10-15 (31-10-15, 08:40 PM)hamada salah90 كتب : شكراااا العفو |