<!--#include file="../../conn.asp"-->
<!--#include file="../inc/setup.asp"-->
<!--#include file="../inc/const.asp"-->
<!--#include file="../inc/check.asp"-->
<%
Admin_header
'=====================================================================
' 软件名称：新云网站管理系统
' 当前版本：NewAsp Content Management System Version 4.0
' 文件名称：admin_cmsreg.asp
' 更新日期：2008-11-16
' 官方网站：新云网络(www.newasp.net www.newasp.cn) QQ：94022511
'=====================================================================
' Copyright 2003-2008 newasp.net - All Rights Reserved.
' newasp is a trademark of newasp.net
'=====================================================================
%>
<table class="table1" cellspacing="1" cellpadding="3" align="center" border="0">
	<tr>
		<td class="tableline linetitle" width="200" align="left">网站常规设置</td>
		<td class="tableline" width="*" align="right"><a href="admin_setting.asp">基本设置</a>
			 - <a href="admin_setting.asp?action=upload">上传设置</a>
			 - <a href="admin_setting.asp?action=plus">联盟插件设置</a>
			 - <a href="admin_setting.asp?action=editkey">内容关键字管理</a>
			 - <a href="admin_lockip.asp">IP限制管理</a>
			 - <a href="admin_badword.asp">过滤字符管理</a>
		</td>
	</tr>
</table>
<%
Dim Action
If Not ChkAdmin("Setting") Then
	Call Transfer_error()
End If
Action = LCase(Request("action"))
Select Case Trim(Action)
	Case "save"
		Call savekey()
	Case Else
		Call showmain()
End Select
If FoundErr = True Then
	ReturnError(ErrMsg)
End If
Admin_footer
NewAsp.PageEnd

Sub showmain()
%>
<form name="myform" method="post" action="http://bbs.newasp.net">
<table border="0" align="center" cellpadding="3" cellspacing="1" class="tableborder">
<tr>
	<th colspan="2">商业程序注册</th>
</tr>
<tr>
	<td class="tablerow1" align="right"><u title="程序注册域名">程序注册域名</u>：</td>
	<td class="tablerow1"><input type="text" name="syscode" size="35" value="newasp.net"></td>
</tr>
<tr>
	<td class="tablerow2" align="right"><u title="程序注册码">程序注册码</u>：</td>
	<td class="tablerow2"><input type="text" name="syskey" size="35" value=""> <font color="red">* 如果你是购买的商业版，请联系<a href="http://ask.newasp.net/" target="_blank">新云获取程序注册码</a></font></td>
</tr>
<tr>
	<td class="tablerow1" align="right">&nbsp;</td>
	<td class="tablerow1"><input type="submit" value="开始注册" name="submit_button" id="submit_button" class="button"/></td>
</tr>
</table>
</form>
<%
End Sub
%>