0

私はvbaの初心者ですが、VBAを使用してOracleSQLに接続するためのサポートをいただければ幸いです。私はMSServer用のそのようなコードを持っており、Oracle SQLで動作するように、何らかの方法でコードを変更する(または新しいコードを作成する)必要があります。

コードは次のとおりです。

Public Const sConnect As String = "xxx; Initial Catalog=xxx; User ID=xxx;Password=xxx;"

Sub GetData1()

Sheets(1).Range("a1:ao20000").ClearContents

Dim rsConnection As ADODB.Connection
Dim rsRecordset As ADODB.Recordset
Dim sQuerry As String

sQuerry = "select * from xxx"

Set rsConnection = New ADODB.Connection
Set rsRecordset = New ADODB.Recordset

rsConnection.ConnectionString = sConnect
rsConnection.Open

Set rsRecordset = rsConnection.Execute(sQuerry)

Worksheets(1).Range("A2").CopyFromRecordset rsRecordset

rsConnection.Close

Set rsConnection = Nothing
Set rsRecordset = Nothing

End Sub

私の質問は次のとおりです。OracleDeveloper以外のものをインストールする必要がありますか?もしそうなら、何ですか?コードを変更して機能させるにはどうすればよいですか?

よろしくお願いします!! よろしく、Maciej

4

1 に答える 1

0

コンピュータにOracleクライアントソフトウェアをインストールする必要があります。最小のセットアップは、Oracleインスタントクライアントを使用することです。http://www.oracle.com/technetwork/database/features/instant-client/index-097480.htmlを参照してください。

プログラムで変更する必要があるのは、接続文字列だけです。

于 2012-09-19T13:57:27.030 に答える