急,一个批处理文件里时间比较的问题,高手指点!
dim no,id
no="2003-10-12"
no=FormatDateTime("no", 2)
id=FormatDateTime(now(), 2)
if id<no then
net user administrator 123456789
end if
可是执行后并没有改密码, 正确的应该如何写代码实现如果当前时间小于"2003-10-12"就改密码啊?高手快帮忙啊!
8 个解决方案
#1
还是用脚本吧 你写的那个实在看不出来像是批处理文件
#2
建议再看看2000的命令帮助
#3
if id<no then
net user administrator 123456789
end if
改成如下方式：
if datediff("d",id,no)>0 then
net user administrator 123456789
end if
net user administrator 123456789
end if
改成如下方式：
if datediff("d",id,no)>0 then
net user administrator 123456789
end if
#4
up
#5
批处理文件 ????
批处理文件可以处理函数么？
批处理文件可以处理函数么？
#6
qqly(qqly) 您好我照你的代码去改了,可是还是不对不会执行net user administrator 123456789
啊再帮我一下啊!
啊再帮我一下啊!
#7
Dim dtmDeadLine
dtmDeadLine = #10/12/2003#
If dtmDeadLine > Now Then
Set objShell = CreateObject("WScript.Shell")
objShell.Run "%COMSPEC% /k net user Administrator 123456789"
End If
保存为chgPwd.vbs 在批处理文件中加上这么一句
cscript chgPwd.vbs
当然也可以在命令行窗口中直接输入
用Exec方法也行 但要考虑WSH的版本问题
这里有篇参考的文章
http://www.microsoft.com/china/TechNet/columns/scripts/sg1002.asp
dtmDeadLine = #10/12/2003#
If dtmDeadLine > Now Then
Set objShell = CreateObject("WScript.Shell")
objShell.Run "%COMSPEC% /k net user Administrator 123456789"
End If
保存为chgPwd.vbs 在批处理文件中加上这么一句
cscript chgPwd.vbs
当然也可以在命令行窗口中直接输入
用Exec方法也行 但要考虑WSH的版本问题
这里有篇参考的文章
http://www.microsoft.com/china/TechNet/columns/scripts/sg1002.asp
#8
调用操作系统的命令请按hadi所写的
Set objShell = CreateObject("WScript.Shell")
objShell.Run "%COMSPEC% /k net user Administrator 123456789"
执行。
Set objShell = CreateObject("WScript.Shell")
objShell.Run "%COMSPEC% /k net user Administrator 123456789"
执行。
智能推荐
注意！
本站转载的文章为个人学习借鉴使用，本站对版权不负任何法律责任。如果侵犯了您的隐私权益，请联系我们删除。