본문으로 바로가기

ASP 쿼리 실행법.

category 프로그래밍/ASP 2008. 11. 12. 10:52
반응형

1. 단순 SQL 쿼리를 이용한 RecordSet

- case 1
<%
sql = "select * from member where userid='kkk' "
Set Rs = dbConn.Execute(sql)
Do until Rs.eof
   ~~~
  Rs.movenext
Loop
Rs.close
%>

- case 2
<object RUNAT="SERVER" PROGID="ADODB.Recordset" ID="objRs"></object>
<%
sql = "select * from member where userid='kkk' "
objRs.open sql, dbConn
Do Until objRs.eof
    ~~~
    objRs.movenext
Loop
objRs.close
%>

2. 배열 (GetRows) 처리 방식.

- case1
sql = "select * from member where userid='kkk' "
Set adoRs = Server.CreateObject("ADODB.Recordset")
adoRs.Open sql, dbConn
if not adoRs.eof or not adoRs.bof then
    rstData1 = adoRs(0)
    rstData2 = adoRs(1)
end if
adoRs.close

- case 2
sql = "select * from member where userid='kkk' "
'sql = "exec usp_member_info '"& userid &"' "
Set adoRs = Server.CreateObject("ADODB.Recordset")
adoRs.Open sql, dbConn, adOpenForwardOnly, adLockReadOnly  '-- type library 설정 해야됨.
'adoRs.Open sql, dbConn, 1, 1
if adoRs.eof or adoRs.bof Then
   rstData = "no"
else
  rstData = "yes"
  arrData = adoRs.GetRows
end if
adoRs.close

if rstData = "yes" then
    for intNum = 0 to Ubound(arrData) -1
        response.write arrData(0,intNum) &"<br>"
    Next
else
    response.write "no data"
end if

3. command 객체 사용. (추후 업데이트 예정)
반응형