ในฐานะโปรแกรมเมอร์ฉันเชื่อว่าทุกคนมีไลบรารีฟังก์ชั่นและไลบรารีคลาสของตัวเอง เมื่อทำงานในโครงการให้แยกฟังก์ชั่นและคลาสที่ต้องการจากห้องสมุด สิ่งนี้สามารถปรับปรุงประสิทธิภาพการพัฒนา คลาสในห้องสมุดคลาสพิเศษ CJJ ASP
การคัดลอกรหัสมีดังนี้:
'--- ******************* tconnstring ********************************
'โครงสร้างสตริงการเชื่อมต่อฐานข้อมูล
classtconnstring
PublicDbname, Dbpath, Dbserver, Dbuser, DBPass, DBType
endclass
'--- ******************* tconnstring ********************************
'--- ********************** tdboperate ********************************************************
'คลาสการดำเนินงานฐานข้อมูลทั่วไป
classtdboperate
Privatecls_oconn, วัตถุการเชื่อมต่อส่วนตัวคลาส CLS_ORS '
Privatecls_serrinfo, CLS_SCONN, CLS_SSQL, CLS_SURL, CLS_SFORMACTION
Privatecls_iPagesize จำนวนหน้าเว็บ
privatecls_ltotalpage, cls_ltotalrecord, cls_lpageno
'การเริ่มต้นชั้นเรียน
Privatesubclass_initialize ()
enddub
-
'ประเภท: คุณสมบัติ
'วัตถุประสงค์: สร้างการเชื่อมต่อฐานข้อมูลตามการเชื่อมต่อที่ได้รับ
'อินพุต: a_sconn: สตริงประเภทข้อมูล
'return: ไม่มี
-
PublicPropertyLetSetConn (a_sconn)
dimsobtype
sobjtype = lcase (typename (a_sconn)))
ifsobjtype <> "สตริง" แล้ว
cls_serrinfo = cls_serrinfo & "<li> setconn: พารามิเตอร์สตริงที่ผิดกฎหมาย </li>" & Chr (10)
การออกจากระบบ
endif
setcls_oconn = createObject ("adodb.connection"))
onerrorresumenext
cls_oconn.opena_sconn