راهنمایی برای IE>NAVIGATE

[sasan-vb]

سلام من دارم یه برنامه تهیه میکنم شامل چند دکمه هست میخام با زدن هر دکمه

یه صفه یاینترنت باز بشه مثل دکمه 1 گوگل دوکمه 2 یاهو و 3 میکروسافت و 4 اینتل

میشه سورس مشابه این رو بزاین تا من فقط اسم سایت ها رو ادیت کنم ! خودم موفق نشدم همش اررور میده که استارت اپ مشکل داره !! لطف کنید برام اماده کنید

[Scorpion]

اینم دستورش

کد:

Shell "explorer http://h-force.betasoft.ir"

[Scorpion]

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

Open URL in VB6

کد:

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 Const SW_SHOW = 1

Public Sub Navigate(ByVal NavTo As String)

Dim hBrowse As Long
hBrowse = ShellExecute(0&, "open", NavTo, "", "", SW_SHOW)
End Sub

Private Sub Command1_Click()
Navigate ("http://img.villagephotos.com/p/2003-6/226576/form1.gif")



End Sub

[sasan-vb]

Shell "explorer http://h-force.betasoft.ir"

این کد رو کجا باید بزارم ؟ بعد مشکل من اینه که میخوام با زدن دکمه 2 سایت شماره 2 باز بشه تو برنامه و قبلی دیگه دیده نشه ! میشه لطف کنید یه پروجکن بزارین ؟

---

من میخوام داخل خود برنامه باز بشه نه یه سای جداگونه

[Scorpion]

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

[Fireninja]

من میخوام داخل خود برنامه باز بشه نه یه سای جداگونه

با استفاده از ابزار WebBrowser می تونین!!

[sasan-vb]

ای بابا یعنی یکی بلد نیت چه جوری سات تو خود برنامه نمایش پیدا کنه ؟ رو کفیک از هر روشی میخواد باشه

[Scorpion]

شما بگرد هست هم سایت هم گوگل
مگه میشه نیاشه !

[Fireninja]

ای بابا یعنی یکی بلد نیت چه جوری سات تو خود برنامه نمایش پیدا کنه ؟ رو کفیک از هر روشی میخواد باشه

و خداوند گوگل را آفرید ...

پ.ن:ببخشین ، شما احیانا" کیبوردتون خراب نیست؟؟