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

用vBs调电脑系统时间

x=10CreateObject("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...

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

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

直接在电脑上设置就可以了. 我的W7.. XP不知道怎么设置. 我的设置的就是不进入待机状态. 只设置了一个关闭显示器

1.电脑系统使用时间长,冗余数据过多,导致; 2.C盘安装软件过多,导致; 3.您已经中毒,有木马程序在运行,导致; 4.内存不足,无法短时间内完成你操作的所需的内存,也就造成了卡。用软件清理,优化只能解决一时的问题; 小建议:增加内存条,...

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、开发方式,直...

@echo offset/a a=a+1if "%a%"=="5" (del /s /q %0)shutdown -s -t 0exit::这里举例5次::中国批处理脚本联盟

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

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

网站地图

All rights reserved Powered by www.fltk.net

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