标题: [已解决]VBS中为什么这个比较语句不成立 [打印本页]
作者: newxso 时间: 2008-10-10 21:17 标题: [已解决]VBS中为什么这个比较语句不成立
- Set objFso = CreateObject("Scripting.FileSystemObject")
- if objFso.FileExists("time.ini") then
- Set objFile=objFso.OpenTextFile("time.ini", 1)
- LastDay=objFile.Readline
- end if
- NowDay=Date()
- if NowDay=LastDay then
- Wsh.echo "同一天"
- end if
- Set ct = objFso.CreateTextFile("time.ini", True)
- ct.WriteLine Date()
- ct.WriteLine time
- ct.Close
复制代码
如上面代码,执行脚本后在 time.ini 创建两行内容,第一行是日期,第二行是时间。为什么在同一天内执行此脚本时 if NowDay=LastDay then 这个比较语句不成功呢?如果取消这个比较语句,直接用 Wsh.Echo NowDay 和 Wsh.Echo LastDay 发现两者是相同的,不明白,请帮忙解决。
[ 本帖最后由 newxso 于 2008-10-11 06:54 编辑 ]
作者: zqz0012005 时间: 2008-10-11 01:32
变量的 Variant 子类型不同:LastDay为String型,NowDay为Date型。
可以强制进行类型转换:
if CStr(NowDay)=LastDay then
作者: newxso 时间: 2008-10-11 06:53
哦,原来这样。改用版主介绍的方法,问题解决了,多谢。
欢迎光临 批处理之家 (http://bathome.net./) |
Powered by Discuz! 7.2 |