<%
'*******************************
'기능 : ConnectionMSSQL (Connstr)
'매개 변수 : Connstr, 데이터베이스 연결 코드
'저자 : Alixi
'날짜 : 2007/7/13
'설명 : 일반 데이터베이스 연결 프로세스
'예 : <%= ConnectionMSSQL ( "제공자 = microsoft.jet.oledb.4.0; dataSource = test.mdb")%>
'*******************************
subconnectionmssql (connstr)
onerrorresumenext
setobjconn = server.createObject ( "adodb.connection")
objconn.connectiontimeout = 12
objconn.connectionstring = trim (connstr)
objconn.open
ifobjconn.errors.count = 0then
또 다른
response.write "ConnectionMSSQL", "데이터 연결 실패, 구성 파일을 확인하십시오!"
응답. 엔드
endif
Endsub
%>