อย่างไรก็ตามฉันได้ใช้สิ่งนี้เพื่อสร้างเว็บไซต์มากมายในตอนนี้และฉันคิดว่ามันยังมีประโยชน์มากดังนั้นฉันจะแบ่งปันกับคุณ รองรับการเชื่อมต่อฐานข้อมูลสามประเภท: MSSQL2000, MSSQL2005, Access
สามวิธี:
select_table (SQL)
แบบสอบถามตารางส่งคืนจริงหรือเท็จ
ส่งคืน FALSE เมื่อข้อผิดพลาดคำสั่ง SQL หรือบันทึกที่ว่างเปล่ามิฉะนั้นจะเป็นจริง
update_table (SQL)
การอัปเดตตารางรวมถึงการอัปเดตลบ
ส่งคืนจริงหากการดำเนินการที่ประสบความสำเร็จมิฉะนั้นจะส่งคืนเท็จหากอัปเดตและจำนวนแถวที่ได้รับผลกระทบหลังจากดำเนินการ
Insert_Table (SQL, Table, ID_Column)
ตารางคือชื่อตาราง id_column เป็นหมายเลขอัตโนมัติในตารางและฟิลด์จะเพิ่มขึ้นด้วยตัวเอง
ส่งคืนจริงเมื่อการดำเนินการที่ประสบความสำเร็จมิฉะนั้นส่งคืนเท็จระบุตารางและ ID_COLUMN ID การเพิ่มขึ้นอัตโนมัติที่สร้างขึ้นโดยระเบียนที่เพิ่มเข้ามาล่าสุดจะถูกส่งกลับ
select_table () วิธีการที่เกี่ยวข้อง select_page (หน้า, psize)
การประมวลผล Pagination หน้าเป็นหน้าปัจจุบันและ PSIZE คือจำนวนแถวที่บันทึกไว้ต่อหน้า
ในระหว่างการดำเนินการทั้งหมดลิงก์ฐานข้อมูลและ RS จะถูกตรวจพบโดยอัตโนมัติว่าเปิดอยู่และลิงก์ฐานข้อมูลจะถูกปิดโดยอัตโนมัติหลังจากดำเนินการ
ตัวอย่าง:
setDb = newadodb_class
ifdb.select_table ("เลือก*fromnewsordybyiddesc")) จากนั้น
หน้า = คำขอ ("หน้า")
select_page (หน้า, 20) '20 รายการต่อหน้า
fori = 1to20
response.writedb.rs ("title") 'คลาสอยู่ในตัว RS ในตัวและไม่เปลี่ยนรูป
db.rs.movenext
ifdb.rs.eofthenexitfor
ต่อไป
endif
db.rspage = จำนวนหน้าทั้งหมด, db.nowpage = หน้าปัจจุบันหลังจากการประมวลผล db.rscounts จะนับจำนวนระเบียนทั้งหมด
ifdb.update_table ("deleetefromnewswhereispass = 1") จากนั้นจะเหมือนกัน
Response.write "DELETE" & DB.UPDATED & "ROW" ทั้งหมด
endif
calldb.insert_table ("insertintonews (ชื่อเรื่องเนื้อหา) ค่า ('" & title & "', '" & "' ')", "ข่าว", "id")
Response.write "เพิ่ม ID เป็น" & db.insertd
ในตอนท้ายของหน้าคุณสามารถส่งออก db.readcounts เป็นจำนวนครั้งที่ฐานข้อมูลถูกสอบถาม
-
ข้อได้เปรียบของคลาสนี้คือคุณไม่ต้องกังวลเกี่ยวกับการลืมปิดลิงค์ฐานข้อมูลไม่จำเป็นต้อง setRs = server.RecordSet ("ADODB.RecordSet") บ่อยครั้งไม่จำเป็นต้อง setR = ไม่มีอะไรเลย
ข้อเสียคือวิธีการเปลี่ยนหน้าแบบดั้งเดิม Rs.absolutePage = Rs.Pagesize
-
-
'/****** kshop *******/
'ADODB_CLASS.ASP CLAGE CLASS DATABASE
'เวอร์ชัน 1.0
'ลิขสิทธิ์ [อีเมล] [email protected] [/อีเมล]
'อีเมล [อีเมล] [email protected] [/อีเมล]