寧몸숌데돨asp鑒앴욋꾸鱗잚

2018-09-05 23:39

阅读:1080

  <%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
鑒앴욋꾸鱗잚
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
츰냔:Class_DBOperate
경굶:0.2
鱗諒:qihangnet
뫘劤:2005쾨6墩14휑
鱗痰:숌뺏鑒앴욋꾸鱗돨직넋
竿홈:출롤賈痰
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

ClassClass_DBOperate

************************************
긴좆땍屢
************************************
Conn----------鑒앴욋젯쌈뚤蹶
Conn_Str------鑒앴욋젯쌈俚륜눔

PrivateConn,Conn_Str

************************************
茄절놓迦뺏/老岺
************************************

PrivateSubClass_Initialize()
EndSub

PrivateSubClass_Teriminate()
SetConn=Nothing
EndSub

************************************
橄昑
************************************

渴놔鑒앴욋젯쌈俚륜눔
럿쀼令잚謹:string

PropertyGetConnectString
ConnectString=Conn_Str
EndProperty

?阮초暄駙誰Ы當囹慧(鑒앴욋젯쌈俚륜눔)
꽝鑒:str---string

PropertyLetConnectString(str)
Conn_Str=str
EndProperty

************************************
慤숭
************************************

鑒앴욋댔역
PublicSubDB_Open()。
Conn.ConnectionString=Conn_Str
Conn.Open
EndSub

鑒앴욋밑균
PublicSubDB_Close()
Conn.Close
EndSub

************************************
렘랬
************************************

鑒앴욋꿴璂(sql刀얌)
꽝鑒섟잚깎:sql----string
럿쀼令잚謹:션쩌섞
품瓊:鑒앴욋榴檄槨댔역

PublicFunctionDB_Select(sql)
SetDB_Select=Conn.Execute(sql)
EndFunction

鑒앴욋獵契(SQL刀얌)
꽝鑒섟잚깎:sql----string
럿쀼令잚謹:憐近
럿쀼令벵屢:肝緞捲契鑒
품瓊:鑒앴욋榴檄槨댔역

PublicFunctionDB_Excute(sql)
Dimrs_affected
Conn.Executesql,rs_affected
DB_Excute=rs_affected
EndFunction

EndClass
%>


评论


亲,登录后才可以留言!