<!--#include virtual="/incs/config.asp" -->
<!--#include virtual="/incs/top.asp" -->
<%
chk_log()
chk_newpwr 1,6,1


session("renew")=true
	dnme=SafeRequest("dnme")
	If dnme="" Then
	call errorpage(-2,"对不起，参数错误！")
	End If
if session("sysclass")>=5 then
query="select * from v_dmtlst   where d_dme ='"&dnme&"'"
elseif session("sysclass")>=4 then
query="select * from v_dmtlst  where d_dme ='"&dnme&"'  and  ((("&session("sysarestr")&" or u_myare=0) and u_rotnme='') or u_rotnme='"&session("usrname")&"')"
else
query="select * from v_dmtlst  where d_unme='"&session("usrname")&"' and d_dme ='"&dnme&"'"
end if
	conn.open constr
	rs.open query,conn,1,1
 
if rs.recordcount<>1 then
     call errorpage(-2,"对不起，该订单不存在或者不属于您的会员号，管理员请先切换到该订单会员！...")
else
        d_prd=ucase(trim(rs("d_prd")))
		prd=d_prd
        d_dme=trim(rs("d_dme"))
		If rs("d_addtme")<> "" Then
			fromdate=rs("d_addtme")
		End If
		If rs("d_exptme")<> "" Then
			todate=rs("d_exptme")
		End If
query="select * from memlst where u_nme='"&rs("d_unme")&"'"
rs1.open query,conn,1,1
if not rs1.eof then
ownerclass=rs1("u_prc")
owneruser=rs("d_unme")
ownerpass=rs1("u_pss")
end if
rs1.close
end if
d_tpe=trim(rs("d_tpe"))
if d_tpe="1" then
prc_tmes=1
elseif d_tpe="2" then
prc_tmes=5
elseif d_tpe="3" then
prc_tmes=10
elseif d_tpe="4" then
prc_tmes=10
end if
rs.close
query="select * from v_pdtlst where g_prd='"&d_prd&"'"
rs.open query,conn,1,1
if not rs.eof then
g_nme=trim(rs("g_nme"))
end if
rs.close
'''''''''''''
%>
<script>
	function chk_frm2()
	{
		
		 
		if (confirm("如果确认，系统将扣除续费的相应款项！"))
		return true;
		else
		return false;	
		
	}
	</script>
