Описание функции:
Этот код реализует извлечение данных из доступа к созданию файлов HTML без создания папок.
Если имя файла такое же, как и имя файла, которое будет создано, перезаписывайте его, тот же принцип, что и обновление SQL.
Функции, которые должны быть добавлены: удалить и поиск.
Кода -копия выглядит следующим образом:
<%
'' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '
'
'Тема: ASP создать статический файл/htmlbystabx
'
'Автор: stafx <[email protected]>
'
'blog: http: //btbtd.exblog.jp/;
'
Блог/сайт: phoenix.gi-p.gi//greeninstitute
'
Дата: 2006-5-22
'
'' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '' '
Setrs = server.createObject ("adodb.recordset")
sql = "selecttop10*from (selecttop3500*fromCtarticleRoderByArticleIdasc) OrderByArticleDesc" 'подразделение, в настоящее время считается более динозавром, чем динозавр
rs.opensql, mm_conn_string, 1
Пока петля создает все записи запроса как файлы HTML
cid_ = rs ("classid")
ncid_ = rs ("nclassid")
aid_ = rs ("articleid")
adt_ = rs ("dateandtime")
tt_ = rs ("title")
ct_ = rs ("content")
'em_ = htmltotext (rs ("email")))
'ht_ = rs ("хиты")
'url_ = rs ("url")
'src_ = rs ("www")
'au_ = htmltotext (rs ("writer"))
response.write "<ahref =" "& cid _ &" _ "& ncid _ &" _ "& aid _ &". htm "" target = "" _ blank "" > "& cid _ &" _ "& ncid _ &" _ "& ncid _ &" _ "& aid _ &". htm </a> creatementat "& how () &" <br> "'' ' Создает файл
cfilEname = cid _ & "_" & ncid _ & "_" & aid _ & ". htm" name Имя файла, которое будет создано
setDfso = createObject ("scripting.filesystemobject")
SetChtml = dfso.createTextFile (server.mappath (cfilename), true) 'существование означает перезаписание
chtml.writeline ("<html> <head>")
chtml.writeline ("<linkrel = 'styleSheet'type =' text/css'href = '../css/css_first/ctarticle.css'>")
chtml.writeline ("<tite>" & sitename _ & "" & tt _ & "</title>")
chtml.writeline ("</head> <body>")
chtml.writeline ("title:" & tt _ & "<p/>")
chtml.writeline ("content:" & ct _ & "<p/>")
chtml.writeline ("CreatedBycid:" & cid _ & "ncid:" & ncid _ & "Aid:" & aid_ & "
")
aid_ = clng (aid_)
chtml.writeline ("PageCreateDon:" & Now ())
chtml.writeline ("</body> </html>")
chtml.close
Rs.movenext
Венд
Rs.close
setrs = ничего%>