باز کردن فایل با پسوند htm

[hosein3000]

سلام دوستان
یک فایل وب با نام test.htm دارم می خوام از طریق وی بی این فایل رو که توی پوشه اصلی نرم افزار هست توی اینترنت اکسپلورر باز کنم
میشه بفرمایین کدش چطوری میشه؟>

[سید حمید حق پرست]

سلام
دوست عزیز شما میتونید از نمونه کد زیر استفاده کنید :

WebBrowser1.Navigate "C:\test.html"

موفق باشید


یا علی (ع)

[محسن واژدی]

سلام علیکم
اگر میخواهید فایل در webbrowser بازکنید از کدی که آقای حق پرست قرار دادند میتوانید استفاده کنید، و اگر میخواهید در IE نمایش دهید هم میتوانید از کد زیر و هم از ShellExecute استفاده کنید:

Private Sub Command1_Click()

    Shell Environ("ProgramFiles") & "\Internet Explorer\iexplore.exe """ & App.Path & "\test.html"""

End Sub

موفق باشید

[just4froum]

با سلام اگر هم می خواهید که در مرورگر default ویندوز نشون بدید از این کد استفاده کنید.

Private Sub Command1_Click()

    Shell "explorer """ & App.Path & "\test.htm"""

End Sub

[Beginner2013]

با سلام اگر هم می خواهید که در مرورگر default ویندوز نشون بدید از این کد استفاده کنید.

Private Sub Command1_Click()

    Shell "explorer """ & App.Path & "\test.htm"""

End Sub

سلام.مرورگر دیفالت من ff هست ولی کد شما منجر به اجرای ie میشه.

[just4froum]

سلام.مرورگر دیفالت من ff هست ولی کد شما منجر به اجرای ie میشه.

با سلام من الان چک کردم ولی به درستی با FireFox باز می کنه.

شاید default نمباشه لطفا دوباره امتحان کنید.

[محسن واژدی]

همانطور که در پست قبل هم عرض کردم میتوانید از ShellExecute هم استفاده کنید، در اینصورت فایل در مرورگر پیش فرض ویندوز باز میشود، پست زیر را بررسی کنید:

https://barnamenevis.org/showthread.p...=1#post1486897

البته همانطورکه جناب just4froum هم اشاره کردند ممکن است fire-fox مرورگر پیش فرض ویندوزتان نباشد

موفق باشید

[hosein3000]

با سلام اگر هم می خواهید که در مرورگر default ویندوز نشون بدید از این کد استفاده کنید.

Private Sub Command1_Click()

    Shell "explorer """ & App.Path & "\test.htm"""

End Sub

با تشکر
این کد توی تمام مرورگر هایی که دیفالت تعریف می شوند کار میکنه