<table cellspacing=2 cellpadding=0 width="100%" border=0>
  <tbody> 
  <tr> 
    <td  colspan=2 valign="middle"> 
      <table class=line cellspacing=0 cellpadding=0 width="100%" 
                  border=0 align="center">
        <tbody> 
        <tr> 
          <td valign=bottom width="25%" height=20><b>通用网址列表</b><a href="index.asp" class=commonface><font color="#FF0000">（查询）</font></a> 
          </td>
          <td valign=bottom noWrap align=right 
                        width="75%"><a href="dmt_lst.asp?querytype=8" class=commonface>今日新注册</a> 
            | <a href="dmt_lst.asp?querytype=9" class=commonface>本周新注册</a> | <a href="dmt_lst.asp?querytype=10" class=commonface>本周到期</a> 
            | <a href="dmt_lst.asp?querytype=11" class=commonface>本月到期</a></td>
        </tr>
        <tr> 
          <td align=middle width="100%" colspan=2 height=5></td>
        </tr>
        <tr> 
          <td align=middle width="100%" colspan=2 height=2 class=menuline></td>
        </tr>
        </tbody> 
      </table>
    </td>
  </tr>
  <tr> 
    <td  colspan=2 valign="middle" height="28"> 
      <table width="100%" border="0" cellspacing="0" cellpadding="0" align="center">
        <tr> 
          <td height=8></td>
        </tr>
        <tr> 
          <td> 
            <!--#include virtual="/master/pdtmng/dmt_mng/menu.asp" -->
            <br>
          </td>
        </tr>
      </table>
      <table   bordercolor="#5785B2" cellpadding="0" cellspacing="0" id="AutoNumber3" style="border-collapse: collapse" width="100%" align="center">
        <form action="dmt_rnw_rez.asp" name=renew method=post>
          <tr> 
            <td valign="top"> 
              <div align="center"><font color="#0000FF"><b><font color="#0000B5">通用网址续费</font></b></font><br>
                <br>
              </div>
              <table border=0 cellpadding=0 
                        cellspacing=0 class=datalist align="center"  width="100%" >
                <tbody> 
                <tr > 
                  <th  width="35%"  class=datalistheader align="center" > 需要续费的产品 
                  </th>
                  <th   class=datalistheader > 
                    <div align="left"> 
                      <input type="text" name="textfield"  class=normalform  readonly size="30" value="<%=d_dme%>" style="background-color:#cccccc;color:#ff0000">
                    </div>
                  </th>
                </tr>
				                <%if trim(owneruser)<>trim(entryuser) then %>
                <tr > 
                  <td height="28" class=datalistgrida  align=center>注意事项</td>
                  <td height="28" class=datalistgrida>该产品所属会员为：<b><%=owneruser%></b>，续费将扣除会员 
                    <b><%=owneruser%></b> 的款项！ </td>
                </tr>
                <%end if %>

                <tr > 
                  <td  class=datalistgrida align="center" >产品类型</td>
                  <td  class=datalistgrida > 
                    <input type="text" name="textfield2"  class=normalform  readonly size="30" value="<%=g_nme%>（<%=d_prd%>）" >
                    <input type=hidden name=d_prd value="<%=d_prd%>">
                    <input type=hidden name=domainname value="<%=d_dme%>">
                  </td>
                </tr>
                <tr > 
                  <td    class=datalistgrida align="center" >注册时间</td>
                  <td  class=datalistgrida > 
                    <input type="text" name="textfield32"  class=normalform  readonly size="30" value="<%=fromdate%>">
                  </td>
                </tr>
                <tr > 
                  <td    class=datalistgrida align="center" >到期时间</td>
                  <td  class=datalistgrida > 
                    <input type="text" name="textfield32"  class=normalform  readonly size="30" value="<%=todate%>">
                  </td>
                </tr>
                <tr > 
                  <td   a class=datalistgrida align="center" >续费期限</td>
                  <td  class=datalistgrida > 
                    <input type="text" name="years"    class=normalform size="10" value="1">
                    X 
                    <select name="d_prcstr" style="font-size: 9pt" size="1" >
                      <% 
					 
					  query="select * from v_prclst where p_prd='"&prd&"' and p_cls="&ownerclass&" order by p_tmetpe,p_yar"
					  rs2.open query,conn,1,1
					  while not rs2.eof 
					  p_yar=rs2("p_yar")
					  if p_yar="1" then
					  p_yar=""
					  end if
					  response.write "<option value='"&rs2("p_prcstr")&"'>"&cdbl(rs2("p_prc"))*prc_tmes&"元/"&p_yar&tmenmes(rs2("p_tmetpe"))&"</option>"
					  rs2.movenext
					  wend
					  rs2.close
					  %>
                    </select>
                  </td>
                </tr>
              				<% if session("sysclass")>=4 then %>
                <tr > 
                  <td   a class=datalistgrida align="center" >特殊价格</td>
                  <td  class=datalistgrida align="left" > 
                    <input type="text" name="newprice" class=normalform   size="28">
                    元 (如果特殊价格不为空，则所扣金额以特殊价格为准；特别注意：如果特殊价格填写为0，则扣款时将扣0元) </td>
                </tr>
				<% end if %>
  </tbody> 
              </table>
              <div align="center"><br>
                <input type="submit" name="Submit2" value="续 费" class=btxx onClick="javascript:return chk_frm2();">
                <input type="reset" name="Submit2" value="放 弃"  class=btxx >
              </div>
            </td>
          </tr>
        </form>
        <tr> 
          <td> </td>
        </tr>
      </table>
      <br>
    </td>
  </tr>
  </tbody> 
</table>
<!--#include virtual="/incs/bottom.asp"-->






