📄 showframe.asp

📁 用asp制作的大头帖

💻 ASP

字号:



<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>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -