<% Response.Expires = -1 Response.AddHeader "Pragma", "no-cache" Response.AddHeader "Cache-Control", "no-cache, must-revalidate" %> <% nodename=request.QueryString("nname") set Doc = CreateObject("MSXML2.DOMDocument") Doc.async = false Doc.load(Server.MapPath("admin\iframesetting.xml")) set root = doc.getElementsByTagName("frame") For i=1 to root.length if root.Item(i-1).getattribute("name")=nodename then %> <% 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 %> <% else %> <% end if next %>

"/>

<% end if next %>