[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖

[已解决]VBS中为什么这个比较语句不成立

  1. Set objFso = CreateObject("Scripting.FileSystemObject")
  2. if objFso.FileExists("time.ini") then
  3.    Set objFile=objFso.OpenTextFile("time.ini", 1)
  4.    LastDay=objFile.Readline
  5. end if
  6. NowDay=Date()
  7. if NowDay=LastDay then
  8.    Wsh.echo "同一天"
  9. end if
  10. Set ct = objFso.CreateTextFile("time.ini", True)
  11. ct.WriteLine Date()
  12. ct.WriteLine time
  13. ct.Close
复制代码
如上面代码,执行脚本后在 time.ini 创建两行内容,第一行是日期,第二行是时间。为什么在同一天内执行此脚本时 if NowDay=LastDay then 这个比较语句不成功呢?如果取消这个比较语句,直接用 Wsh.Echo NowDay 和 Wsh.Echo LastDay 发现两者是相同的,不明白,请帮忙解决。

[ 本帖最后由 newxso 于 2008-10-11 06:54 编辑 ]

哦,原来这样。改用版主介绍的方法,问题解决了,多谢。

TOP

变量的 Variant 子类型不同:LastDay为String型,NowDay为Date型。
可以强制进行类型转换:
if CStr(NowDay)=LastDay then
命令行参考:hh.exe ntcmds.chm::/ntcmds.htm
求助者请拿出诚心,别人才愿意奉献热心!
把查看手册形成条件反射!

TOP

返回列表