ad.asp

来自「北京商务网」· ASP 代码 · 共 20 行

ASP
20 行
字号 
<%@ codepage ="936" %><HTML><HEAD><!--#include file="../../conn/dbconn2.asp" --><META content=revealTrans(Transition=23,Duration=1.0) http-equiv=Page-Exit><BODY><%set rs=server.createobject("ADODB.recordset") rs.Open "SELECT * FROM Ad",conn,1,1 if rs.eof thenelsetotal=rs.recordcountRandomize D1 = Fix(Rnd * total)for i=1 to D1rs.movenextnext if rs("type")="GIF" then%><%if rs("url")<>"" then%><A HREF="<%=rs("url")%>" target=_blank><img alt="<%=rs("alt")%>" src="<%=rs("src")%>" width="<%=rs("width")%>" height="<%=rs("height")%>" border=0 align=middle></A><%else%><img alt="<%=rs("alt")%>" src="<%=rs("src")%>" width="<%=rs("width")%>" height="<%=rs("height")%>" border=0 align=middle><%end if%><%else%><embed src="<%=rs("src")%>" type="application/x-shockwave-flash" width="<%=rs("width")%>" height="<%=rs("height")%>"><%end if%><%end if%></BODY></HTML>

ad.asp - 源码说明

本页面展示了「北京商务网」中的 ad.asp 源码文件，采用 ASP 编程语言编写，共 20 行代码。您可以在线阅读完整代码内容，也可以返回资源详情页下载完整源码包进行本地学习和开发。

虫虫开发者社区收录了大量与北京商务网相关的技术资源，包括源代码、技术文档、电路图等，是电子工程师和嵌入式开发者的专业学习平台。

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?