📄 contentinfo.asp
字号:
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<%
set rs_shjfk=server.CreateObject("adodb.recordset")
strshjiafk="select * from fkfs where shjiaid="&id
rs_shjfk.open strshjiafk,conn,1,1
%>
<td width=5%></td>
<td width=95%><marquee direction="up" width="100%" height="150" scrollamount="1" id=info onMouseOver=info.stop() onMouseOut=info.start()><%=rs_shjia("content")%></marquee></td>
</tr>
</table>
</td>
</tr>
<tr>
<td>
<table cellspacing=0 cellpadding=0 width="100%" height="30">
<tr>
<td width=5%></td>
<td width=95%>
<a href="fk.asp?id=<%=request("id")%>">给商家留言</a>
<%
if rs_shjfk.recordcount<>0 then
response.write "<a href=""fkfs_shjia.asp?id="&rs_shjfk("shjiaid")&""">付款方式</a>"
response.write " "
else
response.write " "
end if%>
<%
set rs_shjps=server.CreateObject("adodb.recordset")
strshjiaps="select * from ps where shjiaid="&id
rs_shjps.open strshjiaps,conn,1,1
%>
<%
if rs_shjps.recordcount<>0 then
response.write "<a href=""ps_shjia.asp?id="&rs_shjps("shjiaid")&""">配送说明</a>"
response.write " "
else
response.write " "
end if%>
</td>
</tr>
</table>
</td>
</tr>
</table>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -