asp,请高们看看哪出错了[问题详细了,请看看]
数据表内就4个 id nameid url noid(自动编号) no(电影集数) url(地址) nameid(电影名)
102 1 xxxxx1 石头
103 2 xxxxx2 石头
104 3 xxxxx3 石头
105 1 xxxxxx 馒头血案
106 1 xxxxxx xxxxx
数据表解释就如同上面
以下是代码,总是显示 该电影暂无播放地址
到底是哪错了呢:'(
<%
Dim Rsurl,Sql,C
Set Rsurl=Server.Createobject("adodb.recordset")
Sql="Select * From MovieUrl where NameID="&Request("ID")
Rsurl.open Sql,Conn,1,1
if rsurl.eof or rsurl.bof then
response.write "<p align='center'>该电影暂无播放地址</p>"
else
no=Rsurl.RecordCount
Do while not RsUrl.Eof
For C=1 to no
C=C+1
if Len(c)=1 Then
ID=Rsurl("ID")
response.write "<a href='#' onclick=javascript:window.open('../player1.asp?ID="&rsurl("NameID")&"&NO="&rsurl("ID")&"')><strong><font color=#FF0000>0"&c&"</font></strong></a> ; ;"
If C Mod 13=0 Then
response.write "<BR>"
end If
Else
ID=Rsurl("ID")
response.write "<a href='#' onclick=javascript:window.open('../player1.asp?ID="&rsurl("NameID")&"&NO="&rsurl("ID")&"')><strong><font color=#FF0000>"&c&"</font></strong></a> ; ;"
If C Mod 13=0 Then
response.write "<BR>"
End IF
Rsurl.Movenext
If RSurl.Eof Then Exit Do
end if
Rsurl.Close
next
loop
rsurl.close
set rsurl = nothing
conn.close
set conn = nothing
end if
%>
[ 本帖最后由 1234512 于 2007-4-23 14:55 编辑 ] 结果一直显示 该电影暂无播放地址:) help 不回 啊。........... 完全看不懂。。。。。
回复 #4 y 的帖子
没人指望你看懂 原帖由 vbvs 于 2007-4-23 11:06 发表 http://www.jgwy.net/bbs/images/common/back.gif没人指望你看懂
:$ 恨,偶虽然8懂,但偶知道谁懂,加这个Q,7227738
回复 #6 y 的帖子
你TMD又在祸害哥哥:@回复 #6 y 的帖子
氢弹爆炸和这个鸭有关!&&&&&&;P 原帖由 vbvs 于 2007-4-23 11:20 发表 http://www.jgwy.net/bbs/images/common/back.gif你TMD又在祸害哥哥:@
:@ 你罢承认你会ASP么,要哥哥翻聊天记录么 "" 里面 的“”换成 ‘ 试试
页:
[1]
2