asp | DLL로 DB연결 잡기
페이지 정보
작성자 100K5 작성일16-09-01 09:30 조회63,673회 댓글0건관련링크
본문
1. DLL의 프로젝트는 rydns
class는 rydns_co 로 한다
2. DLL은 아래의 코드를 복붙하고 microsoft activex lib 2.6을 추가한다
--- DLL ------------------------------------
Private Const strCnn = "Provider=SQLOLEDB;Data Source=xxx.xxx.xxx.xxx,1433;Initial Catalog=xxxxxx;UID=xxxxx; PWD=xxxxxx;"
Private vDB As ADODB.Connection
Private Sub Class_Initialize()
Set vDB = New ADODB.Connection
End Sub
Public Property Get DBCONN() As Variant
vDB.Open strCnn
Set DBCONN = vDB
End Property
--- DLL -------------------------------------
3. asp는 아래의 코드를 복붙하고 상단에 쓰여진 프로젝트와 클래스명을 기입한다
---- DBcon.asp -------------------------------
<!--METADATA TYPE= "typelib" NAME= "ADODB Type Library" FILE="C:\Program Files\Common Files\SYSTEM\ADO\msado15.dll" -->
<OBJECT RUNAT=server PROGID=ADODB.Connection id=DB></OBJECT>
<%
Dim DB
Dim DBConn
Set DBConn = Server.CreateObject("rydns.rydns_co")
Set DB = DBConn.DBCONN
'Response.write DB.connectionstring db정보를 확인
DB.CommandTimeout=18000 'db커넥션 개체의 쿼리결과 대기시간을 늘여준다
Session.Timeout = 300
%>
---- DBcon.asp --------------------------------
[원문] http://egloos.zum.com/Freelf/v/3019869
댓글목록
등록된 댓글이 없습니다.