📄 admin_tempmakeaboutbook.asp

📁 本人仅业余学习一些基础的ASP知识以供系统设计之用,并非专业人员,相关服务器设置、MSSQL/MySQL数据库方面的专业问题请自行解决。本人仅提供本系统相关的一些技术问题的解释、解答。
💻 ASP
📖 第 1 页 / 共 5 页
字号:
12 3 4 5 下一页
<!-- #include file="../conn.asp" -->
<!--#include file="../inc/config.asp"-->
<!-- #include file='session.asp' -->
<link href='css.css' rel='stylesheet' type='text/css'>
<%
if htmlphem=1 then
htmlphe="htm"
elseif htmlphem=2 then
htmlphe="html"
elseif htmlphem=3 then
htmlphe="shtml"
elseif htmlphem=4 then
htmlphe="asp"
else
htmlphe="html"
end if
id=CheckSql(request("id"))
CheckSqlnum(id)
if id="" then
response.Redirect 'adminmain.asp'
response.End
end if
id=int(id)
set rstemp=server.createobject("adodb.recordset")
	sql="select SystemPath,Page_Index from Template where id="&id&""
	rstemp.open sql,connTemp,1,1
SystemPath=rsTemp("SystemPath")
pencat1=rstemp("Page_Index")
rstemp.close
set rstemp=nothing
'----------------------------------------------------------------------------------------------
Function makeindex(id)
set rstemp=server.createobject("adodb.recordset")
	sql="select SystemPath,Page_Index from Template where id="&id&""
	rstemp.open sql,connTemp,1,1
SystemPath=rsTemp("SystemPath")
pencat1=rstemp("Page_Index")
rstemp.close
set rstemp=nothing

pencat0="<!-- #include file='conn.asp' --><"
pencat0=pencat0&"%Stats="" 首 页  ""%"
pencat0=pencat0&"><!-- #include file='head.asp' -->"
pencat2="<!-- #include file='bottom.asp' -->"
Index=pencat0&pencat1&pencat2
Index=replace(Index,"{$SystemPath$}",SystemPath)
if OpenInJS=1 then
Index=replace(Index,"{$showzxgx$}","<"&"%"&"=topszxgx"&"%"&">")
Index=replace(Index,"{$showvipzxgx$}","<"&"%"&"=topsvipzxgx"&"%"&">")
Index=replace(Index,"{$showVIP$}","<"&"%"&"=topsvip"&"%"&">")
Index=replace(Index,"{$showauthor$}","<"&"%"&"=topsauthor"&"%"&">")
Index=replace(Index,"{$showauthoradd$}","<"&"%"&"=topsauthoradd"&"%"&">")
Index=replace(Index,"{$userlogin$}","<script language=JavaScript src=""js/userlogin.asp?type=0""></script>")
Index=replace(Index,"{$user_login$}","<script language=JavaScript src=""js/userlogin.asp?type=1""></script>")
Index=replace(Index,"{$booksearch$}","<"&"%"&"=topsbooksearch"&"%"&">")
Index=replace(Index,"{$book_search$}","<"&"%"&"=topsbook_search"&"%"&">")
Index=replace(Index,"{$SiteSystemPath$}",SiteSystemPath)

Index=replace(Index,"{$showclass$}","<"&"%"&"=topsclass"&"%"&">")
Index=replace(Index,"{$showtopten$}","<"&"%"&"=topstopten"&"%"&">")
Index=replace(Index,"{$showqltj$}","<"&"%"&"=topsqltj"&"%"&">")
Index=replace(Index,"{$showlztj$}","<"&"%"&"=topslztj"&"%"&">")
Index=replace(Index,"{$showsc$}","<"&"%"&"=topssc"&"%"&">")
Index=replace(Index,"{$showdj$}","<"&"%"&"=topsdj"&"%"&">")
Index=replace(Index,"{$showmdj$}","<"&"%"&"=topsmdj"&"%"&">")
Index=replace(Index,"{$showddj$}","<"&"%"&"=topsddj"&"%"&">")
Index=replace(Index,"{$showzdj$}","<"&"%"&"=topszdj"&"%"&">")
Index=replace(Index,"{$showtj$}","<"&"%"&"=topstj"&"%"&">")
Index=replace(Index,"{$showadd$}","<"&"%"&"=topsadd"&"%"&">")
Index=replace(Index,"{$showpinglun$}","<"&"%"&"=topspinglun"&"%"&">")
Index=replace(Index,"{$showmtj$}","<"&"%"&"=topsmtj"&"%"&">")
Index=replace(Index,"{$showztj$}","<"&"%"&"=topsztj"&"%"&">")
Index=replace(Index,"{$showdtj$}","<"&"%"&"=topsdtj"&"%"&">")
Index=replace(Index,"{$showlogolink$}","<"&"%"&"=topslogolink"&"%"&">")
Index=replace(Index,"{$showtxtlink$}","<"&"%"&"=topstxtlink"&"%"&">")
Index=replace(Index,"{$showlogo_link$}","<"&"%"&"=topslogo_link"&"%"&">")
Index=replace(Index,"{$showtxt_link$}","<"&"%"&"=topstxt_link"&"%"&">")
Index=replace(Index,"{$showgongg$}","<"&"%"&"=topsgonggao"&"%"&">")
Index=replace(Index,"{$showuserbookadd$}","<"&"%"&"=topsuserbookadd"&"%"&">")
Index=replace(Index,"{$showuserbookadds$}","<"&"%"&"=topsuserbookadds"&"%"&">")
Index=replace(Index,"{$showArticletj$}","<"&"%"&"=topsArticletj"&"%"&">")
Index=replace(Index,"{$showArticledj$}","<"&"%"&"=topsArticledj"&"%"&">")
Index=replace(Index,"{$showuserbooktj$}","<"&"%"&"=topsuserbooktj"&"%"&">")
Index=replace(Index,"{$showuserbookdj$}","<"&"%"&"=topsuserbookdj"&"%"&">")

