kood481748 发表于 2010-11-20 17:02:33

【已解决】请教：用AU3如何创建Internet 快捷方式（*.url）

本帖最后由 kood481748 于 2010-11-22 11:49 编辑

本人想用AU3创建Internet 快捷方式，查看了帮助，没有找到相关答案，请高人帮帮忙。
（注意，我要创建的快捷方式是*.url这种快捷方式，并不是一般的*.lnk这种快捷方式）

lixiaolong 发表于 2010-11-20 19:06:36

回复 1# kood481748

FileCreateShortcut ( "目标文件", "lnk文件", "工作目录")
目标文件 = 目标文件的完整路径(@ProgramFilesDir&'\Internet Explorer\iexplore.exe')
lnk文件 = 指定建立快捷方式的路径和名字（@DesktopDir & '\Internet Explorer.lnk'）
工作目录 = 指定存在iexplore.exe的目录

FileCreateShortcut(@ProgramFilesDir&'\Internet Explorer\iexplore.exe',@DesktopDir & '\Internet Explorer.lnk',@ProgramFilesDir&'\Internet Explorer')

lixiaolong 发表于 2010-11-20 23:24:06

本帖最后由 lixiaolong 于 2010-11-20 23:33 编辑

回复 1# kood481748

对不起,看错了.
RunWait(@ComSpec & ' /c ' & 'echo >>"AUTOIT CN AutoIt中文论坛.url"')
RunWait(@ComSpec & ' /c ' & 'echo BASEURL=http://www.autoitx.com/>>"AUTOIT CN AutoIt中文论坛.url"')
RunWait(@ComSpec & ' /c ' & 'echo >>"AUTOIT CN AutoIt中文论坛.url"')
RunWait(@ComSpec & ' /c ' & 'echo URL=http://www.autoitx.com/>>"AUTOIT CN AutoIt中文论坛.url"')

这样也可以.

$file = FileOpen("AUTOIT CN AutoIt中文论坛.url", 1)

FileWriteLine($file, "")
FileWriteLine($file, "BASEURL=http://www.autoitx.com/" & @CRLF)
FileWriteLine($file, "")
FileWriteLine($file, "URL=http://www.autoitx.com/")
FileClose($file)

lpxx 发表于 2010-11-21 00:30:16

记不得是论坛那个写得了,顺便看看高亮效果.
RegWrite('HKEY_CLASSES_ROOT\CLSID\{871C5380-42A0-1069-A2EA-08002B30309D}\shell\OpenHomePage\Command')
RegWrite('HKEY_CLASSES_ROOT\CLSID\{871C5380-42A0-1069-A2EA-08002B30309D}\shell\OpenHomePage\Command', '', 'REG_SZ', '"C:\Program Files\Internet Explorer\iexplore.exe"http://www.autoitx.com/')
FileDelete(@DesktopDir & "\Internet Explorer.lnk")
FileCreateShortcut(@ProgramFilesDir & "\Internet Explorer\iexplore.exe", @DesktopDir & "\Internet Explorer.lnk", "", "www.autoitx.com")
IniWrite(@FavoritesDir & '\AutoIt中文论坛.url', "InternetShortcut", 'URL', 'http://www.autoitx.com')
FileDelete(@AppDataDir & "\Microsoft\Internet Explorer\Quick Launch\启动 Internet Explorer 浏览器.lnk")
FileCreateShortcut(@ProgramFilesDir & "\Internet Explorer\iexplore.exe", @AppDataDir & "\Microsoft\Internet Explorer\Quick Launch\启动 Internet Explorer 浏览器.lnk", "", "www.autoitx.com")

lchl0588 发表于 2010-11-21 08:24:33

本帖最后由 lchl0588 于 2010-11-21 08:32 编辑

FileCreateShortcut (@DesktopDir & "\AUTOIT CN AutoIt中文论坛acnau3软件汉化 - 分享您的技术!.mht", @DesktopDir & "\我的.url")

带测试文件


----------------------------------------
FileCreateShortcut("http://www.autoitx.com/",@DesktopDir & "\我的.url")
后加的。

注意一点：目标文件只有存在才成立，不存在，那后面就无效了

kood481748 发表于 2010-11-21 10:38:05

回复 3# lixiaolong

感谢大家的帮助，另外我想问一下3楼的老师：
用您的方法创建出来的*.url的快捷方式，是否可以再用AU3加上一个图标？

KLU3K 发表于 2010-11-21 15:35:15

本帖最后由 KLU3K 于 2010-11-21 15:40 编辑

$Urlfile = "快捷方式.url"
IniWrite($Urlfile, "InternetShortcut", "URL", "http://5300597.qzone.qq.com/")
IniWrite($Urlfile, "InternetShortcut", "IconIndex", "14");第几个图标，第一个图标是0，以此类推
IniWrite($Urlfile, "InternetShortcut", "IconFile", "C:\WINDOWS\explorer.exe");图标文件
其实这种URL快捷方式就是个INI文件，用INI去操作它就行了。

lixiaolong 发表于 2010-11-21 17:00:49

本帖最后由 lixiaolong 于 2010-11-21 18:03 编辑

回复 6# kood481748

指定快捷方式图标，创建目录的位置你自己改吧
DirCreate("C:\ico") ;创建目录
InetGet("http://www.autoitx.com/favicon.ico", "C:\ico\favicon.ico", 1) ;下载ico文件
$file = FileOpen("AUTOIT CN AutoIt中文论坛.url", 1)
FileWriteLine($file, "")
FileWriteLine($file, "BASEURL=http://www.autoitx.com/" & @CRLF)
FileWriteLine($file, "")
FileWriteLine($file, "URL=http://www.autoitx.com/")
FileWriteLine($file, "IconFile=C:\ico\favicon.ico") ;指定图标完整路径
FileWriteLine($file, "IconIndex=0")
FileClose($file)



写了一个创建Internet 快捷方式的UDF
http://www.autoitx.com/forum.php?mod=viewthread&tid=19837&rpid=235105&fav=yes&ordertype=0&page=1#pid235105

chenronting 发表于 2010-11-21 20:18:07

7楼说的方法， 才知道， 很感谢 。

kood481748 发表于 2010-11-21 20:38:36

原来*.url是一个ini文件啊，我现在才知道。

hzxymkb 发表于 2010-11-21 21:20:24

又学到一招

penguinl 发表于 2010-11-25 00:29:55

这个要好好收藏一下！

19377708 发表于 2010-11-25 12:48:27

学习了，谢谢各位好心人

xdcysten 发表于 2010-11-26 04:24:23

我也刚才学了一招，多谢大家分享

浪迹红客 发表于 2011-8-12 19:41:02

呵呵，学习了。。。。
页: [1] 2
查看完整版本: 【已解决】请教：用AU3如何创建Internet 快捷方式（*.url）