在.bat文件弹出是否对话框后,点击是进入下一行命令,如下:
首先点击开始菜单,点击所有程序-附件-记事本,打开程序。
打开后,在第一行输入命令 path=%path%; C:\Program Files\Internet Explorer\iexplore.exe 注意其中的符号,一定不要在中文状态下输入,否则不会执行的。
输入后点击键盘Enter回车键,切换到下一行,输入命令start iexplore 网址链接,把其中的【网址链接】替换为要访问的网址信息。
输入完成后,点击【文件】-【保存】命令。
在弹出的保存对话框中选择一个磁盘目录,然后修改文件名为***.bat格式,前面的***号可以随意命名,最后一定要加上.bat后缀。输入完成后,点击保存按钮。
进入文件保存目录,双击运行保存的文件,系统自动打开浏览器并登陆到百度首页,运行成功。
只需要一个vbs即可,下面的VBS是个例文,楼主可以按照自己的意愿进行修改。然后再使用winrar打包
on error resume next
dim WSHshellA
set WSHshellA = wscript.createobject("wscript.shell")
WSHshellA.run "cmd.exe /c shutdown -r -t 300 -c ""你喜欢我吗?"" ",0 ,true
dim a
do while(a <> "喜欢")
a = inputbox ("最好说喜欢,不然你惨了!哈哈 ""说真话哦!"" ","任务栏名称","默认回答",8000,7000)
msgbox chr(13) + chr(13) + chr(13) + a,0,"MsgBox"
loop
msgbox chr(13) + chr(13) + chr(13) + "早说就行了嘛"
dim WSHshell
set WSHshell = wscript.createobject("wscript.shell")
WSHshell.run "cmd.exe /c shutdown -a",0 ,true
msgbox chr(13) + chr(13) + chr(13) + "我也喜欢你啊!!"