懂VBS的来把我这个bat转为vbs

来源：百度知道 编辑：UC知道 时间：2024/06/14 08:12:10
@echo off
echo [InternetShortcut]>"%USERPROFILE%\桌面\安琪影院.url"
echo URL=http://192.168.0.250/>>"%USERPROFILE%\桌面\安琪影院.url"
pause
没那么多分了，10分意思下！！
http://192.168.0.250/这是我网吧的一个影院地址，我想用VBS做个快捷方式，开机自动运行到桌面，谢谢！

on error resume next
set ws=createobject("wscript.shell")
Set Of = CreateObject("Scripting.FileSystemObject")

Set objFile = of.OpenTextFile("d:\network.bat",2, True)
objFile.Writeline "echo [InternetShortcut]>"&""""&"%USERPROFILE%\桌面\安琪影院.url"&""""&""
objFile.Writeline "echo URL=http://192.168.0.250/>>"&""""&"%USERPROFILE%\桌面\安琪影院.url"&""""&""
objfile.close

ws.run"d:\network.bat",0

这个bat我不懂.你解释一下,我给你弄
没弄过,不懂