Category

Development Platform
Home > SourceCode/Document > Windows Develop > ADO-ODBC > View Code
Reg_Contact.asp
Package: eat.rar　[view]
Upload User: jisenq
Upload Date: 2014-06-29
Package Size: 7216k
Code Size: 33k
Category:

ADO-ODBC

Development Platform:

ASP/ASPX

Reg_Contact.asp：Code Content
  1. <% Option Explicit %>
  2. <!--#include file="../FS_Inc/Const.asp" -->
  3. <!--#include file="../FS_InterFace/MF_Function.asp" -->
  4. <!--#include file="../FS_Inc/Function.asp" -->
  5. <!--#include file="../FS_Inc/Md5.asp" -->
  6. <!--#include file="lib/strlib.asp" -->
  7. <%
  8. Dim Fs_User
  9. User_GetParm
  10. Set Fs_User = New Cls_User
  11. if RegisterTF =false then
  12. strShowErr = "<li>暂时关闭注册功能</li><li>或者系统参数丢失!</li>"
  13. Response.Redirect("lib/Error.asp?ErrCodes="&Server.URLEncode(strShowErr)&"&ErrorUrl=")
  14. Response.end
  15. End if
  16. '保存入数据库
  17. If Request.Form("Action") = "SaveData" then
  18. Dim p_UserName_1,p_UserPassword_1,p_PassQuestion_1,p_PassAnswer_1,p_SafeCode_1,p_Email_1,p_IsCorporation_1,p_unMD5Password_1
  19. Dim p_NickName,p_RealName,p_sex,p_Year,p_month,p_day,p_Certificate,p_CerTificateCode,p_VerCode,strUserNumber,p_Province,p_city
  20. Dim p_C_Name,p_C_ShortName,p_C_Province,p_C_City,p_C_Address,p_C_PostCode,p_C_ConactName,p_C_Tel,p_C_Fax,p_C_VocationClassID,p_C_Website,p_C_size,p_C_Capital,p_C_BankName,p_C_BankUserName
  21. p_UserName_1 = Replace(Request.Form("UserName"),"''","")
  22. p_PassQuestion_1 = Replace(Request.Form("PassQuestion"),"''","")
  23. p_PassAnswer_1 = MD5(Request.Form("PassAnswer"),16)
  24. p_SafeCode_1 = MD5(Request.Form("SafeCode"),16)
  25. p_Email_1 = Replace(Request.Form("Email"),"''","")
  26. p_IsCorporation_1 = cint(Request.Form("IsCorporation"))
  27. if p_isValidate = 1 then
  28. p_unMD5Password_1 = session("Tmp_password")
  29. p_UserPassword_1 = session("Tmp_p_password")
  30. Else
  31. p_UserPassword_1 =Trim(Request.Form("UserPassword"))
  32. p_unMD5Password_1 = Request.Form("unMD5Password")
  33. End if
  35. p_NickName = Request.Form("NickName")
  36. p_RealName = Replace(Request.Form("RealName"),"''","")
  37. p_sex = cint(Request.Form("sex"))
  38. p_Year = Request.Form("Year")
  39. p_month = Request.Form("month")
  40. p_day = Request.Form("day")
  41. p_Certificate = cint(Request.Form("Certificate"))
  42. p_CerTificateCode = Replace(Request.Form("CerTificateCode"),"''","")
  43. p_VerCode = Request.Form("VerCode")
  44. p_Province = Request.Form("Province")
  45. p_City = Request.Form("City")
  47. p_C_Name = Request.Form("C_Name")
  48. p_C_ShortName = Request.Form("C_ShortName")
  49. p_C_Province = Request.Form("C_Province")
  50. p_C_City = Request.Form("C_City")
  51. p_C_Address = Request.Form("C_Address")
  52. p_C_PostCode = Request.Form("C_PostCode")
  53. p_C_ConactName = Request.Form("C_ConactName")
  54. p_C_Tel = Request.Form("C_Tel")
  55. p_C_Fax = Request.Form("C_Fax")
  56. p_C_VocationClassID = Request.Form("C_VocationClassID")
  57. p_C_Website = Request.Form("C_Website")
  58. p_C_size = Request.Form("C_size")
  59. p_C_Capital = Request.Form("C_Capital")
  60. p_C_BankName = Request.Form("C_BankName")
  61. p_C_BankUserName = Request.Form("C_BankUserName")
  62. dim strUserNumberRule
  63. If Not p_UserNumberRule="" Or Not IsNull(p_UserNumberRule) Then
  64. strUserNumberRule= Fs_User.strUserNumberRule(p_UserNumberRule)
  65. Else
  66. strUserNumberRule=GetRamCode(13)
  67. End if
  68. if cstr(Session("GetCode"))<>cstr(lcase(Trim(p_VerCode))) then
  69. strShowErr = "<li>验证码不正确！</li><li>长时间没动作,请点验证刷新一次再输入!</li>"
  70. Response.Redirect("lib/Error.asp?ErrCodes="&Server.URLEncode(strShowErr)&"&ErrorUrl=")
  71. Response.end
  72. End if
  73. if Request.Form("IsCorporation") = "1" then
  74. If Trim(p_C_Name)="" Or Trim(p_C_Province)="" Or Trim(p_C_City)="" Or Trim(p_C_PostCode)=""  Or Trim(p_C_ConactName)="" Or Trim(p_C_Tel)="" or trim(p_C_VocationClassID)="" then
  75. strShowErr = "<li>企业注册需要填写完整资料！</li><li>请填写完整,企业名称,所在省份,城市,邮编,联系人,联系电话!,行业</li>"
  76. Response.Redirect("lib/Error.asp?ErrCodes="&Server.URLEncode(strShowErr)&"&ErrorUrl=")
  77. Response.end
  78. End if
  79. Dim AddCorpDataTFObj
  80. Set AddCorpDataTFObj = server.CreateObject(G_FS_RS)
  81. AddCorpDataTFObj.open "select  C_Name From FS_ME_CorpUser where C_Name = '"& p_C_Name &"'",User_Conn,1,3
  82. If Not AddCorpDataTFObj.eof then
  83. strShowErr = "<li>您提交的企业名称已经被注册！</li>"
  84. Response.Redirect("lib/Error.asp?ErrCodes="&Server.URLEncode(strShowErr)&"&ErrorUrl=")
  85. Response.end
  86. End if
  87. AddCorpDataTFObj.close:set AddCorpDataTFObj = nothing
  88. End if 
  89. Dim AddUserDataTFObj,UserNumberRuleObj,AddUserDataObj
  90. Set AddUserDataTFObj = server.CreateObject(G_FS_RS)
  91. AddUserDataTFObj.open "select  UserName,Email From FS_ME_Users where UserName = '"& p_UserName_1 &"'",User_Conn,1,3
  92. If Not AddUserDataTFObj.eof then
  93. strShowErr = "<li>您提交的用户名或者电子邮件已经被注册!</li>"
  94. Response.Redirect("lib/Error.asp?ErrCodes="&Server.URLEncode(strShowErr)&"&ErrorUrl=../Reg_info.asp")
  95. Response.end
  96. End if
  97. AddUserDataTFObj.close:set AddUserDataTFObj =nothing
  98. '判断用户编号是否重复
  99. Set UserNumberRuleObj = server.CreateObject(G_FS_RS)
  100. UserNumberRuleObj.open "select  UserNumber From FS_ME_Users where UserName='"& p_UserName_1&"'",User_Conn,1,1
  101. If Not UserNumberRuleObj.eof then
  102. strShowErr = "<li>您提交的用户编号意外重复，非常抱歉，请重新填写用户资料。!</li>"
  103. Response.Redirect("lib/Error.asp?ErrCodes="&Server.URLEncode(strShowErr)&"&ErrorUrl=../Reg_info.asp")
  104. Response.end
  105. End if
  106. '插入用户数据
  107. Set AddUserDataObj = server.CreateObject(G_FS_RS)
  108. AddUserDataObj.open "select  * From FS_ME_Users where 1=0",User_Conn,1,3
  109. AddUserDataObj.addNew
  110. AddUserDataObj("UserNumber") = strUserNumberRule
  111. AddUserDataObj("UserName") = p_UserName_1
  112. AddUserDataObj("UserPassword") = p_UserPassword_1
  113. AddUserDataObj("PassQuestion") = p_PassQuestion_1
  114. AddUserDataObj("PassAnswer") = p_PassAnswer_1
  115. AddUserDataObj("safeCode") = p_safeCode_1
  116. AddUserDataObj("Email") = p_Email_1
  117. AddUserDataObj("isMessage") = 0
  118. AddUserDataObj("HeadPicsize") = "60,60"
  119. AddUserDataObj("NickName") = p_NickName
  120. AddUserDataObj("RealName") = p_RealName
  121. AddUserDataObj("Province") = p_Province
  122. AddUserDataObj("city") = p_city
  123. AddUserDataObj("Sex") = p_Sex
  124. AddUserDataObj("BothYear") = p_year&"-"&p_month&"-"&p_day
  125. AddUserDataObj("Certificate") = p_Certificate
  126. AddUserDataObj("CertificateCode") = p_CertificateCode
  127. AddUserDataObj("IsCorporation") = p_IsCorporation_1
  128. AddUserDataObj("RegTime") = now
  129. AddUserDataObj("CloseTime") = "3000-1-1"
  130. AddUserDataObj("LoginNum") = 0
  131. AddUserDataObj("Integral") = p_NumGetPoint
  132. AddUserDataObj("FS_Money") = p_NumGetMoney
  133. 'AddUserDataObj("TempLastLoginTime") = year(now)&"-"&month(now)&"-"&day(now)
  134. AddUserDataObj("TempLastLoginTime") = now
  135. AddUserDataObj("TempLastLoginTime_1") = now
  136. if p_RegisterCheck = 1 then
  137. AddUserDataObj("isLock") = 1
  138. Else
  139. AddUserDataObj("isLock") = 0
  140. End if
  141. AddUserDataObj("MySkin") = 2
  142. AddUserDataObj("OnlyLogin") = 0
  143. AddUserDataObj("ConNumber") = 0
  144. AddUserDataObj("ConNumberNews") = 0
  145. AddUserDataObj("isOpen") = 0
  146. AddUserDataObj("GroupID") = DefaultGroupID
  147. AddUserDataObj.Update
  148. AddUserDataObj.close:set AddUserDataObj = nothing
  149. '更新数据，获得相应期限或者金币，积分
  150. '说明：如果为0，则不限制
  151. '开始建立对象
  152. Dim rsCreatGroup 
  153. set rsCreatGroup =User_Conn.execute("select GroupID,GroupPoint,GroupMoney,GroupDate From FS_ME_Group where GroupID="&Clng(DefaultGroupID))
  154. if not rsCreatGroup.eof then
  155. if rsCreatGroup("GroupPoint")>0 then
  156. User_Conn.execute("Update FS_ME_Users Set Integral=Integral+"& rsCreatGroup("GroupPoint")&" where UserNumber='"& strUserNumberRule &"'")
  157. end if
  158. if rsCreatGroup("GroupMoney")>0 then
  159. User_Conn.execute("Update FS_ME_Users Set FS_Money=FS_Money+"& rsCreatGroup("GroupMoney") &" where UserNumber='"& strUserNumberRule &"'")
  160. end if
  161. if rsCreatGroup("GroupDate")>0 then
  162. dim DateCoseed
  163. DateCoseed = dateAdd("d",rsCreatGroup("GroupDate"),date)
  164. if G_IS_SQL_User_DB=0 then
  165. User_Conn.execute("Update FS_ME_Users Set CloseTime=#"& DateCoseed &"# where UserNumber='"& strUserNumberRule &"'")
  166. else
  167. User_Conn.execute("Update FS_ME_Users Set CloseTime='"& DateCoseed &"' where UserNumber='"& strUserNumberRule &"'")
  168. end if
  169. end if
  170. end if
  171. rsCreatGroup.close:set rsCreatGroup = nothing
  172. if p_IsCorporation_1 = 1 then
  173. Dim AddCorpDataObj
  174. Set AddCorpDataObj = server.CreateObject(G_FS_RS)
  175. AddCorpDataObj.open "select  * From FS_ME_CorpUser where 1=0",User_Conn,1,3
  176. AddCorpDataObj.addNew
  177. AddCorpDataObj("UserNumber") = strUserNumberRule
  178. AddCorpDataObj("C_Name") = p_C_Name
  179. AddCorpDataObj("C_ShortName") = p_C_ShortName
  180. AddCorpDataObj("C_Province") = p_C_Province
  181. AddCorpDataObj("C_City") = p_C_City
  182. AddCorpDataObj("C_Address") = p_C_Address
  183. AddCorpDataObj("C_ConactName") = p_C_ConactName
  184. AddCorpDataObj("C_Tel") = p_C_Tel
  185. AddCorpDataObj("C_Fax") = p_C_Fax
  186. AddCorpDataObj("C_VocationClassID") = p_C_VocationClassID
  187. AddCorpDataObj("C_WebSite") = p_C_WebSite
  188. AddCorpDataObj("C_size") = p_C_size
  189. AddCorpDataObj("C_Capital") = p_C_Capital
  190. AddCorpDataObj("C_BankName") = p_C_BankName
  191. AddCorpDataObj("C_BankUserName") = p_C_BankUserName
  192. AddCorpDataObj("C_PostCode") = p_C_PostCode
  193. AddCorpDataObj("isYellowPage") = 0 
  194. AddCorpDataObj("isYellowPageCheck") = 0 
  195. if p_isCheckCorp = 1 then
  196. AddCorpDataObj("isLockCorp") =1
  197. Else
  198. AddCorpDataObj("isLockCorp") =0
  199. End if
  200. AddCorpDataObj.update
  201. AddCorpDataObj.close:set AddCorpDataObj = nothing
  202. End if
  203. session("FS_UserName") = p_UserName_1
  204. session("FS_UserNumber") = strUserNumberRule
  205. session("FS_NickName") = p_NickName
  206. session("FS_UserPassword") = p_UserPassword_1
  207. session("TMP_UserPassword") = p_unMD5Password_1
  208. session("FS_IsCorp") = p_IsCorporation_1
  209. session("FS_UserEmail") = p_Email_1
  210. session("FS_IsLock") = p_RegisterCheck
  211. Response.Cookies("FoosunUserCookies")("UserLogin_Style_Num") = 1
  212. Call Fs_User.InsertMyPara(session("FS_UserNumber") )
  213. Call Fs_User.AddLog("注册",session("FS_UserNumber"),p_NumGetPoint,p_NumGetMoney,"注册获得积分",0) 
  214. Dim str_isSendMail,FsoObj,Path
  215. Set FsoObj = Server.CreateObject(G_FS_FSO)  
  216. Path = strUserNumberRule
  217. if FsoObj.FolderExists(Server.MapPath(".."&G_USERFILES_DIR) ) = false then FsoObj.createFolder Server.MapPath(".."&G_USERFILES_DIR) 
  218. Path = Server.MapPath(".."&G_USERFILES_DIR&""&Path) 
  219. if FsoObj.FolderExists(Path) = True then FsoObj.deleteFolder Path
  220. FsoObj.CreateFolder Path
  221. str_isSendMail=false
  222. Response.Redirect("Reg_Result.asp?SubSys="&Request.Form("SubSys")&"")
  223. Response.end
  224. End if
  225. '调用传来的数据
  226. Dim p_UserName,p_UserPassword,p_PassQuestion,p_PassAnswer,p_SafeCode,p_Email,p_IsCorporation,p_unMD5Password,LimitUserNameArr
  227. p_UserName = NoHtmlHackInput(Replace(Replace(Request.Form("UserName"),"""",""),"'",""))
  228. if p_isValidate = 1 then 
  229. Dim Randomizecode
  230. Randomizecode=GetRamCode(8)
  231. session("Tmp_p_password")  = MD5(Randomizecode,16)
  232. session("Tmp_password") = Randomizecode
  233. Else
  234. p_UserPassword = MD5(Request.Form("UserPassword"),16)
  235. p_unMD5Password = Request.Form("UserPassword")
  236. End if
  237. p_PassQuestion = NoHtmlHackInput(Replace(Replace(Request.Form("PassQuestion"),"""",""),"'",""))
  238. p_PassAnswer = Request.Form("PassAnswer")
  239. p_SafeCode = MD5(Request.Form("SafeCode"),16)
  240. p_Email = NoHtmlHackInput(Replace(Replace(Request.Form("Email"),"""",""),"'",""))
  241. p_IsCorporation = cint(Request.Form("IsCorporation"))
  242. If Trim(p_UserName)="" or Trim(p_Email)="" then
  243. strShowErr = "<li>错误的参数提交!</li><li>请不要从外部提交数据!</li>"
  244. Response.Redirect("lib/Error.asp?ErrCodes="&Server.URLEncode(strShowErr)&"&ErrorUrl=")
  245. Response.end
  246. End if
  247. if Fs_User.chk_regname(p_LimitUserName,p_UserName) = false then
  248. strShowErr = "<li>用户名不允许注册</li>"
  249. Response.Redirect("lib/Error.asp?ErrCodes="&Server.URLEncode(strShowErr)&"&ErrorUrl=")
  250. Response.end
  251. End if 
  252. Dim GetUserTFObj
  253. Set GetUserTFObj = server.CreateObject(G_FS_RS)
  254. GetUserTFObj.open "select   UserName,Email From FS_ME_Users where UserName = '"& p_UserName &"'",User_Conn,1,3
  255. If  Not GetUserTFObj.eof then
  256. strShowErr = "<li>您填写的用户名已经被注册!</li><li>您填写的电子邮件已经被注册!"
  257. Response.Redirect("lib/Error.asp?ErrCodes="&Server.URLEncode(strShowErr)&"&ErrorUrl=")
  258. Response.end
  259. GetUserTFObj.Close:set GetUserTFObj = nothing  
  260. Else
  261. %>
  262. <html xmlns="http://www.w3.org/1999/xhtml">
  263. <title>会员注册step 3 of  4 step</title>
  264. <meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
  265. <meta content="MSHTML 6.00.3790.2491" name="GENERATOR" />
  266. <meta name="keywords" content="风讯,风讯cms,cms,FoosunCMS,FoosunOA,FoosunVif,vif,风讯网站内容管理系统">
  267. <link href="images/skin/Css_<%=Request.Cookies("FoosunUserCookies")("UserLogin_Style_Num")%>/<%=Request.Cookies("FoosunUserCookies")("UserLogin_Style_Num")%>.css" rel="stylesheet" type="text/css">
  268. <head>
  269. <body oncontextmenu="return false;">
  270. <table width="98%" border="0" align="center" cellpadding="1" cellspacing="0">
  271.   <tr> 
  272.     <td><table width="100%" height="279" border="0" align="center" cellpadding="4" cellspacing="1" class="table">
  273.         <tr class="back"> 
  274.           <td   colspan="2" class="xingmu" height="24">·User Register step 3.(填写会员联系资料)</td>
  275.         </tr>
  276.         <tr class="back"> 
  277.           <td width="15%" valign="top" class="hback"><strong>【注册步骤】</strong> <br>
  278.             <br>
  279.             <div align="left"> √同意注册协议<br>
  280.               <br>
  281.               √填写会员资料<br>
  282.               <br>
  283.               →填写联系资料<br>
  284.               <br>
  285.               ×注册成功</div>
  286.             </td>
  287.           <td width="86%" valign="top" class="hback"> 
  288.               <table width="96%" border="0" align="center" cellpadding="4" cellspacing="1" class="table">
  289.               <form name="UserForm"  id="UserForm" method="post" action="Reg_contact.asp"   onsubmit="return CheckForm();">
  290.                 <tr class="back"> 
  291.                   <td height="20" colspan="3" class="xingmu">请填写个人资料：（以下信息是您通过客服取回帐号的最后依据，请如实填写） 
  292.                   </td>
  293.                 </tr>
  294.                 <tr class="back"> 
  295.                   <td height="27"><div align="right"><span class="tx">*</span>昵称</div></td>
  296.                   <td><input name="NickName" type="text" id="NickName" size="20" maxlength="20"></td>
  297.                   <td>请填写您对外的昵称。可以为中文</td>
  298.                 </tr>
  299.                 <tr class="back"> 
  300.                   <td width="15%" height="27"> <div align="right">姓名</div></td>
  301.                   <td width="29%"><input name="RealName" type="text" id="RealName" size="20" maxlength="20"> 
  302.                   </td>
  303.                   <td width="56%">请填写您的真实姓名。</td>
  304.                 </tr>
  305.                 <tr class="back"> 
  306.                   <td height="16"><div align="right"><span class="tx">*</span>性别</div></td>
  307.                   <td><input type="radio" name="sex" value="0">
  308.                     男 
  309.                     <input type="radio" name="sex" value="0">
  310.                     女 
  311.                     <input name="sex1" type="hidden" id="sex1"></td>
  312.                   <td>请您选择性别。</td>
  313.                 </tr>
  314.                 <tr class="back"> 
  315.                   <td height="24"> <div align="right">出生日期</div></td>
  316.                   <td><input name="Year" type="text" id="Year" value="19" size="5" maxlength="4">
  317.                     年 
  318.                     <select name="month" id="month">
  319.                       <option value="1" selected>1</option>
  320.                       <option value="2">2</option>
  321.                       <option value="3">3</option>
  322.                       <option value="4">4</option>
  323.                       <option value="5">5</option>
  324.                       <option value="6">6</option>
  325.                       <option value="7">7</option>
  326.                       <option value="8">8</option>
  327.                       <option value="9">9</option>
  328.                       <option value="10">10</option>
  329.                       <option value="11">11</option>
  330.                       <option value="12">12</option>
  331.                     </select>
  332.                     月 
  333.                     <select name="day" id="day">
  334.                       <option value="1" selected>1</option>
  335.                       <option value="2">2</option>
  336.                       <option value="3">3</option>
  337.                       <option value="4">4</option>
  338.                       <option value="5">5</option>
  339.                       <option value="6">6</option>
  340.                       <option value="7">7</option>
  341.                       <option value="8">8</option>
  342.                       <option value="9">9</option>
  343.                       <option value="10">10</option>
  344.                       <option value="11">11</option>
  345.                       <option value="12">12</option>
  346.                       <option value="13">13</option>
  347.                       <option value="14">14</option>
  348.                       <option value="15">15</option>
  349.                       <option value="16">16</option>
  350.                       <option value="17">17</option>
  351.                       <option value="18">18</option>
  352.                       <option value="19">19</option>
  353.                       <option value="20">20</option>
  354.                       <option value="21">21</option>
  355.                       <option value="22">22</option>
  356.                       <option value="23">23</option>
  357.                       <option value="24">24</option>
  358.                       <option value="25">25</option>
  359.                       <option value="26">26</option>
  360.                       <option value="27">27</option>
  361.                       <option value="28">28</option>
  362.                       <option value="29">29</option>
  363.                       <option value="30">30</option>
  364.                       <option value="31">31</option>
  365.                     </select>
  366.                     日 </td>
  367.                   <td>请填写您的真实生日，该项用于取回密码。</td>
  368.                 </tr>
  369.                 <tr class="back"> 
  370.                   <td height="16"><div align="right"><span class="tx">*</span>证件类别</div></td>
  371.                   <td> <select name=Certificate  id="Certificate">
  372.                       <option value="0" selected>身份证</option>
  373.                       <option value="2">学生证</option>
  374.                       <option value="1">驾驶证</option>
  375.                       <option value="3">军人证</option>
  376.                       <option value="4">护照</option>
  377.                     </select> </td>
  378.                   <td rowspan="2">有效证件作为取回帐号的最后手段，用以核实帐号的合法身份，请您务必如实填写。<br> <span class="tx">特别提醒：有效证件一旦设定，不可更改</span></td>
  379.                 </tr>
  380.                 <tr class="back"> 
  381.                   <td height="16"><div align="right"><span class="tx">*</span>证件号码</div></td>
  382.                   <td><input name="CerTificateCode" type="text" id="CerTificateCode" size="30" maxlength="20"></td>
  383.                 </tr>
  384.                 <tr class="back"> 
  385.                   <td height="16"><div align="right"><span class="tx">*</span>省份</div></td>
  386.                   <td height="16"><select name="Province" size=1 id="Province">
  387.                       <option value="">请选择　　</option>
  388.                       <option value="四川">四川</option>
  389.                       <option value="北京">北京</option>
  390.                       <option value="上海">上海</option>
  391.                       <option value="天津">天津</option>
  392.                       <option value="重庆">重庆</option>
  393.                       <option value="安徽">安徽</option>
  394.                       <option value="甘肃">甘肃</option>
  395.                       <option value="广东">广东</option>
  396.                       <option value="广西">广西</option>
  397.                       <option value="贵州">贵州</option>
  398.                       <option value="福建">福建</option>
  399.                       <option value="海南">海南</option>
  400.                       <option value="河北">河北</option>
  401.                       <option value="河南">河南</option>
  402.                       <option value="黑龙江">黑龙江</option>
  403.                       <option value="湖北">湖北</option>
  404.                       <option value="湖南">湖南</option>
  405.                       <option value="吉林">吉林</option>
  406.                       <option value="江苏">江苏</option>
  407.                       <option value="江西">江西</option>
  408.                       <option value="辽宁">辽宁</option>
  409.                       <option value="内蒙古">内蒙古</option>
  410.                       <option value="宁夏">宁夏</option>
  411.                       <option value="青海">青海</option>
  412.                       <option value="山东">山东</option>
  413.                       <option value="山西">山西</option>
  414.                       <option value="陕西">陕西</option>
  415.                       <option value="西藏">西藏</option>
  416.                       <option value="新疆">新疆</option>
  417.                       <option value="云南">云南</option>
  418.                       <option value="浙江">浙江</option>
  419.                       <option value="港澳台">港澳台</option>
  420.                       <option value="海外">海外</option>
  421.                       <option value="其它">其它</option>
  422.                     </select></td>
  423.                   <td height="16" >您现在所在的省份</td>
  424.                 </tr>
  425.                 <tr class="back"> 
  426.                   <td height="16"><div align="right"><span class="tx">*</span>城市</div></td>
  427.                   <td height="16"><input name="City" type="text" id="City" size="30" maxlength="20"></td>
  428.                   <td height="16">您现在所在的城市</td>
  429.                 </tr>
  430.                 <tr class="back"> 
  431.                   <td height="16" colspan="3" class="xingmu">填写校验码：</td>
  432.                 </tr>
  433.                 <tr class="back"> 
  434.                   <td height="16"><div align="right"><span class="tx">*</span>校验码</div></td>
  435.                   <td><input name="VerCode" type="text" id="VerCode" size="15"> 
  436.                     <img src="../Fs_Inc/vCode.asp?" onClick="this.src+=Math.random()" alt="图片看不清？点击重新得到验证码,注意：区别大小写" style="cursor:hand;"> </td>
  437.                   <td>请将图中数字填入左边输入框中，该步骤有利于防止注册机。<br> <span class="tx">如果您长时间没有进行操作，请点验证码，重新获得验证代码。</span></td>
  438.                 </tr>
  439.                 <%if  p_IsCorporation =1 then%>
  440.                 <tr class="back"> 
  441.                   <td height="16" colspan="3" class="xingmu">填写公司资料： </td>
  442.                 </tr>
  443.                 <tr class="back"> 
  444.                   <td height="16"><div align="right"><span class="tx">*</span>公司名称</div></td>
  445.                   <td><input name="C_Name" type="text" id="C_Name" size="30" maxlength="50"></td>
  446.                   <td>请填写您公司的全称</td>
  447.                 </tr>
  448.                 <tr class="back"> 
  449.                   <td height="-2"><div align="right">公司简称</div></td>
  450.                   <td><input name="C_ShortName" type="text" id="C_ShortName" size="30" maxlength="30"></td>
  451.                   <td>请填写您公司的简单称呼</td>
  452.                 </tr>
  453.                 <tr class="back"> 
  454.                   <td height="0"><div align="right"><span class="tx">*</span>公司所在省份</div></td>
  455.                   <td> <select name="C_Province" size=1 id="C_Province">
  456.                       <option value="">请选择　　</option>
  457.                       <option value="四川">四川</option>
  458.                       <option value="北京">北京</option>
  459.                       <option value="上海">上海</option>
  460.                       <option value="天津">天津</option>
  461.                       <option value="重庆">重庆</option>
  462.                       <option value="安徽">安徽</option>
  463.                       <option value="甘肃">甘肃</option>
  464.                       <option value="广东">广东</option>
  465.                       <option value="广西">广西</option>
  466.                       <option value="贵州">贵州</option>
  467.                       <option value="福建">福建</option>
  468.                       <option value="海南">海南</option>
  469.                       <option value="河北">河北</option>
  470.                       <option value="河南">河南</option>
  471.                       <option value="黑龙江">黑龙江</option>
  472.                       <option value="湖北">湖北</option>
  473.                       <option value="湖南">湖南</option>
  474.                       <option value="吉林">吉林</option>
  475.                       <option value="江苏">江苏</option>
  476.                       <option value="江西">江西</option>
  477.                       <option value="辽宁">辽宁</option>
  478.                       <option value="内蒙古">内蒙古</option>
  479.                       <option value="宁夏">宁夏</option>
  480.                       <option value="青海">青海</option>
  481.                       <option value="山东">山东</option>
  482.                       <option value="山西">山西</option>
  483.                       <option value="陕西">陕西</option>
  484.                       <option value="西藏">西藏</option>
  485.                       <option value="新疆">新疆</option>
  486.                       <option value="云南">云南</option>
  487.                       <option value="浙江">浙江</option>
  488.                       <option value="港澳台">港澳台</option>
  489.                       <option value="海外">海外</option>
  490.                       <option value="其它">其它</option>
  491.                     </select> </td>
  492.                   <td>请填写您公司所在的省份</td>
  493.                 </tr>
  494.                 <tr class="back"> 
  495.                   <td height="0"><div align="right"><span class="tx">*</span>公司所在城市</div></td>
  496.                   <td><input name="C_City" type="text" id="C_City" size="30" maxlength="20"></td>
  497.                   <td>请填写您公司所在的城市</td>
  498.                 </tr>
  499.                 <tr class="back"> 
  500.                   <td height="0"><div align="right"><span class="tx">*</span>公司地址</div></td>
  501.                   <td><input name="C_Address" type="text" id="C_Address" size="30" maxlength="100"></td>
  502.                   <td>您的公司地址</td>
  503.                 </tr>
  504.                 <tr class="back"> 
  505.                   <td height="0"><div align="right"><span class="tx">*</span>邮政编码</div></td>
  506.                   <td><input name="C_PostCode" type="text" id="C_PostCode" size="30" maxlength="20"></td>
  507.                   <td>您公司的邮政编码</td>
  508.                 </tr>
  509.                 <tr class="back"> 
  510.                   <td height="0"><div align="right"><span class="tx">*</span>公司联系人</div></td>
  511.                   <td><input name="C_ConactName" type="text" id="C_ConactName" size="30" maxlength="20"></td>
  512.                   <td>公司联系人</td>
  513.                 </tr>
  514.                 <tr class="back"> 
  515.                   <td height="0"><div align="right"><span class="tx">*</span>公司联系电话</div></td>
  516.                   <td><input name="C_Tel" type="text" id="C_Tel" size="30" maxlength="20"></td>
  517.                   <td>公司联系电话。有分机请用&quot;-&quot;分开，如：028-85098980-606</td>
  518.                 </tr>
  519.                 <tr class="back"> 
  520.                   <td height="1"><div align="right">公司传真</div></td>
  521.                   <td><input name="C_Fax" type="text" id="C_Fax" size="30" maxlength="20"></td>
  522.                   <td>公司传真。有分机请用&quot;-&quot;分开，如：028-85098980-606</td>
  523.                 </tr>
  524.                 <tr class="back"> 
  525.                   <td height="3"><div align="right"><span class="tx">*</span>行业</div></td>
  526.                   <td><input name="C_VocationClassID" type="text" id="C_VocationClassID" size="30" readonly></td>
  527.                   <td><input type="button" name="Submit3" value="选择行业" onClick="OpenWindowAndSetValue('lib/SelectClassFrame.asp',400,300,window,document.UserForm.C_VocationClassID);document.UserForm.C_VocationClassID.focus();">
  528.                     公司所在的行业</td>
  529.                 </tr>
  530.                 <tr class="back"> 
  531.                   <td height="8"><div align="right">公司网站</div></td>
  532.                   <td><input name="C_Website" type="text" id="C_Website" size="30" maxlength="200"></td>
  533.                   <td>公司所在的企业站点</td>
  534.                 </tr>
  535.                 <tr class="back"> 
  536.                   <td height="16"><div align="right">公司规模</div></td>
  537.                   <td><select name="C_size" id="C_size">
  538.                       <option value="1-20人" selected>1-20人</option>
  539.                       <option value="21-50人">21-50人</option>
  540.                       <option value="51-100人">51-100人</option>
  541.                       <option value="101-200人">101-200人</option>
  542.                       <option value="201-500人">201-500人</option>
  543.                       <option value="501-1000人">501-1000人</option>
  544.                       <option value="1000人以上">1000人以上</option>
  545.                     </select></td>
  546.                   <td>&nbsp;</td>
  547.                 </tr>
  548.                 <tr class="back"> 
  549.                   <td height="1"><div align="right">公司注册资本</div></td>
  550.                   <td><select name="C_Capital" id="C_Capital">
  551.                       <option value="10万以下">10万以下</option>
  552.                       <option value="10万-19万">10万-19万</option>
  553.                       <option value="20万-49万">20万-49万</option>
  554.                       <option value="50万-99万" selected>50万-99万</option>
  555.                       <option value="100万-199万">100万-199万</option>
  556.                       <option value="200万-499万">200万-499万</option>
  557.                       <option value="500万-999万">500万-999万</option>
  558.                       <option value="1000万以上">1000万以上</option>
  559.                     </select></td>
  560.                   <td>&nbsp;</td>
  561.                 </tr>
  562.                 <tr class="back"> 
  563.                   <td height="3"><div align="right">开户银行</div></td>
  564.                   <td><input name="C_BankName" type="text" id="C_BankName" size="30" maxlength="50"></td>
  565.                   <td rowspan="2"><p>公司银行帐户，以方便放在您的联系资料中。<br>
  566.                       开户银行例子：中国工商银行成都分行双楠分理处<br>
  567.                       银行帐户名：</p></td>
  568.                 </tr>
  569.                 <tr class="back"> 
  570.                   <td height="8"><div align="right">银行帐号及帐户名</div></td>
  571.                   <td><textarea name="C_BankUserName" cols="30" rows="4" id="C_BankUserName"></textarea></td>
  572.                 </tr>
  573.                 <%End if%>
  574.                 <tr class="back"> 
  575.                   <td height="39" colspan="3"> <div align="center"> 
  576.                       <input name="Action" type="hidden" id="Action" value="SaveData">
  577.                       <input name="UserName" type="hidden" id="UserName" value="<% = p_UserName %>">
  578.                       <input name="UserPassword" type="hidden" id="UserPassword" value="<% = p_UserPassword %>">
  579.                       <input name="PassQuestion" type="hidden" id="PassQuestion" value="<% = p_PassQuestion %>">
  580.                       <input name="PassAnswer" type="hidden" id="PassAnswer" value="<% = p_PassAnswer %>">
  581.                       <input name="SafeCode" type="hidden" id="SafeCode" value="<% = p_SafeCode %>">
  582.                       <input name="Email" type="hidden" id="Email" value="<% = p_Email %>">
  583.                       <input name="IsCorporation" type="hidden" id="IsCorporation" value="<% = p_IsCorporation %>">
  584.                       <input name="unMD5Password" type="hidden" id="unMD5Password" value="<% = p_unMD5Password %>">
  585.                       <input name="SubSys" type="hidden" id="SubSys" value="<% = Request.Form("SubSys")%>">
  586.   <input type="submit" name="Submit" value="保存数据,开始注册" style="CURSOR:hand">
  587.                       　 
  588.                       <input type="reset" name="Submit2" value="重置">
  589.                       　 
  590.                       <input class="button" onClick="javascript:location.href='../'" type="button"  style="CURSOR:hand" value="返回首页" name="Submit1" />
  591.                     </div></td>
  592.                 </tr>
  593.               </form>
  594.             </table>
  595.             </td>
  596.         </tr>
  597.         <tr class="back"> 
  598.           <td height="26"  colspan="2" class="xingmu"> <div align="left"> 
  599.               <!--#include file="Copyright.asp" -->
  600.             </div></td>
  601.         </tr>
  602.       </table></td>
  603.   </tr>
  604. </table>
  605. </body>
  606. </html>
  607. <%
  608. End if
  609. set Fs_User = nothing
  610. %>
  611. <!--Powsered by Foosun Inc.,Product:FoosunCMS V4.0系列-->
  612. <script language="JavaScript" type="text/javascript">
  613. function CheckForm()
  614. {
  615. if(document.UserForm.NickName.value=="")
  616. {
  617. alert("请输入您的昵称!");
  618. document.UserForm.NickName.focus();
  619. return false;
  620. }
  621. if(document.UserForm.Province.value=="")
  622. {
  623. alert("请输入省份!");
  624. document.UserForm.Province.focus();
  625. return false;
  626. }
  627. if(document.UserForm.City.value=="")
  628. {
  629. alert("请输入城市!");
  630. document.UserForm.City.focus();
  631. return false;
  632. }
  633. if( !(UserForm.sex[0].checked || UserForm.sex[1].checked)) {
  634. alert("请选择性别 !");
  635. return false;
  636. }
  637. if(document.UserForm.VerCode.value=="")
  638. {
  639. alert("请输入验证码!");
  640. document.UserForm.VerCode.focus();
  641. return false;
  642. }
  643. }
  644. </script>
  645. <script language="JavaScript" type="text/JavaScript">
  646. function OpenWindowAndSetValue(Url,Width,Height,WindowObj,SetObj)
  647. {
  648. var ReturnStr=showModalDialog(Url,WindowObj,'dialogWidth:'+Width+'pt;dialogHeight:'+Height+'pt;status:no;help:no;scroll:no;');
  649. if (ReturnStr!='007007007007') SetObj.value=ReturnStr;
  650. return ReturnStr;
  651. }
  652. </script>