database.sarang.net
UserID
Passwd
Database
DBMS
MySQL
PostgreSQL
Firebird
ㆍOracle
Informix
Sybase
MS-SQL
DB2
Cache
CUBRID
LDAP
ALTIBASE
Tibero
DB 문서들
스터디
Community
공지사항
자유게시판
구인|구직
DSN 갤러리
도움주신분들
Admin
운영게시판
최근게시물
Oracle Q&A 39528 게시물 읽기
No. 39528
windows server 2008 - Visual Basic - oracle10g
작성자
나진산(skwlstks)
작성일
2012-07-09 11:58
조회수
4,441

제목그대로 Windows Server 2008 에서 oracle 10g를 설치하고 DB를 조회하는 아주 간단한 프로그램을 만들고 있습니다.

 

--소스

 

Option Explicit

Dim oCon As New ADODB.Connection
Dim g_ConnectString1 As String 'DB연결관리정보
Dim Result As ADODB.Recordset
Dim tnsQuery As String
Dim sqlQuery As String
Dim commit_query As String

Dim DA_CODE As Integer
Dim RES_CODE As Integer
Dim PB_CODE As Integer
Dim PB_NAME As String
Dim DB_IP As String
Dim NUM As Integer


Private Sub Form_Load()

    g_ConnectString1 = "Provider=MSDAORA.1;Password=*****;Persist Security Info=True;User ID=******;Data Source=127.0.0.1:1521"
    'g_ConnectString1 = "Provider=OLEORA.ORACLE.1;Password==*****;;Persist Security Info=True;User ID=INP=******;OLDB;Data Source=127.0.0.1:1521"
   
    Set oCon = CreateObject("ADODB.Connection")
       
    oCon.ConnectionTimeout = 0
   
    oCon.Open (g_ConnectString1)
   
    tnsQuery = "select * from test"
   
    Set Result = oCon.Execute(tnsQuery)
   
    commit_query = "commit"
   
    Do While Not Result.EOF
    
        DA_CODE = Result("da_code")
        RES_CODE = Result("res_code")
        PB_CODE = Result("pb_code")
        PB_NAME = Result("pb_name")
        DB_IP = Result("db_ip")
        NUM = Result("num")
       
        Text1.Text = DA_CODE
        Text2.Text = RES_CODE
        Text3.Text = PB_CODE
        Text4.Text = PB_NAME
        Text5.Text = DB_IP
        Text6.Text = NUM
       
    Result.MoveNext
    Loop

    

    oCon.Execute (commit_query)
    
    oCon.Close
    Set oCon = Nothing
    Set Result = Nothing

End Sub

이런 소스가 있을때에 컴파일을 돌리면 에러가 발생합니다.

접속방법을 MSDAORA.1로 하게 되면

이런 에러메시지가 나오게 되고

OLEORA.ORACLE.1로 접속을 하게 되면

이런 메시지가 나옵니다.

 

각종 references들은 올려놓은 상태입니다. tnsname도 맞추고요.

닷넷프레임워크도 4.0에 mdac도 2.8로 설치하고 ODAC도 설치하고 오라클 홈 폴더에 권한설정도 해주었습니다.

이런저런 검색을 통해 할수 있는 부분은 다 했다고 생각되는 데도 에러메시지가 잡히질 않네요.

도대체 어떤 방법으로 이 난관을 극복해 나가야 할지 잘 모르겠습니다.

 

많은 도움 부탁드립니다.ㅠㅠ

 

====참고====

os- windows server 2008 R2 Standard 64비트

DBMS - Oracle 10g 64비트

program - Visual Basic 6.0

이 글에 대한 댓글이 총 1건 있습니다.

 인바운드/아웃바운드 네트웍 설정은 확인 하셨는지 궁금하네요.

한명호(midtiger)님이 2012-07-16 17:58에 작성한 댓글입니다.
[Top]
No.
제목
작성자
작성일
조회
39533세로를 가로로 바꾸기 [1]
초보
2012-07-09
7323
39532각 필드의 행으로 나온 결과 값을 열로 나열 하는 방법 [1]
하승환
2012-07-09
5144
39531한 텍스트에 같이 출현하는 문자열 쌍의 갯수 구하는 방법.. [2]
fly_sky
2012-07-09
4530
39528windows server 2008 - Visual Basic - oracle10g [1]
나진산
2012-07-09
4441
39527부모찾는 쿼리가 궁금합니다.
덕군
2012-07-09
4458
39526프로시져,트리거 내리는 방법
초보
2012-07-09
3930
39525여러 컬럼중 한개 컬럼만 INSERT ... [1]
궁금이
2012-07-05
4298
Valid XHTML 1.0!
All about the DATABASE... Copyleft 1999-2024 DSN, All rights reserved.
작업시간: 0.018초, 이곳 서비스는
	PostgreSQL v16.2로 자료를 관리합니다