4月 062014
 

1.start.exeベース

+++++++++++++++++++ソースコード++++++++++++++++++++++

url=”http://www.eamonning.com”

shell “start ” & url,0

+++++++++++++++++++ソースコード2++++++++++++++++++++++

url=”http://www.eamonning.com”

shell “cmd.exe /c start ” & url,0

2.explorer.exeベース 

+++++++++++++++++++ソースコード+++++++++++++++++++++++

url =”http://www.eamonning.com”

Shell “explorer ” & url, 0

3.IEブラウザベース

+++++++++++++++++++ソースコード++++++++++

Dim Browser As Object

url=”http://www.eamonning.com”

Set Browser = CreateObject(“InternetExplorer.Application”)

Browser.Visible = True

Browser.Navigate (url)

+++++++++++++++++++ソースコード++++++++++++++++++++++

url = “http://www.eamonning.com”

exe = Environ(“programfiles”) & “Internet ExplorerIEXPLORE.EXE”

Shell exe & Space(1) & url, 1

.WebBrowserコントルールベース 

+++++++++++++++++++ソースコード++++++++++++++++++++++

url=”http://www.eamonning.com”

WebBrowser1.Navigate url