注册 登录
编程论坛 ASP技术论坛

请问这段asp代码哪里错了

swallowbai 发布于 2008-10-15 10:15, 824 次点击
response.write "<tr><td>· <a href='shownews.asp?id="&rs("NewsId")&"&typeid="&rs("Typeid")&"'>"if len(rs("Title"))>=11 then
response.write left(rs("Title"),9)&"..."
else
response.write rs("Title")
end if
response.write "<a></td><td><font color=#CCCCCC>"&rs("Date")&"</font></td></tr>"



提示错误类型:
Microsoft VBScript 编译器错误 (0x800A0401)
语句未结束
4 回复
#2
atian2008-10-15 10:29
response.write "</a></td><td><font color=#CCCCCC>"&rs("Date")&"</font></td></tr>"

少了斜杠.

[[it] 本帖最后由 atian 于 2008-10-15 10:39 编辑 [/it]]
#3
swallowbai2008-10-15 10:54
我改了,可是还有错误.
全贴出来

sub announce()'网站公告段代码
    set rs=conn.execute("select NewsId,Title,Typeid,Date from news where Typeid=1 order by NewsId desc")
    if not rs.eof then
        response.write "<table width=100% border=0 cellpadding=0 cellspacing=0>"
        do while not rs.eof
            response.write "<tr><td>· <a href='shownews.asp?id="&rs("NewsId")&"&typeid="&rs("Typeid")&"'>"if len(rs("Title"))>=11 then
       response.write left(rs("Title"),9)&"..."
        else
        response.write rs("Title")
        end if
        response.write "</a></td><td><font color=#CCCCCC>"&rs("Date")&"</font></td></tr>"
        rs.movenext
        loop
        rs.close
        response.write "</table>"
    else
        response.write "网站暂无公告"
    end if
end sub'

[[it] 本帖最后由 swallowbai 于 2008-10-15 11:00 编辑 [/it]]
#4
sunfishy2008-10-15 11:03
response.write "<tr><td>· <a href='shownews.asp?id="&rs("NewsId")&"&typeid="&rs("Typeid")&"'>"

将以上内容写在同一行.

response.write默认为一行..否则用上括号.

如:response.write("..
                   ..")
#5
swallowbai2008-10-15 11:08
改好了。谢谢哦:)
1