คำอธิบายของฟังก์ชั่น:
รหัสนี้ใช้การสกัดข้อมูลจากการเข้าถึงเพื่อสร้างไฟล์ HTML โดยไม่ต้องสร้างโฟลเดอร์
หากชื่อไฟล์เหมือนกับชื่อไฟล์ที่จะสร้างให้เขียนทับมันหลักการเดียวกับการอัปเดต SQL
ฟังก์ชั่นที่จะเพิ่ม: ลบและค้นหา
การคัดลอกรหัสมีดังนี้:
-
-
-
'subject: ASP สร้างไฟล์แบบคงที่/htmlbystabx
-
'นักเขียน: stabx <[email protected]>
-
'บล็อก: http: //btbtd.exblog.jp/;
-
'บล็อก/ไซต์: phoenix.gi-p.gi//greeninstitute
-
'วันที่: 2006-5-22
-
-
setRs = server.createObject ("adodb.recordset"))
sql = "selecttop10*จาก (selecttop3500*fromctarticleorderbyarticleidasc) orderbyarticleiddesc" 'subquery ซึ่งปัจจุบันถือว่าเป็นไดโนเสาร์มากกว่าไดโนเสาร์
Rs.Opensql, mm_conn_string, 1
whilenotrs.eof 'loop สร้างระเบียนทั้งหมดของการสืบค้นเป็นไฟล์ html
cid_ = rs ("classid")
ncid_ = rs ("nclassid")
AID_ = RS ("articleid")
ADT_ = RS ("DateAndTime")
tt_ = rs ("ชื่อ")
ct_ = rs ("เนื้อหา")
'em_ = htmltotext (rs ("อีเมล")))
'ht_ = rs ("ฮิต")
'url_ = rs ("url")
'src_ = rs ("www")
'au_ = htmltotext (rs ("นักเขียน")))
Response.write "<ahref =" "& cid _ &" _ "& ncid _ &" _ "& ช่วยเหลือ _ &". htm "" target = "" blank "" ">" & cid _ & "_" & ncid _ & "_" สร้างไฟล์
cfilename = cid _ & "_" & ncid _ & "_" & ช่วยเหลือ _ & ". htm" ชื่อชื่อไฟล์ที่จะสร้าง
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 ("<title>" & sitename _ & "" & tt _ & "</title>"
chtml.writeLine ("</head> <body>")
chtml.writeLine ("title:" & tt _ & "<p/>")
chtml.writeLine ("เนื้อหา:" & ct _ & "<p/>")
chtml.writeLine ("createdbycid:" & cid _ & "ncid:" & ncid _ & "ช่วยเหลือ:" & AID_ & "
-
AID_ = CLNG (AID_)
chtml.writeline ("pagecreatedon:" & now ())
chtml.writeLine ("</body> </html>")
chtml.close
Rs.Movenext
ใช้
Rs.close
setrs = ไม่มีอะไร%>