مشکل باز شدن وب سایت به صورت minimize

[imanx7]

سلام !

میخوام که یه وب سایت رو توسط Shell به صورت minimize باز کنم ولی هر کاری میکنم minimize باز نمیشه ! نمیدونم مشکلش چیه !اگه امکانش هست راهنمایی کنید
ممنون

Shell("explorer http:\\www.google.com ,vbMinimizedNoFocus ")

[vbhamed]

سلام
Shell "c:\Program Files\Internet Explorer\iexplore.exe www.google.com", vbMinimizedNoFocus

[karasystem]

سلام !

میخوام که یه وب سایت رو توسط Shell به صورت minimize باز کنم ولی هر کاری میکنم minimize باز نمیشه ! نمیدونم مشکلش چیه !اگه امکانش هست راهنمایی کنید
ممنون

Shell("explorer http:\\www.google.com (http://www.google.com) ,vbMinimizedNoFocus ")

Shell "c:\Program Files\Internet Explorer\iexplore.exe www.google.com", vbMinimizedNoFocus



موفق باشید

[imanx7]

خیلی ممنون از راهنمایی تون ولی اگه بخوام با مرورگر پیشفرض سیستم باز کنم باید چی کار کنم ؟!
این کدی که زحمتش رو کشیدین فقط برای IE

[Dr Saeed]

خیلی ممنون از راهنمایی تون ولی اگه بخوام با مرورگر پیشفرض سیستم باز کنم باید چی کار کنم ؟!
این کدی که زحمتش رو کشیدین فقط برای IE

اینو رو ماژول بنویس

Dim a As String
Dim b As String
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 Long) As Long
Const SW_SHOWNORMAL = 1
Private Type tagInitCommonControlsEx
lngSize As Long
lngICC As Long
End Type
Private Declare Function InitCommonControlsEx Lib "comctl32.dll" _
(iccex As tagInitCommonControlsEx) As Boolean
Private Const ICC_USEREX_CLASSES = &H200




اینم کد استفاده تو برنامه

Dim s As String
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 Long) As Long
Private Sub Command1_Click()
ShellExecute Me.hwnd, vbNullString, "www.google.com", vbMinimizedNoFocus, "C:\", SW_vbMinimizedNoFo
End Sub


Private Sub Form_Load()


End Sub

فقط یادم نیس چجوری minimiz باز میشد

موفق باشید