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

📄 admin_setup.asp

📁 功能介绍: 一、会员功能模块 1、站内短信发布(设计中) 2、书架收藏夹 3、发表评论(功能不完善) 4、申请作家(与添书员整合) 5、申请添书员(与作家整合) 6、申请更新员
💻 ASP
📖 第 1 页 / 共 5 页
字号:
				<option style="background-color: #e4ebf1" value="7">
				灰蓝</option>
				<option style="background-color: #f0f0f0" value="1">
				浅灰</option>
				<option style="background-color: #eeeeee" value="8">
				淡灰</option>
				<option style="background-color: #eaeaea" value="9">
				灰色</option>
				<option style="background-color: #e4e1d8" value="10">
				深灰</option>
				<option style="background-color: #e6e6e6" value="11">
				暗灰</option>
				<option style="background-color: #ffffed" value="12">
				明黄</option>
				<option style="BACKGROUND-COLOR: #fcefff" value="13">
				粉色</option>
			</select>
			<select size="1" name="CnEndRadfontface" style="background-color: #FFFFFF; border: 1 solid #000000">
				<option value="0" selected>字体类型..</option>
				<option value="0">宋体</option>
				<option value="1">黑体</option>
				<option value="2">隶书</option>
				<option value="3">幼圆</option>
				<option value="4">仿宋</option>
				<option value="5">楷体</option>
				<option value="6">华文彩云</option>
				<option value="7">华文琥珀</option>
				<option value="8">华文新魏</option>
				<option value="9">华文行楷</option>
				<option value="10">新宋体</option>
				<option value="11">Arial</option>
				<option value="12">B Antiqua</option>
				<option value="13">C Gothic</option>
				<option value="14">C New</option>
				<option value="15">Georgia</option>
				<option value="16">Impact</option>
				<option value="17">Tahoma</option>
				<option value="18">T N Roman</option>
				<option value="19">Verdana</option>
			</select>
			<select size="1" name="CnEndRadfontcolor" style="background-color: #FFFFFF; border: 1 solid #000000">
				<option value="2" selected>字体颜色..</option>
				<option style="background-color: #333333" value="1">
				浅黑</option>
				<option style="background-color: #000000" value="2">
				黑色</option>
				<option style="background-color: #ff0000" value="3">
				红色</option>
				<option style="background-color: #006600" value="4">
				绿色</option>
				<option style="background-color: #0000ff" value="5">
				蓝色</option>
				<option style="background-color: #660000" value="6">
				棕色</option>
			</select>
			<select size="1" name="CnEndRadfontsize" style="background-color: #FFFFFF; border: 1 solid #000000">
				<option value="4" selected>字体大小..</option>
				<option value="1">9</option>
				<option value="2">10</option>
				<option value="3">11</option>
				<option value="4">12</option>
				<option value="5">14</option>
				<option value="6">16</option>
				<option value="7">18</option>
				<option value="8">20</option>
				<option value="9">22</option>
				<option value="10">24</option>
				<option value="11">26</option>
				<option value="12">28</option>
				<option value="13">32</option>
				<option value="14">36</option>
				<option value="15">48</option>
				<option value="16">72</option>
			</select>
		</td>
	</tr>
	<tr align="center" valign="center" bgcolor="#1C3566">
      <td height="35" colspan="4"><input type="hidden" name="setup" value="yes">
      <input type="hidden" name="method" value="1">
      <input type="submit" class="button" value="提 交">
         
      <input type="reset" class="button" value="重 置"></td>
    </tr>
    </form>
