51Testing软件测试论坛

标题: 请问这个Write 函数后接的字符串后面是不是有问题啊？ [打印本页]

作者: Coffey111111 时间: 2007-2-15 15:10
标题: 请问这个Write 函数后接的字符串后面是不是有问题啊？
Dim i
While Not input.eof

i=i+1
Set fso = CreateObject("Scripting.FileSystemObject")
Set f = fso.OpenTextFile("c:\testfile" &i &".html", ForWriting, True)
html="HTML"

f.Write "<HTML>"
   &"<HEAD>"
&"<TITLE>一个简单的HTML示例</TITLE>"
&"</HEAD>"
&" " &"<BODY>"
&"<CENTER>"
   &"<H3>欢迎光临"
   &input("name")
   &"的主页</H3>"
   &"<BR>"
   &"<HR>"
   &"<FONT SIZE=2> "
   &"　　这是我第一次做主页，无论怎么样，我都会努力做好！"
   &"</FONT>"&"</CENTER>"&" </BODY>"
   &"  "&" </HTML>"
  input.MoveNext
wait(5)

Wend
input.close
Set input=nothing
在我运行到红色处向下我就运行不下去了，请问这个Write 函数后接的字符串后面是不是有问题啊？请指教~~sdlkfj5

作者: 风过无息 时间: 2007-2-15 15:32
字符串的换行连接符的问题。
参照以下的脚本：

  ForWriting = 2
Set fso = CreateObject("Scripting.FileSystemObject")
Set f = fso.OpenTextFile("c:\testfile.html", ForWriting, True)
html="HTML"

f.Write "<HTML>" &_
"<HEAD>"  &_
"<TITLE>一个简单的HTML示例</TITLE>"  &_
"</HEAD>"  &_
"<BODY>"  &_
"<CENTER>"  &_
"<H3>欢迎光临" &_
   "的主页</H3>"  &_
      "<BR>"  &_
      "<HR>"  &_
   "<FONT SIZE=2> "  &_
         "　　这是我第一次做主页，无论怎么样，我都会努力做好！"  &_
   "</FONT>"&"</CENTER>"&" </BODY>"  &_
   "  "&" </HTML>"
wait(5)
f.Close

[ 本帖最后由风过无息于 2007-2-15 18:00 编辑 ]

作者: miniyal 时间: 2007-2-15 15:51
为什么有的是& 而有的是&_ ???

作者: 19thangel 时间: 2007-2-15 17:03

原帖由 miniyal 于 2007-2-15 15:51 发表
为什么有的是& 而有的是&_ ???

同问.........sdlkfj4

作者: xiaonan 时间: 2007-2-15 17:27
语句后加"_"表示一种换行的连接符.比如某句代码一行显示过长,我们可以把代码换行写,但句末要加上"_"符号.当语句本执行时,编译器看到了这句句末有"_"时,就会知道语句还没结束,只不过换行了,跳到下面继续读.这跟连接符号&没有关系,别搞混了

作者: rivermen 时间: 2007-2-16 17:34
& 负责连接字符串，当然也可以隐性把整数，浮点数等其他数据类型转换为字符串
_ 续行连接

作者: Coffey111111 时间: 2007-2-24 12:21
谢谢xiaonan,rivermen sdlkfj2

作者: htot05 时间: 2007-2-27 09:49
我感觉LZ是想把写到文本中的内容换行写,而不是想把脚本中的代码换行写是吗??

作者: Coffey111111 时间: 2007-2-27 12:35
恩，是的，是将文本中的内容换行写的sdlkfj5

作者: htot05 时间: 2007-2-27 14:30
那其实是应该这么写的
Dim i
While Not input.eof

i=i+1
Set fso = CreateObject("Scripting.FileSystemObject")
Set f = fso.OpenTextFile("c:\testfile" &i &".html", ForWriting, True)
html="HTML"

f.Write "<HTML>" & Chr(13)&Chr(10) & "<HEAD>" & Chr(13)&Chr(10) &"<TITLE>一个简单的HTML示例</TITLE>"
......
中间的Chr(13)&Chr(10)写入文档的时候就是回车换行,这样写出来的文档就是你期望的样子了~~
sdlkfj2

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