<%
'%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
'데이터베이스 작업 클래스
'%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
'이름: Class_DBPerate
'버전: 0.2
'저자 : 치항넷
'업데이트: 2005년 6월 14일
'기능: 데이터베이스 작업 프로세스를 단순화합니다.
'권한: 무료로 사용 가능
'%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
클래스 Class_DBOperate
'************ * **************************
'변수 정의
'************************************
'Conn ---------- 데이터베이스 연결 개체
'Conn_Str ------ 데이터베이스 연결 문자열
Private Conn,Conn_Str
'********************************** ** ***
'인스턴스 초기화/종료
'************************************
프라이빗 하위 클래스_Initialize()
Conn = Server.CreateObject("ADODB.Connection") 설정
End Sub
Private Sub Class_Teriminate()
SetConn=아무것도 없음
끝 하위
'************************************
'재산
'************************************
'데이터베이스 연결 문자열 출력
'반환 값 유형: 문자열
속성 Get ConnectString
ConnectString = Conn_Str
End Property
'데이터베이스 연결 문자열 설정(데이터베이스 연결 문자열)
' 매개변수: str --- string
속성 Let ConnectString(str)
Conn_Str = str
끝 속성
'************************************
'이벤트
'************************************
'데이터베이스가 열립니다
공개 하위 DB_Open() .
Conn.ConnectionString = Conn_Str
커넥트오픈
End Sub
'데이터베이스가 닫혔습니다.
공개 하위 DB_Close()
연결 닫기
끝 하위
'************************************
'방법
'************************************
'데이터베이스 쿼리(SQL 문)
'매개변수 및 카테고리: sql ---- 문자열
'반환 값 유형: 레코드세트
' 전제 조건: 데이터베이스 상태가 열려 있음
Public Function DB_Select(sql)
DB_Select = Conn.Execute(sql) 설정
End Function
'데이터베이스 실행(SQL문)
'매개변수 및 카테고리: sql ---- 문자열
'반환 값 유형: 정수
'반환 값 의미: 영향을 받은 행 수
' 전제 조건: 데이터베이스 상태가 열려 있음
Public Function DB_Excute(sql)
희미한 rs_영향을 받음
Conn.Execute sql,rs_affected
DB_Excute = rs_영향을 받음
종료 함수
종료 클래스
%>