数据库编程

开发平台：
ASP/ASPX

Reg_service.asp：源码内容
							<% Option Explicit %>
<!--#include file="../FS_Inc/Const.asp" -->
<!--#include file="../FS_InterFace/MF_Function.asp" -->
<!--#include file="../FS_Inc/Function.asp" -->
<!--#include file="lib/strlib.asp" -->
<%
User_GetParm
if RegisterTF =false then
	strShowErr = "<li>暂时关闭注册功能</li><li>或者系统参数丢失!</li>"
	Response.Redirect("lib/Error.asp?ErrCodes="&Server.URLEncode(strShowErr)&"&ErrorUrl="&Request.ServerVariables("URL")&"?"&request.QueryString&"")
	Response.end
End if
if Not isnull(DefaultGroupID) then
  if DefaultGroupID = 0 then
	strShowErr = "<li>管理员还没设置默认会员组。现在暂时不能注册，请与管理员联系!</li>"
	Response.Redirect("lib/Error.asp?ErrCodes="&Server.URLEncode(strShowErr)&"&ErrorUrl="&Request.ServerVariables("URL")&"?"&request.QueryString&"")
	Response.end
  end if
  dim rsGroup
  set rsGroup = User_Conn.execute("select GroupID,GroupName from FS_ME_Group where GroupType=1 and GroupID="&clng(DefaultGroupID))
  if rsGroup.eof then
	strShowErr = "<li>数据异常!</li><li>请与系统提供商获得技术支持!!</li>"
	Response.Redirect("lib/Error.asp?ErrCodes="&Server.URLEncode(strShowErr)&"&ErrorUrl="&Request.ServerVariables("URL")&"?"&request.QueryString&"")
	Response.end
  end if
  rsGroup.close:set rsGroup=nothing
else
	strShowErr = "<li>管理员还没设置默认会员组。现在暂时不能注册，请与管理员联系!</li>"
	Response.Redirect("lib/Error.asp?ErrCodes="&Server.URLEncode(strShowErr)&"&ErrorUrl="&Request.ServerVariables("URL")&"?"&request.QueryString&"")
	Response.end
end if
response.Cookies("FoosunUserCookies")("UserLogin_Style_Num")  = p_LoginStyle
If p_LoginStyle="" Or p_LoginStyle = 0 then
	response.Cookies("FoosunUserCookies")("UserLogin_Style_Num") = "2"
End if
%>
<html xmlns="http://www.w3.org/1999/xhtml">
<title>会员注册step 1 of  4 step</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<meta content="MSHTML 6.00.3790.2491" name="GENERATOR" />
<meta name="keywords" content="风讯,风讯cms,cms,FoosunCMS,FoosunOA,FoosunVif,vif,风讯网站内容管理系统">
<link href="images/skin/Css_<%=Request.Cookies("FoosunUserCookies")("UserLogin_Style_Num")%>/<%=Request.Cookies("FoosunUserCookies")("UserLogin_Style_Num")%>.css" rel="stylesheet" type="text/css">
<head>
<body oncontextmenu="return false;">
<table width="98%" border="0" align="center" cellpadding="1" cellspacing="0">
  <tr> 
    <td><table width="100%" height="279" border="0" align="center" cellpadding="4" cellspacing="1" class="table">
        <tr class="back"> 
          <td   colspan="2" class="xingmu" height="24">·User Register step 1.(注册协议)</td>
        </tr>
        <tr class="back"> 
          <td width="15%" valign="top" class="hback"><strong>【注册步骤】</strong> <br>
            <br>
            <div align="left"> →同意注册协议<br>
              <br>
              ×填写会员资料<br>
              <br>
              ×填写联系资料<br>
              <br>
              ×注册成功</div>
            </td>
          <td width="85%" valign="top" class="hback"> 
		  <%If RegisterTF = false then%>
		  	  <div align="center" class="tx"><p></p>
              <p>&nbsp;</p>
              <p>管理员已经关闭注册!</p>
            </div>
			  <%Else%>
              <table width="96%" border="0" align="center" cellpadding="0" cellspacing="0">
				<tr> 
                  <td height="228"><% =  RegisterNotice %></td>
                </tr>
                <tr> 
                  <td height="39">
					<div align="center">
					<input style="CURSOR: hand" onClick="window.location.href='Reg_info.asp?SubSys=<%=Request.QueryString("SubSys")%>'" type="submit" name="Submit3" value="同意协议" id="agree">
										　
					<input class="button" onClick="location.href='../'" type="button" value="不同意" name="Submit12" />
										　 
                    </div></td>
                </tr>
              </table>
			  <%End if%>
            </td>
        </tr>
        <tr class="back"> 
          <td height="26"  colspan="2" class="xingmu"> <div align="left"> 
              <!--#include file="Copyright.asp" -->
            </div></td>
        </tr>
      </table></td>
  </tr>
</table>
</body>
</html>
<!--Powsered by Foosun Inc.,Product:FoosunCMS V4.0系列-->
<SCRIPT LANGUAGE="JavaScript">
<!--
document.getElementById('agree').disabled=true;
for (i=6; i>0; i--)
{
	window.setTimeout('change('+i+')',i*1000);
}
window.setTimeout("agree()",6000);
function agree()
{
	document.getElementById('agree').value='同意协议';
	document.getElementById('agree').disabled=false;
}
function change(Num)
{	
	Num = 6-Num;
	document.getElementById('agree').value='同意协议'+Num;
}
//-->
</SCRIPT>

						