برنامج إنشاء ملفات المساعدة وكود تشغيل الملف

هل ترغب بعمل ملف مساعدة في برنامجك؟؟؟

أولا: اعمل فورم ما في قاعدة بياناتك..

ثانيا: ضع عليه زر واجعل اسمه Help

ثالثا: انسخ الكود الحالي وضعه داخل مكان كتابة الكود..

(طبعا بعد انشاء ملف المساعدة باستخدام البرنامج الخاص بذلك )

لتنزيل البرنامج الخاص بعمل ملفات ال المساعدة اذهب الى الموقع التالي:

http://www.auricvisions.com/download.htm

مع امنياتي لكم بالتوفيق

Option Compare Database

Private Enum ShowWindowType

    SW_HIDE = 0

    SW_NORMAL = 1

    SW_MINIMIZED = 2

    SW_MAXIMIZED = 3

End Enum



Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As ShowWindowType) As Long



Public Sub RunAssociated(sFileName As String, Optional sParams As String = "", Optional sDefaultDir As String = "")

    Dim lrc As Long

    lrc = ShellExecute(Me.hwnd, "Open", sFileName, sParams, sDefaultDir, SW_NORMAL)

End Sub

Private Sub Help_Click()

RunAssociated ("D:Fashionhelp.hlp")

End Sub