@echo off
echo wscriptecho DateDiff("s", "01/01/1970 00:00:00", Now())>sjcvbs
for /f %%i in ('cscript sjcvbs /nologo') do echo %%i>sjcvbs
ren sjcvbs sjctxt
这个方法只能精确到秒
@echo off
echo wscriptecho DateDiff("s", "01/01/1970 00:00:00", Now())>sjcvbs
for /f %%i in ('cscript sjcvbs /nologo') do set x=%%i
copy dianyingwmv d:\back
for /f %%i in ('cscript sjcvbs /nologo') do set y=%%i
set /a z=y-x
echo 复制文件用时%z%秒
del sjcvbs
pause
呵呵。。。试试这个。
@ECHO OFF
for /f "tokens=1,2 delims=:" %%i in ('time/t') do set xiaos=%%i&set fenz=%%j
set/a fenz=%fenz%+30
if %fenz:~0,1% geq 6 (set/a xiaos=%xiaos%+1&set/a fenz=%fenz%-60)
time %xiaos%:%fenz%
虽然搞不懂什么叫“做一个时间”,但是每个时间段都是整点之间,我想这就比较好办的。
nHour = Hour(Time)
Select Case nHour
Case 7,8,9,10,11
MsgBox " 上午"
Case 12,13,14,15,16,17
MsgBox " 下午"
Case 18,19,20,21,22,23
MsgBox " 夜间"
Case Else
MsgBox " 其他"
End Select
额……vbs好像不能用 case 7 to 11,比vb60麻烦
1定时可以用Now获取系统时间来跟你设置的时间对比,但最好是获取网络时间代码论坛上很多自己找去
2只生成“deletebat”这个文件并不自动删除是因为电脑速度太快删除的文件还没有关闭就执行了删除命令(运行中的文件无法删除)可以加上一延迟如下面的:
VBS Dim fso
VBS const Ttxt="deletebat"
VBS set fso=CreateObject("ScriptingFileSystemObject")
VBS const forreading=1
VBS const forwriting=2
VBS const forappending=8
VBS costfile=fsoFileExists(Ttxt)
//判断指定路径是否存在deletebat文件,这个判断是厉行公事可以不要直接生成
If 0=costfile
//否,第一次使用生成deletebat文件
VBS set ttfile=fsocreatetextfile(Ttxt,false)
EndIf
//以写方式打开deletebat,写入bat命令
VBS set fso=CreateObject("ScriptingFileSystemObject")
VBS set ttfile=fsoopentextfile(Ttxt,forappending)
//写入关闭小精灵进程的命令,红字是小精灵exe的名字
VBS ttfilewriteline("@taskkill /f /IM 小精灵删除自己exe")
VBS ttfilewriteline("rem 等待5秒 ")
VBS ttfilewriteline("ping -n 5 1271 >nul 2>nul ")
VBS ttfilewriteline("echo 时间到 ")
//写入删除小精灵exe文件的命令
VBS ttfilewriteline("del 小精灵删除自己exe /q")
VBS ttfileClose
VBSCall RunApp("deletebat")”
3至余CMD窗口提示“这不是内部或外部命令 也不是可运行程序”我就不知了
以上就是关于如何在bat里获得当前的系统时间戳全部的内容,包括:如何在bat里获得当前的系统时间戳、怎么样用批处理计算时间差、求助:使用批处理或vbs实现系统时间连续自动调整改变!!等相关内容解答,如果想了解更多相关内容,可以关注我们,你们的支持是我们更新的动力!
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)