<!--#include file="Cls_Ads.asp" -->
<%
  dim CodeStr,AdsCodeConfig
  Set AdsCodeConfig = Conn.Execute("Select DoMain from Config")
      CodeStr = AdsCodeConfig("DoMain")&"/JS/AdsJS/"&request("Location")&".js"
%>
<head>
<link href="../Inc/ModeWindow.css" rel="stylesheet" type="text/css">
</head>

<title>广告代码调用</title>
<body topmargin="0" leftmargin="0">
<table width="75%" border="0" align="center" cellpadding="0" cellspacing="1">
  <tr> 
    <td width="21%" rowspan="3"><div align="center"><img src="../Images/I.gif" width="34" height="33"></div></td>
    <td width="79%" height="15">&nbsp;</td>
  </tr>
  <tr> 
    <td>本广告调用代码为:</td>
  </tr>
  <tr>
    <td>&nbsp;</td>
  </tr>
  <tr> 
    <td colspan="2"> <div align="center"> 
        <input name="textfield" type="text"  size="58" value="<script src=<%=CodeStr%>></script>">
      </div></td>
  </tr>
  <tr> 
    <td colspan="2">&nbsp;</td>
  </tr>
  <tr> 
    <td colspan="2"> <div align="center"> 
        <input type="button" name="Submit" value=" 关 闭 " onclick="window.close();">
      </div></td>
  </tr>
  <tr> 
    <td height="10" colspan="2">&nbsp;</td>
  </tr>
</table>
</body>
<script>
  document.all.textfield.select();
</script>
