[ASP] ODBC 사용

2002. 5. 4. 21:07Scrapbook/개발 및 프로그래밍

반응형
provider=sqloledb;data source=서버이름
;initial catalog=데이터베이스_이름;
user id=사용자 이름;password=사용자_패
스워드
--------ole db 연결 스트링-------
여기서 provider를 생략하면
자동으로 odbc인줄 안단다.
이상 두꺼운 책에 있는 내용이다.

'ODBC설정
dsnname = "aaaa"
uidname = "bbbb"
pwdname = "1xdsf"
connectstr = ("DSN="&dsnname&";UID="&uidname&";PWD="&pwdname&";")
if uid = "" then
response.write "<td align=center><img src=http://211.171.255.159/image/top_menu/icon1.gif width=11 height=10 border=0></td>"
else
'odbc 설정
SET db=Server.CreateObject("ADODB.Connection")
db.Open connectstr

query = "SELECT ct=count(1) from couple_info,usr_info where (founderid='"&uid&"' and partnerid=id and islogin='T') or (partnerid='"&uid&"' and founderid=id and islogin='T')"
'response.write query
'response.end
SET rs = Server.CreateObject("ADODB.RecordSet")
rs.open query, connectstr
heartnum = rs("ct")
rs.close
set rs=nothing
if heartnum > 0 then
response.write "<td align=center><a href=# OnClick=openHeart();><img src=http://211.171.255.159/img/blink/heart.gif width=11 height=10 ALT='"&cstr(heartnum)&"명의 파트너가 로긴해있습니다.' border=0></a></td>"
else
response.write "<td align=center><a href=# OnClick=openHeart();><img src=http://211.171.255.159/image/top_menu/icon1.gif width=11 height=10 border=0 alt='로긴한 파트너가 없습니다.'></a></td>"
end if
end if

-------------------------------------------------------------------------
Set Dbcon=server.createobject("adodb.connection") DB와의 연결 부분이죠

Dbcon.open("DSN=자신이 만든 데이타 베이스 이름; uid=여기에는 ID; pwd=여기에는 패스워드")

--------------------------------------------------------------------------
<%

    Set db = Server.CreateObject("ADODB.Connection")

    db.Open("DSN=Mydata;UID=scott;PWD=tiger")

    SQL = "SELECT * FROM EMP"

    Set Grs = Server.CreateObject("ADODB.Recordset")

    Grs.pagesize= 10

    Grs.Open SQL,db,1

    ......   <중간생략>

%>

반응형