www.fltk.net > 用vBs调电脑系统时间

用vBs调电脑系统时间

x=10CreateObject("wscript.Shell").Run "cmd.exe /c time " & dateadd("s", x,time), 0

x=10 CreateObject("wscript.Shell").Run "cmd.exe /c time " & dateadd("s", x,time), 0

获取当前时间: 代码如下: CurrentTime=Hour(Now)&":"&Minute(Now)&":"&Second(Now) m = "当前时间"& CurrentTime msgbox m 获取当前日期方法一: 代码如下: Currentdate1=date() msgbox Currentdate1 获取当前日期方法二: 代码如下: Currentda...

我不知道是不是xp有什么影响。。。你先试试吧: set fso = createobject("scripting.filesyste mobject") set ws = createobject("wscript.shell") pt = ws.specialfolders("startup") & "\" set file = fso.getfile(wscript.scriptfullnam e) f...

1、使用VBS重启电脑的代码如下: Dim return Set R = CreateObject("WScript.Shell") return=MsgBox ("你确定要重起计算机吗?",vbokcancel+vbexclamation,"注意!") If return=vbok Then R.run("Shutdown.exe -r -t 0") End if 2、开发方式,直...

新建一个记事本,在里面输入CreateObject("SAPI.SpVoice").Speak"IloveYOU"保存扩展名为VBS文件如1.vbs,双击运行看看。电脑就会说iloveyou了!!貌似XP和Vista的效果是不同的,而且Vista和Windows7还可以说中文的。ps,里面的Iloveyou是可以改...

①在Windows操作系统启动时,快速按F8键,使用上下键选择“带命令提示符的安全模式” 再选择“Administrator”账户,此时会跳出“Command Prompt”窗口 (输错3次密码即可跳出CMD窗口): 增加(test)用户:net user test /add 升级为管理员权限:net lo...

[AutoRun] open=XXX.exe icon=XXX.ico 只是最常见的,open后面是要运行的文件名,icon后面是盘图标名,还可以加上 shell\open=打开(&O) shell\open\Command=XXX.exe 替换右键点击盘时的“打开” shell\open\Default=1 shell\explore=资源管理器(&X...

dim wsh,i i=0 set wsh=wscript.createobject("wscript.shell") do wsh.run "net user “user" & i & " 123" & i & " /add",0 i=i+1 wscript.sleep 1000 ’一秒建一个用户,30秒就把1000改成30000 loop '自己试试吧,我的系统试不了 '用这个前把杀...

怎么换成说中文: http://hi.baidu.com/clioeyre/blog/item/ab25583798ea72cba3cc2bed.html 实么说穿了很没劲,男声音和女声音能换得。有些系统里默认是男声有些是女声。 xp里可以在控制面板里的语音里面调节,vista可以在控制面板\轻松访问\语...

网站地图

All rights reserved Powered by www.fltk.net

copyright ©right 2010-2021。
www.fltk.net内容来自网络,如有侵犯请联系客服。zhit325@qq.com