精品熟女碰碰人人a久久,多姿,欧美欧美a v日韩中文字幕,日本福利片秋霞国产午夜,欧美成人禁片在线观看

<%
'%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
'數據庫操作類
'%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
'名稱：class_dboperate
'版本：0.2
'更新：2005年6月14日
'作用：簡化數據庫操作的流程
'授權：免費使用
'%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

class class_dboperate

'************************************
'變量定義
'************************************
'conn ---------- 數據庫連接對象
'conn_str ------ 數據庫連接字符串

private conn,conn_str

'************************************
'實例 初始化/終止
'************************************

private sub class_initialize() 
set conn = server.createobject("adodb.connection")
end sub

private sub class_teriminate()
set conn = nothing
end sub

'************************************
'屬性
'************************************

'輸出數據庫連接字符串
' 返回值類型：string

property get connectstring 
connectstring = conn_str
end property

'設置數據庫連接字符串（數據庫連接字符串）
' 參數：str --- string

property let connectstring(str) 
conn_str = str
end property

'************************************
'事件
'************************************

'數據庫打開
public sub db_open() 。
conn.connectionstring = conn_str
conn.open
end sub

'數據庫關閉
public sub db_close() 
conn.close
end sub

'************************************
'方法
'************************************

'數據庫查詢（sql語句）
' 參數及類別：sql ---- string
' 返回值類型：記錄集
' 前提：數據庫狀態為打開

public function db_select(sql)
set db_select = conn.execute(sql)
end function

'數據庫執行（sql語句）
' 參數及類別：sql ---- string
' 返回值類型：整形
' 返回值含義：受影響行數
' 前提：數據庫狀態為打開

public function db_excute(sql)
dim rs_affected
conn.execute sql,rs_affected
db_excute = rs_affected
end function

end class
%>