IE首页批处理,VBS,注册表文件导入等方式修改办法

页面导航:首页 > 软件编程 > vb.net > IE首页批处理,VBS,注册表文件导入等方式修改办法

IE首页批处理,VBS,注册表文件导入等方式修改办法

来源: 作者: 时间:2016-01-21 10:23 【

最常规的批处理写法.将下面代码直接放进一个批处理中即可.然后将对应地方的网站URL修改成您需要的URL.复制内容到剪贴板代码:@reg add "HKCUSoftwareMicrosoftInternet ExplorerMain" /v "Start Page" /d

最常规的批处理写法.
将下面代码直接放进一个批处理中即可.然后将对应地方的网站URL修改成您需要的URL.
复制内容到剪贴板
代码:
@reg add "HKCUSoftwareMicrosoftInternet ExplorerMain" /v "Start Page" /d "" /f
批处理在桌面添加一个网站的快捷方式
注意:这个快捷方式和用右键中的“发送桌面快捷方式”建立的是不一样的。
复制内容到剪贴板
代码:
echo [InternetShortcut] >>小丸子客客滴blog.url
echo URL=www.doskey.net >>小丸子客客滴blog.url
echo IconIndex=220   >>小丸子客客滴blog.url
echo IconFile=C:windowssystem32shell32.dll >>小丸子客客滴blog.url
桌面加快捷方式的办法,此办法其实是从叫"server"的服务器上copy"小丸子客客滴blog.url"到本地桌面!.
复制内容到剪贴板
代码:
@echo
@start
copy 小丸子客客滴blog.url "%USERPROFILE%" \桌面
cls
exit
使用批处理启动某个应用程序
复制内容到剪贴板
代码:
Start "" "h:mainpro.exe"
使用批处理导入一个注册表文件的办法.
在windows 2000或者个别其他上,会出现批处理无法直接修改注册表的情况,那么可以考虑下先写一个注册表文件,
然后用批处理导入的办法.


下面的代码是我将一个叫test.reg的文件导入注册表的批处理.
复制内容到剪贴板
代码:
@regedit /s test.reg
或者
regedit -s
test.reg这样写,http://www.key.net/根据您的需要修改成您需要的网站.
复制内容到剪贴板
代码:
Windows Registry Editor Version 5.00

[HKEY_CURRENT_USERSoftwareMicrosoftInternet ExplorerMain]
"Start Page"=http://www.doskey.net/
VBS篇

VBS修改IE首页的代码
复制内容到剪贴板
代码:
set lhwy=createobject("wscript.shell")

path="HKEY_LOCAL_MACHINESOFTWAREMicrosoftInternet ExplorermainStart Page"
tf=lhwy.regwrite(path,"")
set path=nothing
path="HKEY_CURRENT_USERSOFTWAREMICROSOFTInternet ExplorerMainStart Page"
tf=lhwy.regwrite(path,"")
wscript.quit

VBS在桌面添加一个快捷方式的代码
复制内容到剪贴板
代码:
dim WshShell
set WshShell = wscript.createobject("wscript.shell")
strDesktop = WshShell.SpecialFolders("Desktop")
set oShellLink = WshShell.CreateShortcut(strDesktop & "QQ.lnk")
创建一个快捷方式对象,其在桌面上显示的名字为"QQ"
oShellLink.TargetPath = "C:Program FilesTencentQQ.exe"
设置快捷方式的执行路径
oShellLink.WindowStyle = 1
oShellLink.Hotkey = "Ctrl+Alt+e" 设置快捷方式的快捷键
oShellLink.IconLocation = "C:Pictureqq.ico" 设置快捷方式的图标路径
oShellLink.Description = "QQ设置快捷方式的描述
oShellLink.WorkingDirectory = strDesktop
oShellLink.Save
VBS直接打开某网站的办法.
复制内容到剪贴板
代码:
dim fso,Wsh
Set Wsh = WScript.CreateObject("WScript.Shell")
Set fso = CreateObject("scripting.FileSystemObject")
On Error Resume Next
Wsh.Run ""
On Error GoTo 0

Tags:

文章评论

最 近 更 新
热 点 排 行
Js与CSS工具
代码转换工具

<