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

📄 linkchk.asp

📁 信息管理系统 管理页面:admin/index.asp 用户和密码都是admin
💻 ASP
字号:
<!--#include file=cookies.asp-->
<%
dim linkname1,linkweb1,linklogo1,linkname2,linkweb2,linklogo2,linkname3,linkweb3,linklogo3,linkname4,linkweb4,linklogo4,linkname5,linkweb5,linklogo5,linkname6,linkweb6,linklogo6,linkname7,linkweb7,linklogo7,linkname8,linkweb8,linklogo8
filepath=server.mappath("../webconfig.asp")
linkname1=request("linkname1")
linkweb1=request("linkweb1")
linklogo1=request("linklogo1")
linkname2=request("linkname2")
linkweb2=request("linkweb2")
linklogo2=request("linklogo2")
linkname3=request("linkname3")
linkweb3=request("linkweb3")
linklogo3=request("linklogo3")
linkname4=request("linkname4")
linkweb4=request("linkweb4")
linklogo4=request("linklogo4")
linkname5=request("linkname5")
linkweb5=request("linkweb5")
linklogo5=request("linklogo5")
linkname6=request("linkname6")
linkweb6=request("linkweb6")
linklogo6=request("linklogo6")
linkname7=request("linkname7")
linkweb7=request("linkweb7")
linklogo7=request("linklogo7")
linkname8=request("linkname8")
linkweb8=request("linkweb8")
linklogo8=request("linklogo8")
Set fobj = Server.CreateObject("SCRIPTING.FILESYSTEMOBJECT")
Set fs = fobj.CreateTextFile(filepath,true)
fs.Write("<"&chr(37)&chr(10))
fs.Write("dim linkname1,linkweb1,linklogo1,linkname2,linkweb2,linklogo2,linkname3,linkweb3,linklogo3,linkname4,linkweb4,linklogo4,linkname5,linkweb5,linklogo5,linkname6,linkweb6,linklogo6,linkname7,linkweb7,linklogo7,linkname8,linkweb8,linklogo8"&chr(10))
fs.Write("linkname1="&chr(34)&linkname1&chr(34)&chr(10))
fs.Write("linkweb1="&chr(34)&linkweb1&chr(34)&chr(10))
fs.Write("linklogo1="&chr(34)&linklogo1&chr(34)&chr(10))
fs.Write("linkname2="&chr(34)&linkname2&chr(34)&chr(10))
fs.Write("linkweb2="&chr(34)&linkweb2&chr(34)&chr(10))
fs.Write("linklogo2="&chr(34)&linklogo2&chr(34)&chr(10))
fs.Write("linkname3="&chr(34)&linkname3&chr(34)&chr(10))
fs.Write("linkweb3="&chr(34)&linkweb3&chr(34)&chr(10))
fs.Write("linklogo3="&chr(34)&linklogo3&chr(34)&chr(10))
fs.Write("linkname4="&chr(34)&linkname4&chr(34)&chr(10))
fs.Write("linkweb4="&chr(34)&linkweb4&chr(34)&chr(10))
fs.Write("linklogo4="&chr(34)&linklogo4&chr(34)&chr(10))
fs.Write("linkname5="&chr(34)&linkname5&chr(34)&chr(10))
fs.Write("linkweb5="&chr(34)&linkweb5&chr(34)&chr(10))
fs.Write("linklogo5="&chr(34)&linklogo5&chr(34)&chr(10))
fs.Write("linkname6="&chr(34)&linkname6&chr(34)&chr(10))
fs.Write("linkweb6="&chr(34)&linkweb6&chr(34)&chr(10))
fs.Write("linklogo6="&chr(34)&linklogo6&chr(34)&chr(10))
fs.Write("linkname7="&chr(34)&linkname7&chr(34)&chr(10))
fs.Write("linkweb7="&chr(34)&linkweb7&chr(34)&chr(10))
fs.Write("linklogo7="&chr(34)&linklogo7&chr(34)&chr(10))
fs.Write("linkname8="&chr(34)&linkname8&chr(34)&chr(10))
fs.Write("linkweb8="&chr(34)&linkweb8&chr(34)&chr(10))
fs.Write("linklogo8="&chr(34)&linklogo8&chr(34)&chr(10))
fs.Write(chr(37)&">")
fs.close
%>
 <meta http-equiv="Content-Language" content="zh-cn">
 <LINK href="img/jobcn.css" rel=stylesheet></LINK>
<p align="center">设置成功!</p>

⌨️ 快捷键说明

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