</table>
<%
	If request.form("Setup")="" then
	Else
	Sitename=GetTextFromHtml(Replace(Replace(request.form("Sitename"),"<"&"%","<%"),"%"&">","%>"))
	Siteurl=GetTextFromHtml(Replace(Replace(request.form("Siteurl"),"<"&"%","<%"),"%"&">","%>"))
	SiteSystemPath=Replace(Left(LCase(Request.ServerVariables("SCRIPT_NAME")), InStrRev(LCase(Request.ServerVariables("SCRIPT_NAME")), "/")),""&LCase(SiteManagePath)&"/","")
	Sitelogo=GetTextFromHtml(Replace(Replace(request.form("Sitelogo"),"<"&"%","<%"),"%"&">","%>"))
	locksql=GetTextFromHtml(Replace(Replace(request.form("locksql"),"<"&"%","<%"),"%"&">","%>"))
	Keywords=GetTextFromHtml(Replace(Replace(request.form("Keywords"),"<"&"%","<%"),"%"&">","%>"))
	Description=GetTextFromHtml(Replace(Replace(request.form("Description"),"<"&"%","<%"),"%"&">","%>"))
	WebmasterName=GetTextFromHtml(Replace(Replace(request.form("WebmasterName"),"<"&"%","<%"),"%"&">","%>"))
	WebmasterEmail=GetTextFromHtml(Replace(Replace(request.form("WebmasterEmail"),"<"&"%","<%"),"%"&">","%>"))
	WebQQ=GetTextFromHtml(Replace(Replace(request.form("WebQQ"),"<"&"%","<%"),"%"&">","%>"))
	Copyright=unhtmllists(Replace(Replace(request.form("Copyright"),"<"&"%","<%"),"%"&">","%>"))
	Copyright=ScriptHtml(Copyright,"Object",2)
	
	WebAllowFile=GetTextFromHtml(Request.form("WebAllowFile"))
	AuthorAllowFile=GetTextFromHtml(Request.form("AuthorAllowFile"))
	GXUserAllowFile=GetTextFromHtml(Request.form("GXUserAllowFile"))
	UserAllowFile=GetTextFromHtml(Request.form("UserAllowFile"))
	AllowFileExtStr=GetTextFromHtml(Replace(Replace(request.form("AllowFileExtStr"),"<"&"%","<%"),"%"&">","%>"))
	if WebAllowFile="" or AuthorAllowFile="" or GXUserAllowFile="" or UserAllowFile="" then
		Response.Write ("<script>alert('CnEndWeb(终点)提醒:\n\n 任何选项均不能为空!');history.back();</SCRIPT>")
		Response.end
	end if
	
	authorFaceMaxFileSize=GetTextFromHtml(Request.form("authorFaceMaxFileSize"))
	CheckSqlnum(authorFaceMaxFileSize)
	authorFaceMaxFileSize=int(authorFaceMaxFileSize)

	bookFaceMaxFileSize=GetTextFromHtml(Request.form("bookFaceMaxFileSize"))
	CheckSqlnum(bookFaceMaxFileSize)
	bookFaceMaxFileSize=int(bookFaceMaxFileSize)

	bookviewMaxFileSize=GetTextFromHtml(Request.form("bookviewMaxFileSize"))
	CheckSqlnum(bookviewMaxFileSize)
	bookviewMaxFileSize=int(bookviewMaxFileSize)

	ArticleviewMaxFileSize=GetTextFromHtml(Request.form("ArticleviewMaxFileSize"))
	CheckSqlnum(ArticleviewMaxFileSize)
	ArticleviewMaxFileSize=int(ArticleviewMaxFileSize)

	MaxFileSize=GetTextFromHtml(Request.form("MaxFileSize"))
	CheckSqlnum(MaxFileSize)
	MaxFileSize=int(MaxFileSize)

	WebUser=GetTextFromHtml(Request.form("WebUser"))
	WebUserLOCKNum=GetTextFromHtml(Request.form("WebUserLOCKNum"))
	WebUserLOGLOCKNum=GetTextFromHtml(Request.form("WebUserLOGLOCKNum"))
	WebUserLOCK=GetTextFromHtml(Request.form("WebUserLOCK"))
	WebADDArticleLOCK=GetTextFromHtml(Request.form("WebADDArticleLOCK"))
	WebGXUser=GetTextFromHtml(Request.form("WebGXUser"))
	WebGXUserLOCKNum=GetTextFromHtml(Request.form("WebGXUserLOCKNum"))
	WebGXUserLOCK=GetTextFromHtml(Request.form("WebGXUserLOCK"))
	WebGXbookLOCK=GetTextFromHtml(Request.form("WebGXbookLOCK"))
	WebAuthor=GetTextFromHtml(Request.form("WebAuthor"))
	WebAuthorLOCKNum=GetTextFromHtml(Request.form("WebAuthorLOCKNum"))
	WebAuthorLOGLOCKNum=GetTextFromHtml(Request.form("WebAuthorLOGLOCKNum"))
	WebAuthorLOCK=GetTextFromHtml(Request.form("WebAuthorLOCK"))
	WebADDbookLOCK=GetTextFromHtml(Request.form("WebADDbookLOCK"))
	if WebUser="" or WebUserLOCKNum="" or WebUserLOGLOCKNum="" or WebUserLOCK="" or WebADDArticleLOCK="" then
		Response.Write ("<script>alert('CnEndWeb(终点)提醒:\n\n 任何选项均不能为空!');history.back();</SCRIPT>")
		Response.end
	end if
	if WebGXUser="" or WebGXUserLOCKNum="" or WebGXUserLOCK="" or WebGXbookLOCK="" then
		Response.Write ("<script>alert('CnEndWeb(终点)提醒:\n\n 任何选项均不能为空!');history.back();</SCRIPT>")
		Response.end
	end if
	if WebAuthor="" or WebAuthorLOCKNum="" or WebAuthorLOGLOCKNum="" or WebAuthorLOCK="" or WebADDbookLOCK="" then
		Response.Write ("<script>alert('CnEndWeb(终点)提醒:\n\n 任何选项均不能为空!');history.back();</SCRIPT>")
		Response.end
	end if
	UserpassLOGLOCKNum=GetTextFromHtml(Request.form("UserpassLOGLOCKNum"))
	Webpinglun=GetTextFromHtml(Request.form("Webpinglun"))
	WebpinglunLOCKNum=GetTextFromHtml(Reque

⌨️ 快捷键说明

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