📄 cover.asp
字号:
<!--#include file="../function/tablefunction.asp" -->
<!--#include file="lib.asp" -->
<!--#include file="../function/ubbfunction.asp" -->
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>无标题文档</title>
</head>
<body>
<%' set rs=server.createobject("adodb.recordset")
' strsql="select * from Template"
' rs.open strsql,db
'set addRs=server.createobject("adodb.recordset")
sql11="select siteName,blogtitle,myimg,realname,netname from website"
set rs11=db.execute(sql11)
sitename=rs11("siteName")
blogtitle=rs11("blogtitle")
myimg=rs11("myimg")
realname=rs11("realname")
netname=rs11("netname")
set rs1=server.createobject("adodb.recordset")
strsql1="select * from temp111"
rs1.open strsql1,db
set rs2=server.createobject("adodb.recordset")
strsql2="select * from article"
rs2.open strsql2,db,0,2
do while not rs1.eof and not rs1.bof
set fs=createobject("scripting.filesystemobject")
set ts=fs.opentextfile(server.mappath("../../article/template.html"))
Template_Code=ts.readall
folder="../../article/"
fname=makefilename(rs1("articleid"))
filePath=folder&fname
ClassName="曾经的你"
title=rs1("title")
KeyWord=rs1("title")
summary=rs1("title")
'Index_pic=request.form("Index_pic")
content=rs1("body")
hits=rs1("hits")
renum=rs1("renum")
subdate=rs1("subdate")
articleid=rs1("articleid")
rs2.addnew
rs2("title")=title
rs2("summary")=summary
rs2("KeyWord")=KeyWord
rs2("content")=content
rs2("hits")=hits
rs2("renum")=renum
rs2("articleid")=articleid
rs2("subdate")=subdate
rs2("ClassName")=ClassName
rs2("filepath")=filepath
Template_Code=replace(Template_Code,"${siteName}",sitename)
Template_Code=replace(Template_Code,"${blogtitle}",blogtitle)
Template_Code=replace(Template_Code,"${myimg}",myimg)
Template_Code=replace(Template_Code,"${realname}",realname)
Template_Code=replace(Template_Code,"${netname}",netname)
Template_Code=replace(Template_Code,"${Title}",title)
Template_Code=replace(Template_Code,"${KeyWord}",KeyWord)
Template_Code=replace(Template_Code,"${Summary}",summary)
Template_Code=replace(Template_Code,"${Content}",content)
Template_Code=replace(Template_Code,"${ClassName}",ClassName)
Template_Code=replace(Template_Code,"${SubDate}",subdate)
Template_Code=replace(Template_Code,"${articleid}",articleid)
set FSO=server.CreateObject("Scripting.fileSystemObject")
'FSO.createfolder(server.mappath(folder))
'filepath="../article/"
set fout=fso.createtextfile(server.MapPath(filepath))
fout.writeline Template_Code
rs2.update
rs1.movenext
loop
response.write "数据对接成功!"
%>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -