showframe.asp

来自「用asp制作的大头帖」· ASP 代码 · 共 84 行

ASP

84 行



<script language="javascript">
function openn(obname,name)
{

if(obname.src.indexOf("close.gif")!=-1){

obname.src="images\\open.gif";
document.getElementById(name).style.display="block";}

else{

obname.src="images\\close.gif";
document.getElementById(name).style.display="none";

}}
</script>


<body>
<div style="overflow:scroll; height:100%; width:100%">
<%

set Doc = CreateObject("MSXML2.DOMDocument")

Doc.async = false
Doc.load(Server.MapPath("iframesetting.xml")) 
set root = doc.getElementsByTagName("frame")
%>


<%

tem=1
For i=1 to root.length


%>
<table width="350" border="0" cellpadding="0" cellspacing="0">
<tr>
    <th scope="col"width="5%"><div align="center"><img  style="cursor:hand"  onclick="openn(this,'<%="n"&tem%>');" src="images\close.gif" width="15" height="15" /></div>
    </th>
    <th scope="col"width="82%"><div align="left"><%=root.Item(i-1).getattribute("name")%></div></th>
    <th scope="col"width="13%">&nbsp;</th>  </tr>
<tr>
    <th scope="row" abbr="Model" class="spec" colspan="3"><div id="n<%=tem%>" style="display:none">
      <table width="100%" border="0">
        <tr>
         
         
<%
 for ii=1 to (root.Item(i-1).childnodes.length)
 set ox=root.Item(i-1).childnodes.item(ii-1)
 if (ii mod 3)=0 then
 %>
 <td> <div><img width="80" height="45"  onclick="top.changepic(this.src)"src="<%response.Write(ox.getAttribute("url"))%>"/></div></td></tr><tr>
  
 <%
 else
 %>
  <td> <div><img width="80" height="45"  onclick="top.changepic(this.src)"src="<%response.Write(ox.getAttribute("url"))%>"/></div></td>
 
 <%
 end if
 tem=tem+1
  next
%>
  </table>
</div>
</th>
</tr>
</table>
<%
next
set doc=nothing

%>

  

</div>
</body>

showframe.asp - 源码说明

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

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

⌨️ 快捷键说明

复制代码Ctrl + C

搜索代码Ctrl + F

全屏模式F11

增大字号Ctrl + =

减小字号Ctrl + -

显示快捷键?