แนะนำ: ASP ใช้หมายเลขโทรศัพท์เพื่อสร้างรหัสสำหรับรูปภาพ ฟังก์ชั่น: สร้างหมายเลขโทรศัพท์บนหน้าเป็นรูปแบบภาพ call com_creatvalidcode (request.QueryString (โทร)) Public Sub Com_creatvalidCode (PTEL) '---------- 禁止缓存 Response.expires = 0 Response.addheader Pragma
รหัสอินสแตนซ์ ASP ส่งออกข้อมูลโดยตรงในฐานข้อมูลไปยังสเปรดชีต Excel
<!-#รวมไฟล์ = ../conn.asp->
-
Dim S, SQL, ชื่อไฟล์, FS, MyFile, X
ตั้งค่า fs = server.createObject (scripting.filesystemobject)
'-คุณต้องการให้ไฟล์ Excel ที่สร้างขึ้นดังนี้
filename = server.mappath (users.xls)
'-ลบไฟล์ Excel ดั้งเดิมหากมีอยู่
ถ้า fs.fileexists (ชื่อไฟล์) แล้ว
fs.deletefile (ชื่อไฟล์)
สิ้นสุดถ้า
'-สร้างไฟล์ Excel
ตั้งค่า myfile = fs.createtextfile (ชื่อไฟล์จริง)
'ตั้งค่า rs = server.createObject (adodb.recordset)
'-ติดตามข้อมูลที่คุณต้องการใส่ลงใน Excel จากฐานข้อมูล
'sql = เลือก * จากคำสั่ง tb_execl โดย id desc
'Rs.Open SQL, Conn
startTime = Request (starttime)
endtime = คำขอ (endtime)
startEndTime = addTime ระหว่าง #& starttime & 00: 00: 00 #และ #& endtime & 23: 59: 59 #
strsql = เลือก * จาก myeky_myusr
ตั้งค่า rstdata = conn.execute (strsql)
ถ้าไม่ใช่ rsstdata.eof และไม่ใช่ rsstdata.bof แล้ว
สลัว Trine, Responsestr
strline =
สำหรับแต่ละ x ใน rstdata.fields
strline = strline & x.name & ch (9)
ต่อไป
'-เขียนชื่อคอลัมน์ของตารางเพื่อ excel ก่อน
myfile.writeline stlline
ทำในขณะที่ไม่ใช่ rstdata.eof
strline =
สำหรับแต่ละ x ใน rsstdata.fields
strline = strline & x.value & ch (9)
ต่อไป
myfile.writeline stlline
rsstdata.movenext
วง
สิ้นสุดถ้า
Response.write ไฟล์ excel ถูกสร้างขึ้นสำเร็จคลิก <a href = users.xls target = _blank> ดาวน์โหลด </a>!
rsstdata.close
ตั้งค่า rstdata = ไม่มีอะไร
conn.close
ตั้งค่า conn = ไม่มีอะไร
-
แบ่งปัน: การแยกรหัสและหน้าใน ASP เพื่อหลีกเลี่ยงปัญหาการบำรุงรักษาที่เกิดจากการผสมโปรแกรม ASP และรหัส HTML บทความนี้แนะนำวิธีการใช้เทมเพลตเพื่อแยกโปรแกรมและหน้าเพื่อทำให้การเขียนโปรแกรมง่ายขึ้น เมื่อใช้ ASP เพื่อสร้างเว็บไซต์มักจะมีสถานการณ์ที่รหัสโปรแกรมและรหัส HTML ถูกผสมในไฟล์ ASP มีข้อเสียมากมายในการทำสิ่งนี้: 1 ไม่ต้องพูดถึงการเขียนโปรแกรมคุณต้อง