قبلا هم این موضوع پاسخ داده شده بود
از دستورات زیر استفاده کن
Run("<System>\rundll32.exe","TOP <System>\shell32.dll,ShellExec_RunDLL www.mediachance.com")
یا
Run("<System>\rundll32.exe","TOP <System>\url.dll,ShellExec_RunDLL www.mediachance.com")
البته بخش دوم دستور رو می تونی از تابع استفاده...