首页 > 学院 > 开发设计 > 正文

在桌面上建立一个Internet快捷键

2019-11-18 17:27:51
字体:
来源:转载
供稿:网友
以下的代码可以在桌面上建立一个Internet快捷键。
DimStrURLFileAsString
DimStrURLTargetAsString
DimFileNumAsInteger

StrURLFile="C:/Windows/Desktop/VB编程乐园.url"'桌面目录和标题
StrURLTarget="http://www.vbeden.com"'地址
FileNum=FreeFile

'WritetheInternetShortcutfile
OpenStrURLFileForOutputAsFileNum
PRint#FileNum,"[InternetShortcut]"
Print#FileNum,"URL="&StrURLTarget
CloseFileNum->


发表评论 共有条评论
用户名: 密码:
验证码: 匿名发表