Index=replace(Index,"{$showsyft$}","<"&"%"&"=topssyft"&"%"&">")
Index=replace(Index,"{$showjptj$}","<"&"%"&"=topsjptj"&"%"&">")
Index=replace(Index,"{$showvote$}","<!--#include file='inc/vote.asp'-->")
else
Index=replace(Index,"{$showzxgx$}","<"&"%"&"showzxgx(zxgxNum)"&"%"&">")
Index=replace(Index,"{$showvipzxgx$}","<"&"%"&"showvipzxgx(vipzxgxNum)"&"%"&">")
Index=replace(Index,"{$showVIP$}","<"&"%"&"showvip()"&"%"&">")
Index=replace(Index,"{$showauthor$}","<"&"%"&"showauthor()"&"%"&">")
Index=replace(Index,"{$showauthoradd$}","<"&"%"&"showauthoradd(authorNum)"&"%"&">")

Index=replace(Index,"{$userlogin$}","<script language=JavaScript src=""js/userlogin.asp?type=0""></script>")
Index=replace(Index,"{$user_login$}","<script language=JavaScript src=""js/userlogin.asp?type=1""></script>")
Index=replace(Index,"{$booksearch$}","<"&"%"&"booksearch()"&"%"&">")
Index=replace(Index,"{$book_search$}","<"&"%"&"book_search()"&"%"&">")
Index=replace(Index,"{$SiteSystemPath$}",SiteSystemPath)

Index=replace(Index,"{$showclass$}","<"&"%"&"showclass()"&"%"&">")
Index=replace(Index,"{$showtopten$}","<"&"%"&"showtopten()"&"%"&">")
Index=replace(Index,"{$showqltj$}","<"&"%"&"showqltj(qltjNum)"&"%"&">")
Index=replace(Index,"{$showlztj$}","<"&"%"&"showlztj(lztjNum)"&"%"&">")
Index=replace(Index,"{$showsc$}","<"&"%"&"showsc(scNum)"&"%"&">")
Index=replace(Index,"{$showdj$}","<"&"%"&"showdj(djNum)"&"%"&">")
Index=replace(Index,"{$showmdj$}","<"&"%"&"showmdj(mdjNum)"&"%"&">")
Index=replace(Index,"{$showddj$}","<"&"%"&"showddj(ddjNum)"&"%"&">")
Index=replace(Index,"{$showzdj$}","<"&"%"&"showzdj(zdjNum)"&"%"&">")
Index=replace(Index,"{$showtj$}","<"&"%"&"showtj(tjNum)"&"%"&">")
Index=replace(Index,"{$showadd$}","<"&"%"&"showadd(addNum)"&"%"&">")
Index=replace(Index,"{$showuserbookadd$}","<"&"%"&"showuserbookadd(userbookaddNum)"&"%"&">")
Index=replace(Index,"{$showuserbookadds$}","<"&"%"&"showuserbookadds(userbookaddsNum)"&"%"&">")
Index=replace(Index,"{$showArticletj$}","<"&"%"&"showArticletj(ArticletjNum)"&"%"&">")
Index=replace(Index,"{$showArticledj$}","<"&"%"&"showArticledj(ArticledjNum)"&"%"&">")
Index=replace(Index,"{$showuserbooktj$}","<"&"%"&"showuserbooktj(userbooktjNum)"&"%"&">")
Index=replace(Index,"{$showuserbookdj$}","<"&"%"&"showuserbookdj(userbookdjNum)"&"%"&">")
Index=replace(Index,"{$showpinglun$}","<"&"%"&"showpinglun(newplNum)"&"%"&">")
Index=replace(Index,"{$showmtj$}","<"&"%"&"showmtj(mtjNum)"&"%"&">")
Index=replace(Index,"{$showztj$}","<"&"%"&"showztj(ztjNum)"&"%"&">")
Index=replace(Index,"{$showdtj$}","<"&"%"&"showdtj(dtjNum)"&"%"&">")
Index=replace(Index,"{$showlogolink$}","<"&"%"&"showlogolink(LOGONum)"&"%"&">")
Index=replace(Index,"{$showtxtlink$}","<"&"%"&"showtxtlink(TXTNum)"&"%"&">")
Index=replace(Index,"{$showlogo_link$}","<"&"%"&"showlogo_link(LOGONum)"&"%"&">")
Index=replace(Index,"{$showtxt_link$}","<"&"%"&"showtxt_link(TXTNum)"&"%"&">")
Index=replace(Index,"{$showgongg$}","<"&"%"&"showgongg(gonggaoNum)"&"%"&">")
Index=replace(Index,"{$showsyft$}","<"&"%"&"showsyft(syftNum)"&"%"&">")
Index=replace(Index,"{$showjptj$}","<"&"%"&"showjptj(jptjNum)"&"%"&">")
Index=replace(Index,"{$showvote$}","<!--#include file='inc/vote.asp'-->")
end if

