请问以下的JS调用是那里出错了呢？

Question

asp是在服务器端执行的，不是在客户端
不能用这格式：
<%%>
================================
应该用这格式
<script language="vbscript"></script>

Answer 1

报什么错？
document.write("<TABLE border=0 cellPadding=0 cellSpacing=0 width="146" height="10">")
应改为：
document.write("<TABLE border=0 cellPadding=0 cellSpacing=0 width=146 height=10>")document.write ("<tr><td valign=top><A href=hq/spzs/Show_product.asp?id=<%=rszs("ID")%> target="_blank"><b><%=rszs("cpmc")%></b></a></tr>")
应改为：
document.write ("<tr><td valign=top><A href=hq/spzs/Show_product.asp?id="+<%=rszs("ID")%>+" target=_blank><b>"+<%=rszs("cpmc")%>+"</b></a></tr>")

Answer 2

不知道为什么，就是什么都没有显示。我已经照着楼上的改了，现在是不报错了。可是还是没有显示。以下是最开始的代码，改代码是用VB写的，不能用JS调用，我是自己改成可以供JS调用的。大家帮忙看看是不是改错了？－－－－－－－－－－－－－－－
<%
   dim conn   
   dim connstr
   on error resume next
   connstr="DBQ="+server.mappath("hq/fpdb/Database.asa")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"
   set conn=server.createobject("ADODB.CONNECTION")
   conn.open connstr 
 Set rszs= Server.CreateObject("ADODB.Recordset") 
 zssql="select * from spzs where flag=1 and zsbz like '%01%'  order by ID desc"
 rszs.open zssql,conn,1,1 
%>
 <TABLE border=0 cellPadding=0 cellSpacing=0 width="167" height="167">
              <TBODY> 
              <TR bgColor=#448fe2> 
                <TD height="25">&nbsp;<FONT class=f12 color=#ffffff><B>精品推荐</B></font></TD>
              </TR>
              <TR> 
                <TD colspan="2" align=right><IMG height=5 src="pict/corner.gif" width=5></TD>
              </TR>
              <TR> 
                <TD height="7"><IMG height=5 src="Pict/shim.gif" width=1></TD>
              </TR>
              <TR> 
                <TD class=lh15 height="117" valign="top"> 
                  <%DO WHILE NOT rszs.eof%>
                  <TABLE border=0 cellPadding=0 cellSpacing=0 width="146" height="10">
                    <TBODY> 
                    <TR> 
                      <TD valign="top" height="19"><A href=hq/spzs/Show_product.asp?id=<%=rszs("ID")%> target="_blank"><b><%=rszs("cpmc")%></b></a><BR>
                         </TD>
                    </TBODY> 
                  </TABLE>
               
                  <%x=x+1       
                if x>=5 then exit do         
                rszs.movenext
                loop        
                rszs.close        
                set rszs=nothing       
              %>
－－－－－－－－－－－－
以上的代码是可以正常运行的。我把循环改成了JS的，是不是改错了！

Answer 3

把on error resume next先注释掉。

Answer 4

楼上的误会了，我上面的代码是可以正常运行的。我是想把这段VB写的代码改成JAVASCRIPT写的，可惜我对JS不熟悉，想请大家帮忙看看。

Answer 5

<%dim str
str="<table>"
do while not rszs.eof 
str=str&"<tr></td><a href=hq/spzs/Show_product.asp?id="
str=str&rsrszs("ID")&">"&rszs("cpmc")&"</a></td></tr>"
rszs.movenext
loop 
str=str&"</table>"
response.write "document.write(str)"
%>

Answer 6

谢谢楼上的。我替换了之后，发现IE显示的结果是“document.write(str)”不知道是何故。

Answer 7

哈哈哈我的错
response.write "document.write("&str&")"

Answer 8

用<script language='JavaScript' type='text/JavaScript' src='g.asp'></script>输出出来的是“document.write(str)”吗？是不是直接从浏览器打开的？

Answer 9

谢谢楼上，已经接近成功了，我直接在浏览器中打开的话，出现document.write(显示正确的结果)，如果我把<script language='JavaScript' type='text/JavaScript' src='g.asp'></script>直接放到一个空的文本文件中，然后另存为“A.HTM”，再在浏览器中打开的话，状态栏出现“网页中有错误”，然后什么都没有显示。麻烦楼上了！

Answer 10

你的js脚本没什么问题吧，要注意引号的使用，最容易出错的就是这个了
建议先把你要生成的东西直接在编辑器里写成代码，引号全部用单引号，必须使用双引号的用\"然后在这个代码的基础上写asp
你可以把你的document.write(显示正确的结果)里面的结果粘出来看看，我估计里面有双引号

Answer 11

非常感谢楼上避雷针，可是我用的JS脚本就是你写的那段呀。
<%dim str
str="<table>"
do while not rszs.eof 
str=str&"<tr></td><a href=hq/spzs/Show_product.asp?id="
str=str&rsrszs("ID")&">"&rszs("cpmc")&"</a></td></tr>"
rszs.movenext
loop 
str=str&"</table>"
response.write "document.write("&str&")"%>－－－－－－－－－－－－－以下就是document.write(显示正确的结果)里面的结果document.write(<table><tr></td><a href=hq/spzs/Show_product.asp?id=265>sagfda</a></td></tr><tr></td><a href=hq/spzs/Show_product.asp?id=264>浙江省嘉兴市穆湖森林度假区</a></td></tr><tr></td><a href=hq/spzs/Show_product.asp?id=263>gdsg</a></td></tr></table>)请避雷针兄弟帮忙看看！！非常感谢！！！

Answer 12

response.write "document.write('"&str&"')"
还是引号的问题