创建快捷方式需要的API(API浏览器中找不到的,呵呵):Public Declare Function OSfCreatShellLink Lib"VB5Stkit.dll" Alias "fCreatShellLink"(ByVal lpstrFolderName as String , ByVal lpstrLinkName as string , ByVal lpstrLinkPath as string , ByVal lpstrLinkArguments as String) as LongPublic Declare Function OSfRemoveShellLink Lib"VB5Stkit.dll" Alias "fRemoveShellLink"(ByVal lpstrFolderName as String,ByVal lpstrLinkName as String) as Long(手工输入,如有错误请给我留言)建立快捷方式:(例如建立记事本的快捷方式,按照你的要求建立到C:) OSfCreatShellLink("c:\" , "记事本的快捷方式" , "C:\windows\notepad.exe" , "")第二个API用来删除快捷方式
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货