百度贴吧_list.asp

搜贴搜吧

排序结果：按时间倒序|按时间顺序|按相关性顺序|只看主题贴 |查看更多结果

<title>金属材料拉力试验机-江都市腾达试验仪器厂</title> <meta http-equiv="Content-Type" content="text/html; charset=gb2312" /

贴吧：高低温湿热试验箱作者：ft668396 2010-08-26 15:38

总的http://www.moodmoon.com/downasp/sort.asp?classid=14&Nclassid=230 《楚河汉界》主题曲 http://www.moodmoon.com/downasp/list.asp?id=848 1

贴吧：翁美玲作者：下雨喽 2005-10-28 21:35

回复：请教asp语句问题

Microsoft VBScript 运行时错误 '800a01a8'
缺少对象: 'cn'
\qg_list.asp, line 32

贴吧：asp作者：aba969 2010-04-30 08:20

回复：求助怎么在asp网页提交复选框循环播放音乐？

在bofangqi.asp中使用mediaplayer控件播放音乐，音乐地址写成
list.asp?id=<% =request("id") %>
list.asp中获取到id参数后，从数据库中读取歌曲播放地址，然后输出，一行一个地址就可以了，这是最简单的连播，也可以直接生成asx格式的播放列表，用起来没多大区别。

贴吧：asp作者：黑睿 2010-09-19 04:22

问下这个asp文件怎么不运行啊？无法提交我急死了。。。求高人

<td width="94" background="Images/topBar_bg.gif">生成html</td>
<td width="56" background="Images/topBar_bg.gif" bgcolor="#f5f5f5">编辑</td>
</tr>
<%
dim id
id=trim(request("id"))
if id="" or not isnumeric(id) then
tt="select top 15 id,x_name,x_leiid,x_top,User,Audit from xianlu order by x_top desc"
else
tt="select id,x_name,x_leiid,x_top,User,Audit from xianlu where x_leiid="&id&" order by x_top desc"
end if
set er=conn.execute(tt)
while not er.eof
%>
<tr bgcolor="#FFFFFF">
<td height="24">
<%
if trim(er("x_top"))=1 then
response.write ("<font color=red >荐</font>")
else
response.write ("<font color=red >普</font>")
end if
%>
<a href="../Xl/Xl_<%=er("id")%>.html" target="_blank"><%=er("x_name")%></a><%if er("user")<>"" then
response.write("<font color=green>("&er("User")&"用户发布)</font>")
End If%></td>
<td align="center"><%
if er("User")<>"" then
if trim(er("Audit"))="False" then
response.write ("<table><tr><form name=formAudit id =formAudit method=post action=AuditOk.asp><td><font color=red >用户发布(未审核) </font><input name='XId' type='hidden' id='XId' value='"&er("Id")&"'><input name='UserName' type='hidden' id='UserName' value='"&er("User")&"'><input type=button name=Submit value=审核 onClick=checkAudit();></td></form></tr></table>")
else
response.write ("<font color=Green >用户发布(已审核)</font>")
end if
Else
response.write ("<font color=orange>管理员发布</font>")
End if
%></td>
<td align="center"><%=er("x_leiid")%></td>
<td align="center"><a href=make_Xllist.asp?id=<%=er("id")%>>生成</a></td>
<td align="center"><a href="admin_addxl.asp?action=editok&id=<%=er("id")%>" title='编辑'>编辑</a></td>
</tr>
<%
er.movenext
wend
er.close
%>
</table>
<form name='formAuditOk' action='AuditOk.asp' method='post' target='formAuditk'>
<input type='hidden' name='username' value=''>
<input type='hidden' name='XId' value=''>
</form>
<script language=javascript>
function checkAudit()
{
if (document.formAudit.UserName.value=="")
{
alert("错误,不能进行审核！");
return false;
}
else
{
document.formAuditOk.username.value=document.formAudit.UserName.value;
document.formAuditOk.XId.value=document.formAudit.XId.value;
var popupWin = window.open('AuditOk.asp', 'formAuditk', 'scrollbars=no,width=340,height=200');
document.formAuditOk.submit();
}
}
</script>
<%
end sub
sub editok
dim id
id=trim(request("id"))

贴吧：asp作者：zhxw21 2011-07-06 02:58

回复：★Girlsday·音源『140609』_┆敏雅Doctor异乡人OST音源记录