VBScriptでPostgreSQLに接続する †
本記事では、ODBC設定を行ったデータソースを利用しVBScriptでPostgreSQLに接続するためのサンプルコードを紹介します。
ODBCデータソースアドミニストレーターの設定内容 †
ODBCの設定は下図の通りです。
ODBCの設定方法については、「WindowsのODBC設定操作」を参照してください。
PostgreSQLに接続するサンプルコード †
以下のコードは、PostgreSQLに接続し SELECT now() を実行するサンプルコードです。
- サンプルコード
' ADODB sample : SELECT now();
strConn = "DSN=postgresql-test"
Set oConn = CreateObject("ADODB.Connection")
Set rs = CreateObject("ADODB.Recordset")
oConn.ConnectionString = strConn
oConn.Open
rs.Open "SELECT now()", oConn
MsgBox(rs.Fields(0))
rs.Close
set rs = Nothing
oConn.Close
set oConn = Nothing
関連記事 †