本文共 905 字,大约阅读时间需要 3 分钟。
一些朋友喜欢用vbs来更新游戏,但如何才能随时掌握游戏的更新情况呢,下面的脚本或许会帮的上忙原理,凡更新过的机子都会在指定文件中写上“xxx机 在 xxx时候 更新”sub ygx gxfilepath="\server更新过的机子.txt"'更新机器号要写入的文件的路径,必须具有修改权限 Dim WSHNetwork Set WSHNetwork = Wscript.CreateObject("Wscript.Network") Dim fso, gx genxing=cstr(wshnetwork.computername)&"机 "&cstr(date)&" "&cstr(time)&" 更新" Set fso = CreateObject("scripting.FileSystemObject") Set gx = fso.OpenTextFile(gxfilepath, 8, True) gx.Writeline (genxing) end sub'把以上东东复制到你要实现此功能的脚本中,在需要的时候call ygx即可,如下:dim fso,oshell,path1,pathpath = "E: etshanda泡泡堂4.1.txt"path1 = "\Webwgv网络游戏泡泡堂.exe" set oshell = wscript.createobject ("wscript.shell") set fso = createobject("scripting.filesystemobject") if (fso.fileexists(path)) then else oshell.run path1 '执行更新了 call ygx '就在更新表中写中写上更新记录 end if 来自 “ ITPUB博客 ” ,链接:http://blog.itpub.net/10294527/viewspace-123863/,如需转载,请注明出处,否则将追究法律责任。
转载于:http://blog.itpub.net/10294527/viewspace-123863/