Background Image

FORUM

조회 수 12625 추천 수 0 댓글 2
?

단축키

Prev이전 문서

Next다음 문서

크게 작게 위로 아래로 댓글로 가기 인쇄

 안녕하세요.

현재, MS-SQL, Visual Basic 6.0 환경하에 회사 전산 프로그램이 돌아가고 있는데,

대부분의 DB처리는 SQL의 Stored Procedure에서 하고,

VB에서는 OLEDB(ADO)로 접속하여 SP에 parameter 값만 넘겨주고, 데이터를 주고 받는 형태입니다.


큐브리드에서는 어떤 형태로 하는지 혹시 샘플이 있나요?


(참고) 현재 형태

============ MS-SQL의 SP ============

USE SYS_DB

GO

DROP PROCEDURE SA1040I_Q

GO

CREATE PROCEDURE SA1040I_Q 

     (@idno    Char(05)       = Null,

      @stdt     Char(08)       = Null)

AS

SET NOCOUNT ON

Begin

            DELETE FROM SAHIST_M

              WHERE hist_id   = @idno      

                  AND hist_stdt = @stdt

           SELECT 'DELETEOK'

           RETURN

End

============ VB 소스 ============
   Set AdoRs = New ADODB.Recordset
   StatusBar1.Panels(1) = "잠시만 기다려 주십시요...": vaSpread.MaxRows = 0
   
   Set AdoRs = New ADODB.Recordset
   sSql = "SA1040I_Q"
   sSql = sSql & ",@idno = '" + idno + "'"
   sSql = sSql & ",@sddt = '" + Format(dtpDate.Value, "yyyyMMdd") + "'"
   AdoRs.Open sSql, Dbcon
   
   If AdoRs.EOF = True Or AdoRs.BOF = True Then
      StatusBar1.Panels(1) = "검색된 자료가 없습니다..."
      AdoRs.Close: Set AdoRs = Nothing
      Exit Sub
   End If
   
   While Not AdoRs.EOF
      vaSpread.MaxRows = vaSpread.MaxRows + 1
      vaSpread.Row = vaSpread.MaxRows
      For i = 1 To vaSpread.MaxCols
         vaSpread.col = i: vaSpread.Text = Trim(AdoRs(i - 1))
      Next i
      AdoRs.MoveNext
   Wend
 
   AdoRs.Close: Set AdoRs = Nothing
    StatusBar1.Panels(1) = "자료가 정상적으로 조회되었습니다."
 

  • ?
    손승일 2012.02.07 08:30

    안녕하세요.

    큐브리드에 관심을 가져 주셔서 감사합니다. 문의하신 내용에 대하여 빠른 시일 내에 확인하여 알려드리도록 하겠습니다.

  • ?
    seongjoon 2012.02.23 00:13

    답변이 늦어 죄송합니다.

    mssql의 Stored Procedure을 CUBRID에서 바로 사용할 수는 없으며, Java Stored Procedure 형태로 변경하여 사용하셔야 됩니다.

    java stored procedure 사용방법은 다음 링크를 통해 확인하실 수 있으며 테스트에 사용한 VB 샘플코드를 참조하시면 될 것 같습니다..

    http://www.cubrid.org/manual/ko/8.4.4/sql/jsp.html

    샘플코드

    Private Sub Command1_Click()

            Dim adoConn As ADODB.Connection

            Dim strConn As String

            Dim strSQL As String

            strConn = ""

            'make OLEDB connection string

            strConn = strConn & "Provider = CUBRIDProvider;"

            strConn = strConn & "Data Source = demodb;" ' database name

            strConn = strConn & "Location = localhost;"  ' database server ip address

            strConn = strConn & "User ID = dba;"     ' database user id

            strConn = strConn & "Password = ;" ' database user id's password

            strConn = strConn & "Port = 33000;" ' broker1 port

            strConn = strConn & "Fetch Size = 100;"

            ' connect to database with ado connection object

            Set adoConn = New ADODB.Connection

            With adoConn

                .ConnectionString = strConn

                .Open

            End With

            Set rs = adoConn.Execute("call hello() into :Hello;")

            List1.Clear

            If Not rs.EOF Then rs.MoveFirst

            Do While Not rs.EOF

                List1.AddItem rs.Fields(0)

                rs.MoveNext

            Loop

            adoConn.Close

            Set rs = Nothing

            Set adoConn = Nothing

    End Sub


List of Articles
번호 제목 글쓴이 날짜 조회 수
공지 SQLGate for CUBRID 영구 무료 라이선스 제공 file admin 2020.04.09 2908
1168 server start시 error 발생 관련 3 flypig 2012.02.24 12063
1167 질문입니다. 1 세스카 2012.02.22 7099
1166 큐브리드 매니져에서만 오류메시지가 깨집니다. 1 file 안지민 2012.02.21 9703
1165 트리거 조건문 질문. 4 기린종인 2012.02.19 8690
1164 잦은 트랜잭션으로 인한 마스터서버의 다운 문제. 6 노랑배 2012.02.16 14532
1163 ADO.NET 을 비쥬얼 스튜디오에 연결하기... 4 희나람 2012.02.12 11720
1162 브로커 HA 관련 문의 6 freemir 2012.02.10 19629
1161 초기비번 2 file bj 2012.02.10 8584
1160 Java VM is not running 오류 원인? 6 file 강나루소나무 2012.02.10 15640
1159 ADO.NET 드라이버 집합형 데이터 지원 2 소라게 2012.02.09 39849
1158 cubrid install 후 생성되는 demodb 정보에관해 1 강서꽃미남 2012.02.08 40963
1157 password file open error 라고 뜨면서 큐브리드 매니저 접속이 안되요 1 secret 왕꿈틀이 2012.02.08 20
1156 데이타베이스로그인시 lgat화일을 찾으면서 로그인이 안되요.. 2 본좌대바리 2012.02.07 10652
1155 Java Procedure 실행시 한글 깨짐 1 깨달음 2012.02.07 20885
1154 큐브리드용 그누보드 4.31.08 버전을 구하고 싶습니다 2 유니콘 2012.02.07 8685
» MS-SQL의 Stored Procedure를 Cubrid로 변환 가능할런지? 2 강나루소나무 2012.02.07 12625
1152 매니저에서 demodb가 시작하자마자 정지되는 이유는? 2 강나루소나무 2012.02.07 7797
1151 alter로 테이블 구조 변경 3 장이 2012.02.06 11523
1150 bit형 데이터타입 관련 2 소라게 2012.01.27 10649
1149 Replication, 서버 이중화, HA 2 승준77 2012.01.26 23241
Board Pagination Prev 1 ... 127 128 129 130 131 132 133 134 135 136 ... 190 Next
/ 190

Contact Cubrid

대표전화 070-4077-2110 / 기술문의 070-4077-2113 / 영업문의 070-4077-2112 / Email. contact_at_cubrid.com
Contact Sales