这两行错误,注释掉正常
message2=replace(message2," "," ")
message2=replace(message2,vbcrlf,"<br>")
出错信息================================================
错误类型:
Microsoft VBScript 运行时错误 (0x800A005E)
/no2.asp, 第 76 行
浏览器类型:
Mozilla/4.0 (compatible; MSIE 5.01; Windows NT 5.0)
页:
GET /no2.asp
代码=================================
...
RS.open strsql,cn,1,1,1
...
Response.Write("</TD></TR>")
Response.Write("<TR>")
Response.Write("<TD vAlign=top Align=left width=610 bgcolor="&tablecolor(1)&">")
Response.Write("<FONT color=#000060 size=2>")
message2=RS(4)
message2=replace(message2," "," ")
message2=replace(message2,vbcrlf,"<br>")
Response.Write(message2)
Response.Write("</FONT>")
Response.Write("</TD></TR>")
replace如果字符串内没有替换的字符可能出错,所以替换前应该检测字符串内有无· ·,vbCrLf
what is in RS(4)? try
Response.Write "****" & RS(4) & "****<BR>"
or
message2= "" & RS(4)
message2=replace(message2," "," ")
message2=replace(message2, chr(13) & chr(10) ,"<br>")
Response.Write message2 & "<BR>"