بحثت عن المفتاح htmlfile في الرجستري (تحت أول مفتاح رئيسي) ثم المفتاح shell فوجدت ما يلي :
"C:\Program Files (x86)\Microsoft Office\Office14\msohtmed.exe" /p %1
مما يعني أن الباراميتر لـ طباعة ملفات html هو نفسه p/ الذي استعملناه لـ طباعة file.txt بالـ Notepad
و فيما يخص البرنامج الذي يقوم بطباعة ملفات html حسبما يقول الرجستري الموضح أعلاه فهو msohtmed.exe
و بناءً على ذلك قمت بتحرير الكود كما يلي :
مسحت Notepad.exe وكتبت مكانها msohtmed.exe و أبقيت على p/ دون تغيير
فأصبح كما يلي :
و فيما يخص البرنامج الذي يقوم بطباعة ملفات html حسبما يقول الرجستري الموضح أعلاه فهو msohtmed.exe
و بناءً على ذلك قمت بتحرير الكود كما يلي :
مسحت Notepad.exe وكتبت مكانها msohtmed.exe و أبقيت على p/ دون تغيير
فأصبح كما يلي :
PHP كود :
[align=left]Public Class Form1
Sub PrintTextFile(ByVal filePath As String)
Dim psi As New ProcessStartInfo(Environment.GetFolderPath(Environment.SpecialFolder.System) & "\msohtmed.exe")
psi.Arguments = "/p " & filePath
Process.Start(psi)
End Sub
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
PrintTextFile("c:\file.txt")
End Sub
End Class[/align]
و لكن ظهرت لي رسالة خطأ تقول :
Win32Exception was unhandled
The system cannot find the file specified
كما بالصورة التوضيحية التالية :
http://s21.postimg.org/lcj9bgh5z/image.png
فقمت بتغيير السطر :
Win32Exception was unhandled
The system cannot find the file specified
كما بالصورة التوضيحية التالية :
http://s21.postimg.org/lcj9bgh5z/image.png
فقمت بتغيير السطر :
PHP كود :
Dim psi As New ProcessStartInfo(Environment.GetFolderPath(Environment.SpecialFolder.System) & "\msohtmed.exe")
و جعلته كما يلي :
PHP كود :
Dim psi As New ProcessStartInfo("C:\Program Files (x86)\Microsoft Office\Office14\msohtmed.exe")
فاشتغل البرنامج بنجااااح 100% 
يا ترى ما الخطأ في السطر المذكور ؟

يا ترى ما الخطأ في السطر المذكور ؟
