这种快捷方式怎么创建的！VB 这种快捷方式怎么创建的！VB

来源：百度知道 编辑：UC知道 时间：2024/05/02 11:43:06
这种快捷方式怎么创建的！V这种快捷方式怎么创建的！VBB

使用Window脚本建立, 测试了一下, 通过
http://hi.baidu.com/juncox/blog/item/187763a5a5a2c1ff9052eead.html

Private Sub Command1_Click()
Dim strFile As String
strFile = Environ$("HOMEPATH") & "\桌面\" & "网站快捷方式" & ".url"
Open strFile For Output As #1
Print #1, "[InternetShortcut]" & vbCrLf & "URL=" & Text1.Text
Close
End Sub
Private Sub Form_Load()
Text1.Text = "http://www.baidu.com/"
End Sub
或使用WINDOW的SHELL API函数创建