file=server.mappath( "../index.asp" )

Set fso = Server.CreateObject("Scripting.FileSystemObject")
Set fout = fso.Createtextfile(file,true)
fout.writeline Index
fout.close
set fout=nothing
set fso=nothing
Response.Write "<br><font color='red'><B>&nbsp;&nbsp;index.asp&nbsp;&nbsp;生成成功！！</B></font><br>"
Index=""
pencat0=""
pencat2=""
End Function
'----------------------------------------------------------------------------------------------
Function makevipindex(id)
set rstemp=server.createobject("adodb.recordset")
	sql="select SystemPath,Page_VIPIndex from Template where id="&id&""
	rstemp.open sql,connTemp,1,1
SystemPath=rsTemp("SystemPath")
pencat1=rstemp("Page_VIPIndex")
rstemp.close
set rstemp=nothing

pencat0="<!-- #include file='conn.asp' --><"
pencat0=pencat0&"%Stats="" VIP 专区  ""%"
pencat0=pencat0&"><!-- #include file='head.asp' -->"
pencat2="<!-- #include file='bottom.asp' -->"
Index=pencat0&pencat1&pencat2
Index=replace(Index,"{$SystemPath$}",SystemPath)
if OpenInJS=1 then
Index=replace(Index,"{$showvipzxgx$}","<"&"%"&"=topsvipzxgx"&"%"&">")
Index=replace(Index,"{$showVIP$}","<"&"%"&"=topsvip"&"%"&">")
Index=replace(Index,"{$showauthor$}","<"&"%"&"=topsauthor"&"%"&">")
Index=replace(Index,"{$showauthoradd$}","<"&"%"&"=topsauthoradd"&"%"&">")
Index=replace(Index,"{$userlogin$}","<script language=JavaScript src=""js/userlogin.asp?type=0""></script>")
Index=replace(Index,"{$user_login$}","<script language=JavaScript src=""js/userlogin.asp?type=1""></script>")
Index=replace(Index,"{$booksearch$}","<"&"%"&"=topsbooksearch"&"%"&">")
Index=replace(Index,"{$book_search$}","<"&"%"&"=topsbook_search"&"%"&">")
Index=replace(Index,"{$SiteSystemPath$}",SiteSystemPath)

