VBScript로 access DB 열기 MSSQL_MDB_Oracle

test.html :
<script language="VBscript">
<!--
function test
Set Conn = CreateObject("ADODB.Connection")
Set Rs = CreateObject("ADODB.Recordset")

Conn.Provider = "Microsoft.Jet.OLEDB.4.0"
Conn.Mode = adModeRead
Conn.Open "c:test.mdb","admin",""
rs.Open "select * from member", Conn

while not(rs.EOF)
Window.document.writeln rs("usertest")
Window.document.writeln "<BR>"
rs.movenext
wend
rs.Close
Conn.Close

end function
-->
</script>
<input type="button" omclick="test" value="눌러바!">
</body>

#. Microsoft.Jet.OLEDB.4.0 provider를 사용해서
클라이언트의 mdb 파일을 열고,
member 테이블에서 usertest 컬럼값을 가져오는 소스입니다.
예전에 msdn 기술 문서에서 읽었다가 대충 기억나는대로 다시 쳐 봤는데요.
실행될 클라이언트의 odbc (혹은 ado일까요?) 버전에 따라
Microsoft.Jet.OLEDB.4.0 의 버전 번호가 차이가 날 수 있으므로..
레지스트리에서 등록된 Provider를 확인한 후 적용하시면
몇가지 응용이 가능할 듯 하네요.
DSN 사용할 경우(ODBC 드라이버..)에도, 거의 동작은 합니다. ^^
OLEDB로 직접 치고 들어가면 되는 경우도 있고, 안되는 경우도 있더군요.
아마 보안상의 문제인 것으로 보입니다만 --a .#

#. 뭐, 각자 필요한대로 응용해보시길. ^^; .#

p.s:Win2K server, IE 5.0 환경에서 소스를 테스트해보았습니다.
mdb는 access 2000에서 만들어졌구요.
------------------------------------------------------------
위의 설명을 단사람은 제가 아닙니다.
언제 받아놓은 스크랩인지 모르겠지만, 출처,시기 를 기억할 순 없군요.

null

덧글

댓글 입력 영역
* 비로그인 덧글의 IP 전체보기를 설정한 이글루입니다.


통계 위젯 (화이트)

654973
8822
10217529

google_myblogSearch_side

▷검색어

Flag Counter style2