⭐ 欢迎来到虫虫下载站！ | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站
📤 上传资源

📄 system_siteconfig.asp

📁 SK信息采集2.0功能介绍: 1.可针对任何静态网页,动态网页进行采集。包括htm,html,shtml,ASP,ASPX,JSP,PHP等。 2.增加自定文件采集.用户可采集网页中的所有文件.
💻 ASP
📖 第 1 页 / 共 5 页
字号:
🔍
12345 
			.Write "</td>"
			
			.Write "    <tr valign=""middle""  bgcolor=""#EEF8FE"" onMouseOver=""this.style.background='#fffff9'"" onMouseOut=""this.style.background='#EEF8FE'"">"
			.Write "      <td width=""32%"" height=""21"">&nbsp;&nbsp;"
			.Write "        <div align=""right"">新会员注册是否需要邮件验证：&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; </div><font color=red>若选择“是”，则会员注册后系统会发一封带有验证码的邮件给此会员，会员必须在通过邮件验证后才能真正成为正式注册会员</font></td>"
			.Write "      <td height=""21""> <input onClick=""setmail(this.value)"" name=""EmailCheckTF"" type=""radio"" id=""EmailCheckTF""  value=""1"""
			 If RS("EmailCheckTF")=1 Then .Write " Checked"
			 .Write ">是"
			 .Write "&nbsp;&nbsp;<input onClick=""setmail(this.value)"" name=""EmailCheckTF"" type=""radio"" id=""EmailCheckTF""  value=""0"""
			 If RS("EmailCheckTF")=0 Then .Write " Checked"
			 .Write ">否"
			 .Write "</td>"
			 
			.Write "    <tr valign=""middle"" id=""mailarea""  bgcolor=""#EEF8FE"" onMouseOver=""this.style.background='#fffff9'"" onMouseOut=""this.style.background='#EEF8FE'"">"
			.Write "      <td width=""32%"" height=""21"">&nbsp;&nbsp;"
			.Write "        <div align=""right""><strong>新会员注册时发送的验证邮件内容：</strong>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<br><br> </div><div align=center>标签说明：<br>$CheckNum}：验证码<br>{$CheckUrl}：会员注册验证地址<div></td>"
			.Write "      <td height=""21""><textarea name=""UserRegSendMail"" cols=""60"" rows=""5"" id=""UserRegSendMail"">" & RS("UserRegSendMail") & "</textarea>"
			.Write "</td>"
			 
			.Write "    <tr valign=""middle""  bgcolor=""#EEF8FE"" onMouseOver=""this.style.background='#fffff9'"" onMouseOut=""this.style.background='#EEF8FE'"">"
			.Write "      <td width=""32%"" height=""21"">&nbsp;&nbsp;"
			.Write "        <div align=""right"">新会员注册是否需要后台验证：&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; </div><font color=red>若选择是，则新注册的会员自动加入待审批会员组中。</font></td>"
			.Write "      <td height=""21""> <input name=""AdminCheckTF"" type=""radio"" id=""AdminCheckTFF""  value=""1"""
			 If RS("AdminCheckTF")=1 Then .Write " Checked"
			 .Write ">是"
			 .Write "&nbsp;&nbsp;<input name=""AdminCheckTF"" type=""radio"" id=""AdminCheckTF""  value=""0"""
			 If RS("AdminCheckTF")=0 Then .Write " Checked"
			 .Write ">否"
			 .Write "</td>"
			 
			 .Write "    <tr valign=""middle""  bgcolor=""#EEF8FE"" onMouseOver=""this.style.background='#fffff9'"" onMouseOut=""this.style.background='#EEF8FE'"">"
			.Write "      <td width=""32%"" height=""21"">&nbsp;&nbsp;"
			.Write "        <div align=""right"">会员注册时是否启用验证码功能：&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; </div><font color=red>启用验证码功能可以在一定程度上防止暴力营销软件或注册机自动注册</font></td>"
			.Write "      <td height=""21""> <input name=""VerificCodeTF"" type=""radio"" id=""VerificCodeTF""  value=""1"""
			 If RS("VerificCodeTF")=1 Then .Write " Checked"
			 .Write ">是"
			 .Write "&nbsp;&nbsp;<input name=""VerificCodeTF"" type=""radio"" id=""VerificCodeTF""  value=""0"""
			 If RS("VerificCodeTF")=0 Then .Write " Checked"
			 .Write ">否"
			 .Write "</td>"
			 
			 .Write "    <tr valign=""middle""  bgcolor=""#EEF8FE"" onMouseOver=""this.style.background='#fffff9'"" onMouseOut=""this.style.background='#EEF8FE'"">"
			.Write "      <td width=""32%"" height=""21"">&nbsp;&nbsp;"
			.Write "        <div align=""right"">每个Email是否允许注册多次：&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; </div><font color=red>若选择是，则利用同一个Email可以注册多个会员。</font></td>"
			.Write "      <td height=""21""> <input name=""EmailMultiRegTF"" type=""radio"" id=""EmailMultiRegTF""  value=""1"""
			 If RS("EmailMultiRegTF")=1 Then .Write " Checked"
			 .Write ">是"
			 .Write "&nbsp;&nbsp;<input name=""EmailMultiRegTF"" type=""radio"" id=""EmailMultiRegTF""  value=""0"""
			 If RS("EmailMultiRegTF")=0 Then .Write " Checked"
			 .Write ">否"
			 .Write "</td>"
			 
			.Write "    <tr valign=""middle""  bgcolor=""#EEF8FE"" onMouseOver=""this.style.background='#fffff9'"" onMouseOut=""this.style.background='#EEF8FE'"">"
			.Write "      <td width=""32%"" height=""21""> &nbsp;&nbsp;"
			.Write "        <div align=""right"">新会员注册时用户名：&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; </div></td>"
			.Write "      <td height=""21""> 最少字符数<input name=""UserNameLimitChar"" type=""text"" id=""UserNameLimitChar"" onBlur=""CheckNumber(this,'用户名最小字符数');"" size=""3"" value=""" & Trim(RS("UserNameLimitChar")) & """>个字符  最多字符数<input name=""UserNameMaxChar"" type=""text"" id=""UserNameMaxChar"" onBlur=""CheckNumber(this,'用户名最多字符数');"" size=""3"" value=""" & RS("UserNameMaxChar") & """>个字符"
			.Write "       </td>" 
	
			.Write "    <tr valign=""middle""  bgcolor=""#EEF8FE"" onMouseOver=""this.style.background='#fffff9'"" onMouseOut=""this.style.background='#EEF8FE'"">"
			.Write "      <td width=""32%"" height=""21""> &nbsp;&nbsp;"
			.Write "        <div align=""right"">禁止注册的用户名：&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; </div><font color=red>在右边指定的用户名将被禁止注册，每个用户名请用“|”符号分隔</font></td>"
			.Write "      <td height=""21""> <input name=""EnabledRegUserName"" type=""text"" id=""EnabledRegUserName"" size=""45"" value=""" & Trim(RS("EnabledRegUserName")) & """>"
			.Write "       </td>" 
			 
			 .Write "    <tr valign=""middle""  bgcolor=""#EEF8FE"" onMouseOver=""this.style.background='#fffff9'"" onMouseOut=""this.style.background='#EEF8FE'"">"
			.Write "      <td width=""32%"" height=""21"">&nbsp;&nbsp;"
			.Write "        <div align=""right"">会员注册时是否需要填写详细资料：&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; </div><font color=red>若选择是，则会员注册时需要填写诸如真实姓名、地址、电话等。</font></td>"
			.Write "      <td height=""21""> <input name=""MustInputDetailTF"" type=""radio"" id=""MustInputDetailTF""  value=""1"""
			 If RS("MustInputDetailTF")=1 Then .Write " Checked"
			 .Write ">是"
			 .Write "&nbsp;&nbsp;<input name=""MustInputDetailTF"" type=""radio"" id=""MustInputDetailTF""  value=""0"""
			 If RS("MustInputDetailTF")=0 Then .Write " Checked"
			 .Write ">否"
			 .Write "</td>"
			 
			 
			 .Write "<tr width=""32%"" height=""21""  bgcolor=""#EEF8FE"" onMouseOver=""this.style.background='#fffff9'"" onMouseOut=""this.style.background='#EEF8FE'"">"
			 .Write "<td width='40%'align=""right"">会员注册时的必填项目：&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; </td>"
			 .Write "<td>"
			 .Write "        <table width='100%'>"
			 .Write "          <tr>"
			 .Write "            <td><input name='UserRegMustFill' type='checkbox' value='UserName' checked disabled>用户名</td>"
			 .Write "            <td><input name='UserRegMustFill' type='checkbox' value='Password' checked disabled>密码</td>"
			  .Write "           <td><input name='UserRegMustFill' type='checkbox' value='Question' checked disabled>密码问题</td>"
			 .Write "            <td><input name='UserRegMustFill' type='checkbox' value='Answer' checked disabled>问题答案</td>"
			 .Write "            <td><input name='UserRegMustFill' type='checkbox' value='Email' checked disabled>电子信箱</td>"
			 .Write "          </tr>"
			 .Write "          <tr>"
			 .Write "            <td><input name='UserRegMustFill' type='checkbox' "
			 if InStr(1, UserRegMustFill,"Homepage" ,1)<>0 then .Write(" checked")
			 .Write " value='Homepage'>主页</td>"
			 .Write "            <td><input name='UserRegMustFill' type='checkbox' "
			 if InStr(1, UserRegMustFill,"QQ" ,1)<>0 then .Write(" checked")
			 .Write " value='QQ'>QQ号码</td>"
			 .Write "            <td><input name='UserRegMustFill' type='checkbox' "
			 if InStr(1, UserRegMustFill,"ICQ" ,1)<>0 then .Write(" checked")
			 .Write " value='ICQ'>ICQ号码</td>"
			 .Write "            <td><input name='UserRegMustFill' type='checkbox' "
			 if InStr(1, UserRegMustFill,"MSN" ,1)<>0 then .Write(" checked")
			 .Write " value='MSN'>MSN帐号</td>"
			 .Write "            <td><input name='UserRegMustFill' type='checkbox' "
			 if InStr(1, UserRegMustFill,"UC" ,1)<>0 then .Write(" checked")
			 .Write " value='UC'>UC号码</td>"
			 .Write "          </tr>"
			 .Write "          <tr>"
			 .Write "            <td><input name='UserRegMustFill' type='checkbox' "
			 if InStr(1, UserRegMustFill,"OfficeTel" ,1)<>0 then .Write(" checked")
			 .Write " value='OfficeTel'>办公电话</td>"
			 .Write "            <td><input name='UserRegMustFill' type='checkbox'  "
			 if InStr(1, UserRegMustFill,"HomeTel" ,1)<>0 then .Write(" checked")
			 .Write " value='HomeTel'>家庭电话</td>"
			 .Write "            <td><input name='UserRegMustFill' type='checkbox'  "
			 if InStr(1, UserRegMustFill,"Mobile" ,1)<>0 then .Write(" checked")
			 .Write " value='Mobile'>手机号码</td>"
			 .Write "            <td><input name='UserRegMustFill' type='checkbox'  "
			 if InStr(1, UserRegMustFill,"Fax" ,1)<>0 then .Write(" checked")
			 .Write " value='Fax'>传真号码</td>"
			 .Write "            <td><input name='UserRegMustFill' type='checkbox'  "
			 if InStr(1, UserRegMustFill,"Province" ,1)<>0 then .Write(" checked")
			 .Write " value='Province' />省市</td>"
			 .Write "          </tr>"
			 .Write "          <tr>"
			 .Write "            <td><input name='UserRegMustFill' type='checkbox'  "
			 if InStr(1, UserRegMustFill,"Address" ,1)<>0 then .Write(" checked")
			 .Write " value='Address' />联系地址</td>"
			 .Write "            <td><input name='UserRegMustFill' type='checkbox'  "
			 if InStr(1, UserRegMustFill,"Zip" ,1)<>0 then .Write(" checked")
			 .Write " value='Zip' />邮政编码</td>"
			 .Write "            <td><input name='UserRegMustFill' type='checkbox'  "
			 if InStr(1, UserRegMustFill,"RealName" ,1)<>0 then .Write(" checked")
			 .Write " value='RealName' />真实姓名</td>"
			 .Write "            <td><input name='UserRegMustFill' type='checkbox'  "
			 if InStr(1, UserRegMustFill,"Birthday" ,1)<>0 then .Write(" checked")
			 .Write " value='Birthday' />出生日期</td>"
			 .Write "            <td><input name='UserRegMustFill' type='checkbox'  "
			 if InStr(1, UserRegMustFill,"IDCard" ,1)<>0 then .Write(" checked")
			 .Write " value='IDCard' />身份证号码</td>"
			 .Write "          </tr>"
			  
			 .Write "          <tr>"
			 .Write "            <td><input name='UserRegMustFill' type='checkbox'  "
			 if InStr(1, UserRegMustFill,"UserFace" ,1)<>0 then .Write(" checked")
			 .Write " value='UserFace'>用户头像</td>"
			 .Write "            <td><input name='UserRegMustFill' type='checkbox'  "
			 if InStr(1, UserRegMustFill,"FaceWidthAndHeight" ,1)<>0 then .Write(" checked")
			 .Write " value='FaceWidthAndHeight'>头像宽高</td>"
			 .Write "            <td><input name='UserRegMustFill' type='checkbox'  "
			 if InStr(1, UserRegMustFill,"Sex" ,1)<>0 then .Write(" checked")
			 .Write " value='Sex'>用户性别</td>"
			 .Write "            <td><input name='UserRegMustFill' type='checkbox'  "
			 if InStr(1, UserRegMustFill,"Sign" ,1)<>0 then .Write(" checked")
			 .Write " value='Sign'>签名档</td>"
			 .Write "            <td><input name='UserRegMustFill' type='checkbox'  "
			 if InStr(1, UserRegMustFill,"Privacy" ,1)<>0 then .Write(" checked")
			 .Write " value='Privacy'>隐私设定</td>"
			 .Write "          </tr>"
			 .Write "          </table>"
			 
			 
			  .Write "    <tr valign=""middle""  bgcolor=""#EEF8FE"" onMouseOver=""this.style.background='#fffff9'"" onMouseOut=""this.style.background='#EEF8FE'"">"
			.Write "      <td width=""32%"" height=""21"">&nbsp;&nbsp;"
			.Write "        <div align=""right"">会员登录时是否启用验证码功能：&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; </div><font color=red>启用验证码功能可以在一定程度上防止会员密码被暴力破解</font></td>"
			.Write "      <td height=""21""> <input name=""LoginVerificCodeTF"" type=""radio"" id=""LoginVerificCodeTF""  value=""1"""
			 If RS("LoginVerificCodeTF")=1 Then .Write " Checked"
			 .Write ">是"
			 .Write "&nbsp;&nbsp;<input name=""LoginVerificCodeTF"" type=""radio"" id=""LoginVerificCodeTF""  value=""0"""
			 If RS("LoginVerificCodeTF")=0 Then .Write " Checked"
			 .Write ">否"
			 .Write "</td>"
			 
			.Write "    <tr valign=""middle""  bgcolor=""#EEF8FE"" onMouseOver=""this.style.background='#fffff9'"" onMouseOut=""this.style.background='#EEF8FE'"">"
			.Write "      <td width=""32%"" height=""21"" >&nbsp;&nbsp;"
			.Write "        <div align=""right"">会员每登录一次奖励的积分：&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; </div></td>"
			.Write "      <td height=""21""> <input onBlur=""CheckNumber(this,'会员每登录一次奖励的积分数');"" name=""LoginPerTimeAddScore"" type=""text"" id=""LoginPerTimeAddScore"" size=""5"" value=""" & Trim(RS("LoginPerTimeAddScore")) & """>"
			.Write "分积分</td>"
			
			.Write "    <tr valign=""middle""  bgcolor=""#EEF8FE"" onMouseOver=""this.style.background='#fffff9'"" onMouseOut=""this.style.background='#EEF8FE'"">"
			.Write "      <td width=""32%"" height=""21"">&nbsp;&nbsp;"
			.Write "        <div align=""right"">新会员注册时赠送的金钱：&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; </div></td>"
			.Write "      <td height=""21""> <input onBlur=""CheckNumber(this,'新会员注册时赠送的金钱');"" name=""NewRegUserMoney"" type=""text"" id=""NewRegUserMoney"" size=""5"" value=""" & Trim(RS("NewRegUserMoney")) & """>"
			.Write "元人民币（为0时不赠送）</td>"
			
			.Write "    <tr valign=""middle""  bgcolor=""#EEF8FE"" onMouseOver=""this.style.background='#fffff9'"" onMouseOut=""this.style.background='#EEF8FE'"">"
			.Write "      <td width=""32%"" height=""21"">&nbsp;&nbsp;"
			.Write "        <div align=""right"">新会员注册时赠送的积分：&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; </div></td>"
			.Write "      <td height=""21""> <input name=""NewRegUserScore"" onBlur=""CheckNumber(this,'新会员注册时赠送的积分');"" type=""text"" id=""NewRegUserScore"" size=""5"" value=""" & Trim(RS("NewRegUserScore")) & """>"
			.Write "分积分</td>"
	
			.Write "    <tr valign=""middle""  bgcolor=""#EEF8FE"" onMouseOver=""this.style.background='#fffff9'"" onMouseOut=""this.style.background='#EEF8FE'"">"
			.Write "      <td width=""32%"" height=""21"">&nbsp;&nbsp;"
			.Write "        <div align=""right"">新会员注册时赠送的点券：&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; </div></td>"
			.Write "      <td height=""21""> <input onBlur=""CheckNumber(this,'新会员注册时赠送的点券');"" name=""NewRegUserPoint"" type=""text"" id=""NewRegUserPoint"" size=""5"" value=""" & Trim(RS("NewRegUserPoint")) & """>"
			.Write "点点券（为0时不赠送）</td>"
			
			.Write "    <tr valign=""middle""  bgcolor=""#EEF8FE"" onMouseOver=""this.style.background='#fffff9'"" onMouseOut=""this.style.background='#EEF8FE'"">"
			.Write "      <td width=""32%"" height=""21"">&nbsp;&nbsp;"
12345

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -