2007~2011/SQL Server2009.09.05 00:01
ADO(ActiveX Data Objects)를 사용하여 Active Server Pages(ASP) 스크립트에서 SQL Server 2005 AdventureWorks 샘플 데이터베이스를 액세스 하는 방법에 대해서 간략한 예제입니다. KB 에 나온 스크립트를 약간 수정하였습니다. 데이터베이스 설정 요소에 대해서는 생략 하였습니다.


[환경]
Windows XP IIS 5.1
SQL Server 2005 


[구성절차]
1. ODBC DSN 구성
 가. 시스템 DSN : LAIGO
 나. 드라이버 : SQL Server 
 다. 로그인 ID : laigo 
 라. 암호 : P@ssw0rd 
 

2. ASP 스크립트 
가. Global.asa 
<SCRIPT LANGUAGE=VBScript RUNAT=Server>
   Sub Session_OnStart
   Session("ConnectionString") = "DSN=LAIGO;UID=laigo;PWD=P@ssw0rd;DATABASE=AdventureWorks;APP=ASP script"
      Session("ConnectionTimeout") = 15
      Session("CommandTimeout") = 30
   End Sub

   Sub Session_OnEnd

   End Sub
   </SCRIPT>

나. Default.asp
<HTML>
   <HEAD>
   <TITLE>Lai Go's TINote Blog</TITLE>
   </HEAD>
   <BODY BGCOLOR="#FFFFFF">

   <% Set OBJdbConnection = Server.CreateObject("ADODB.Connection")
   OBJdbConnection.ConnectionTimeout = Session("ConnectionTimeout")
   OBJdbConnection.CommandTimeout = Session("CommandTimeout")
   OBJdbConnection.Open Session("ConnectionString")
   Set SQLStmt = Server.CreateObject("ADODB.Command")
   Set RS = Server.CreateObject ("ADODB.Recordset")
   %>

   <p>
   <table border="0" bordercolor="#000000">
   <%
   SQLStmt.CommandText = "SELECT ContactID, FirstName, EmailAddress from Person.Contact WHERE ContactID < 10"
   SQLStmt.CommandType = 1
   Set SQLStmt.ActiveConnection = OBJdbConnection
   RS.Open SQLStmt

   Do While Not RS.EOF
   %>
   <TR>
      <TD Width = 50 ALIGN=LEFT>
         <FONT SIZE=+1>
         <%= RS("ContactID") %>
         </FONT></TD>
      <TD></TD>
      <TD Width = 150 ALIGN=LEFT>
         <FONT SIZE=+1>
         <%= RS("FirstName") %>
         </FONT></TD>
      <TD></TD>
      <TD Width = 350 ALIGN=LEFT>
         <FONT SIZE=+1>
         <%= RS("EmailAddress") %>
         </FONT></TD>
      <TD></TD>
   </TR>
   <%
   RS.MoveNext
   Loop
   %>
   </table>
   <hr>
   <p>
   </BODY>
   <% OBJdbConnection.Close
   Set OBJdbConnection = Nothing
   %>
   </HTML>


3. 수행 결과 



[참고자료]
How to access SQL Server in Active Server Pages


작성자 : Lai Go / 작성일자 : 2009.09.04
Posted by Lai Go