開発環境 Windows2000 VB6.0 sp3
RDOでSQL Server6.5へ接続します。
通常は、以下のようにすれば接続できるのですが、
---
Public rdoEnv As rdoEnvironment
Public rdoCon As rdoConnection
Public strConn As string
'// NTSRV_001 はシステムDSN名またはユーザーDSN名
strConn = "DSN=NTSRV_001"
Set rdoEnv = rdoEngine.rdoEnvironments(0)
Set rdoCon = rdoEnv.OpenConnection("", rdDriverNoPrompt, False, strConn)
---
しかし、接続先サーバやデータベース名が変更になった場合、
クライアント側で ODBC データソースアドミニストレータで
設定し直さなければなりません。（台数があると大変です。）
そこでファイルDSN を使えば、各クライアントが参照する
ファイルDSNを書き換えさえすれば、ODBC データソース
アドミニストレータで設定し直す手間が省けるのではと考えました。
どのように書けばよろしいのでしょうか。
また、他に効率のよい方法があれば教えてください。
よろしくお願い致します。
|