请教打开"Internet Explorer浏览器"和"网上邻居"代码

三山客

请教打开"Internet Explorer浏览器"和"网上邻居"代码如何写?

三山客

Private Sub Command0_Click()

    Dim RVal

    RVal = Shell("C:\Program Files\Internet Explorer\iexplore.exe", 1)  'Internet Explorer浏览器

End Sub

Private Sub Command1_Click()

    Dim RVal

    RVal = Shell("Explorer ::{208d2c60-3AEA-1069-a2d7-08002B30309D}", 1) '网上邻居

End Sub

打开"新浪网"主页  RVal = Shell("C:\Program Files\Internet Explorer\iexplore.exe www.sina.com.cn", 1)

[此贴子已经被作者于2005-8-28 17:05:45编辑过]

nplgacce

以下是引用三山客在2005-8-28 16:52:00的发言：

Private Sub Command1_Click()

    Dim RVal

    RVal = Shell("Explorer ::{208d2c60-3AEA-1069-a2d7-08002B30309D}", 1) '网上邻居

End Sub

看不懂EXPLORER后面的一串数字是什么意思。。。



我想问的是，如果我想打开的网上邻居的名字叫 “ABCD”，代码应该怎么写？



我在“开始”，“运行”的后面加参数 “\\abcd"，可以打开一个窗口，看到ABCD的内容

谢谢

[此贴子已经被作者于2005-10-31 11:28:32编辑过]

方漠

用户身份标识码，保存在注册表里的东东。