51Testing软件测试论坛

标题: 为什么这段代码过不去呢 [打印本页]

作者: vincenthan 时间: 2007-9-12 13:52
标题: 为什么这段代码过不去呢
Dim a1,a2,a3,s
Set a1=createobject("scripting.filesystemobject")
Set a3=createobject("wscript.shell")
s=a3.specialfolders("desktop")
Set a2=a1.opentextfile(s&"\new.txt",2,true)
a2.writeline "the hex is'"&hex(98)&"'"
a2.close
总是停在倒数第2行代码，但我把hex(98)先赋值给一个变量,改过来就可以通过，想不通是为什么，希望指点一下

作者: sterson 时间: 2007-9-12 14:23
Dim a1,a2,a3,s
Set a1=createobject("scripting.filesystemobject")
Set a3=createobject("wscript.shell")
s=a3.specialfolders("desktop")
Set a2=a1.opentextfile(s&"\new.txt",2,true)
a2.writeline "the hex is'"& hex(98) &"'"
a2.close
在我的电脑是通过的,倒数第二句 a2.writeline "the hex is'"& hex(98) &"'"
在&符号前后都要打上空格就行了.

作者: vincenthan 时间: 2007-9-12 17:40
sdlkfj8 真的通过了，不过是为什么呢？有谁能告诉我吗，因为我一直这样写其他的函数都没有问题，为什么唯独HEX出现这样的问题呢？大惑不解sdlkfj7

欢迎光临 51Testing软件测试论坛 (http://bbs.51testing.com/)