روش اتصال به اینترنت

[علیرضا5]

با سلام
چطوری میتونم یک لیبل رو در فرم بگذارم و در اون آدرس یک سایت رو بنویسم طوری که وقتی روی اون کلیک میشه به سایت متصل بشه

[samiasoft]

با سلام
چطوری میتونم یک لیبل رو در فرم بگذارم و در اون آدرس یک سایت رو بنویسم طوری که وقتی روی اون کلیک میشه به سایت متصل بشه

در قسمت جنرال فرم اینو کپی کنید :

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



با این دستور میتونید لینک موردنظرتونو اجرا کنید
ShellExecute Me.hwnd, vbNullString, "http://barnamenevis.org/", vbNullString, "C:\", SW_SHOWNORMAL




یا اینکه فقط از کد زیر استفاده کنید.(در این حالت فقط از مرورگر اینترنت اکسپلور برای بازشدن لینک استفاده میشود)

Shell "explorer.exe http://barnamenevis.org", vbHide

[mohammad_chavoshi]

عذر میخام منظور شما در مورد "در قسمت جنرال فرم اینو کپی کنید "چیه؟ یعنی که Private تولید کنه یا نه تو Private خود label این دستور و وارد کرد؟

[علیرضا5]

سورس آماده خدمت شما
تشکرش رو از samiasoft انجام بده

[ایلیا آخوندزاده]

آخرین کدی که دوست عزیزم samiasoft نوشتن همون دستور Shell رو توی کلیک لیبل بزارید باکلیک روی لیبل اکسپلورر باز میشه اگه مرورگر خاصی مدنظرتون هست بجای Explorer.exe آدرس مرورگر رو وارد کنید(جایی که مرورگر نصب شده و فایل exe مرورگر)