1. ODBC로 연결 성공
2. 엑셀에서 VBA에서 stored procedure로 추출하는 방법
3. 엑셀에서 VBA에서 일반 쿼리로 추출하는 방법
여러 사이트을 뒤져 받는데
잘 나와 있지 않아서요.
1. 연결은 ODBC 연결 설정하고 ADO, DAO 로 연결하시면 됩니다. ODBC 연결 설정을 하시려면 DB2 클라이언트 설치하고 접속할 리모트 데이터베이스를 카탈로그 해야 한다는것외에는 특이점은 없음. 예) ADO 로 접속하는 함수 예 Public Sub conn_db2(In_dsn As String, In_uid As String, In_pwd As String) Set conn = New ADODB.Connection
On Error GoTo ERR DoEvents If conn.State = 0 Then conn.Open "DSN=" & In_dsn & ";UID=" & In_uid & ";PWD=" & In_pwd End If
Exit Sub
ERR:
MsgBox "DB Connection failed!!!" & vbCrLf & ERR.Description
End Sub 2. DB2 Admin 정보제공을 목적으로 준비된 프로시저의 리턴값을 받아서 사용하시면 되나, 원하시는 내용이 없을수도 있고 가공이 필요할수도 있음. db2v8 에서 db2 9.5 로 갈수록 더 많은 내용이 제공됨. v8에서는 많이 빈약할수도 있음. v7이라면 아예제공되지 않음. 3. DB2 Admin 정보제공을 목적으로 준비된 syscat, sysibm, sysibmadm 스키마의 메타테이블들을 이용하여 원하는 정보를 추출하면 되나, 역시 원하시는 내용이 없을수도 있고 가공이 필요할수도 있음. db2v8 에서 db2 9.5 로 갈수록 더 많은 내용이 제공됨. v7, v8에서는 sysibmadm 스키마가 없으므로 관련 테이블및 뷰가 많이 빈약할수도 있음. 2,3번에 대한 참조 루틴 및 뷰를 표시한 페이지 (db2 9.1 기준) http://publib.boulder.ibm.com/infocenter/db2luw/v9//topic/com.ibm.db2.udb.admin.doc/doc/r0023485.htm?resultof=%22%73%79%73%70%72%6f%63%22%20