Index=replace(Index,"{$vipbooksearch$}","<"&"%"&"=topsvipbooksearch"&"%"&">")
Index=replace(Index,"{$showclass$}","<"&"%"&"=topsclass"&"%"&">")
Index=replace(Index,"{$showtopten$}","<"&"%"&"=topstopten"&"%"&">")
Index=replace(Index,"{$showqltj$}","<"&"%"&"=topsqltj"&"%"&">")
Index=replace(Index,"{$showvipqltj$}","<"&"%"&"=topsvipqltj"&"%"&">")
Index=replace(Index,"{$showlztj$}","<"&"%"&"=topslztj"&"%"&">")
Index=replace(Index,"{$showsc$}","<"&"%"&"=topssc"&"%"&">")
Index=replace(Index,"{$showdj$}","<"&"%"&"=topsdj"&"%"&">")
Index=replace(Index,"{$showmdj$}","<"&"%"&"=topsmdj"&"%"&">")
Index=replace(Index,"{$showddj$}","<"&"%"&"=topsddj"&"%"&">")
Index=replace(Index,"{$showzdj$}","<"&"%"&"=topszdj"&"%"&">")
Index=replace(Index,"{$showtj$}","<"&"%"&"=topstj"&"%"&">")
Index=replace(Index,"{$showadd$}","<"&"%"&"=topsadd"&"%"&">")
Index=replace(Index,"{$showpinglun$}","<"&"%"&"=topspinglun"&"%"&">")
Index=replace(Index,"{$showmtj$}","<"&"%"&"=topsmtj"&"%"&">")
Index=replace(Index,"{$showztj$}","<"&"%"&"=topsztj"&"%"&">")
Index=replace(Index,"{$showdtj$}","<"&"%"&"=topsdtj"&"%"&">")
Index=replace(Index,"{$showlogolink$}","<"&"%"&"=topslogolink"&"%"&">")
Index=replace(Index,"{$showtxtlink$}","<"&"%"&"=topstxtlink"&"%"&">")
Index=replace(Index,"{$showlogo_link$}","<"&"%"&"=topslogo_link"&"%"&">")
Index=replace(Index,"{$showtxt_link$}","<"&"%"&"=topstxt_link"&"%"&">")
Index=replace(Index,"{$showgongg$}","<"&"%"&"=topsgonggao"&"%"&">")
Index=replace(Index,"{$showuserbookadd$}","<"&"%"&"=topsuserbookadd"&"%"&">")
Index=replace(Index,"{$showuserbookadds$}","<"&"%"&"=topsuserbookadds"&"%"&">")
Index=replace(Index,"{$showArticletj$}","<"&"%"&"=topsArticletj"&"%"&">")
Index=replace(Index,"{$showArticledj$}","<"&"%"&"=topsArticledj"&"%"&">")
Index=replace(Index,"{$showuserbooktj$}","<"&"%"&"=topsuserbooktj"&"%"&">")
Index=replace(Index,"{$showuserbookdj$}","<"&"%"&"=topsuserbookdj"&"%"&">")

Index=replace(Index,"{$showsyft$}","<"&"%"&"=topssyft"&"%"&">")
Index=replace(Index,"{$showjptj$}","<"&"%"&"=topsjptj"&"%"&">")
Index=replace(Index,"{$showvipsyft$}","<"&"%"&"=topsvipjrtj"&"%"&">")
Index=replace(Index,"{$showvipjptj$}","<"&"%"&"=topsvipjptj"&"%"&">")
Index=replace(Index,"{$showvote$}","<!--#include file='inc/vote.asp'-->")
else
Index=replace(Index,"{$showvipzxgx$}","<"&"%"&"showvipzxgx(vipzxgxNum)"&"%"&">")
Index=replace(Index,"{$showVIP$}","<"&"%"&"showvip()"&"%"&">")
Index=replace(Index,"{$showauthor$}","<"&"%"&"showauthor()"&"%"&">")
Index=replace(Index,"{$showauthoradd$}","<"&"%"&"showauthoradd(authorNum)"&"%"&">")

Index=replace(Index,"{$userlogin$}","<script language=JavaScript src=""js/userlogin.asp?type=0""></script>")
Index=replace(Index,"{$user_login$}","<script language=JavaScript src=""js/userlogin.asp?type=1""></script>")
Index=replace(Index,"{$booksearch$}","<"&"%"&"booksearch()"&"%"&">")
Index=replace(Index,"{$book_search$}","<"&"%"&"book_search()"&"%"&">")
Index=replace(Index,"{$vipbooksearch$}","<"&"%"&"vipbooksearch()"&"%"&">")
Index=replace(Index,"{$SiteSystemPath$}",SiteSystemPath)

Index=replace(Index,"{$showclass$}","<"&"%"&"showclass()"&"%"&">")
Index=replace(Index,"{$showtopten$}","<"&"%"&"showtopten()"&"%"&">")
Index=replace(Index,"{$showqltj$}","<"&"%"&"showqltj(qltjNum)"&"%"&">")
Index=replace(Index,"{$showvipqltj$}","<"&"%"&"showvipqltj(qltjNum)"&"%"&">")
Index=replace(Index,"{$showlztj$}","<"&"%"&"showlztj(lztjNum)"&"%"&">")
Index=replace(Index,"{$showsc$}","<"&"%"&"showsc(scNum)"&"%"&">")
Index=replace(Index,"{$showdj$}","<"&"%"&"showdj(djNum)"&"%"&">")
12 3 4 5 下一页
💿 文件大小 542 K
👤 上传用户 foreverlovely
📂 所属分类 Internet/网络编程
🏷️ 相关标签

#MSSQL #MySQL #ASP #系统设计
⌨️ 快捷键说明

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