repayresdn.asp

蓝芒3.0A最新所有功能完整破解版

<% ModuleCode="M0315" %>
<!--#include file="../../Include/Reference.asp"-->
<%
Call PrintPageHead
DNID=Request.QueryString("ID")
%>
<!--#include file="../../Include/connect.asp"-->
<!--#include file="../../include/GetSysParam.asp"-->
<%
strSQL="Select * from T_DNS_AllResDN Where ResDNID='" & DNID & "'"
if Session("ISADMIN")<>"YES" then
	strSQL = strSQL & " and UserID=" & Session("UserID")
end if

Set Rs= Server.CreateObject("ADODB.Recordset")
Rs.open strSQL,Cn,1,1
If Rs.Eof Then
	Response.Write "<br><br><P align='center' class='titletext'>对不起, 找不到此解析域名或者您没有权限！</p>"
else
	'strMoney="100"
	strMoney=Sys_Opt_ResDNMoney
%>
<!--#include file="ResDNMenu.asp"-->
<form name="form9" action="RePayResDNDo.asp" method="post"">
  <table width="60%" border="0" cellspacing="1" cellpadding="5" align="center" bgcolor="<%=Opt_Table_BGColor%>">
	<tr bgcolor="<%=Opt_TR_BGColor%>">
	  <td colspan=2 align=center>
	    域名 <font color=red><%=Rs("DomainName")%></font> 续费
	  </td>
	</tr>		
	<tr bgcolor="<%=Opt_TD_BGColor2%>">
	  <td align=right bgcolor="<%=Opt_TR_BGColor%>">续费年限/价格</td>
		<input type="text" class="input"  maxlength="3" size="4" name="UYear" value=""> × <font color=red><%=strMoney%></font>&nbsp;元</td>	
	</tr>
	<tr>
	  <td colspan=2 bgcolor="<%=Opt_TD_BGColor2%>" align=center>
	    <input name="ID" type="hidden" value="<%=DNID%>">
	    <input type="hidden"  name="Money" value="<%=strMoney%>">
	    <input name="submit1" type=submit value="确定续费" class="button">&nbsp;&nbsp;&nbsp;&nbsp;
	    <input type=button onclick="javascript:history.go(-1)" value="返回" name=button1 class="button">
	  </td>
	</tr>
  </table>
</form>   

<%
end if

Rs.Close
Set Rs=Nothing
Cn.Close
Set Cn=Nothing
Call PrintPageBottom
%>