お世話になります、yanazakiと申します。
下記のExcel_VBAプログラムを使用して、Access(mdb)のODBCの設定を行っています。
この度、Officeのバージョンアップ 2007 -> 2013 を実施したところ、
以下の現象となり、難儀しております。
・ODBC 画面で確認しても、登録されていない。
・SQLConfigDataSource としては正常復帰する。
「データソースが登録されました。」のメッセージが出力
SQLConfigDataSource で、ODBC設定を登録する際、
Office (Excel)2013移行時の注意点等はございますでしょうか。
お心当たりのある方、ご教授をお願い致します。
【環境・補足】
□ OS : WindowsServer2008R2
□ Office : 2013 Professional 32bit
□ 32bit のODBCに登録するため、
C:\Windows\SysWOW64\odbcad32.exe で確認
□ WindowsServer2008R2 + Office2007 の組合わせは正常登録
□ 本環境はオフライン（インターネットとは未接続）
---
【実行プログラム抜粋】
strParam = ""
strParam = "DSN=XXX" & vbNullChar
strParam = strParam & "Description=YYY" & vbNullChar
strParam = strParam & "DBQ=" & strPath & "ZZZ.mdb" & vbNullChar
' データソースの登録
intRet = SQLConfigDataSource(0&, ODBC_ADD_SYS_DSN, strDriver, strParam)
' 登録の成功・失敗の判断
If intRet = 0 Then
GoTo ERRMSG
End If
ERRMSG:
' 登録の成功・失敗の判断
If intRet Then
MsgBox "データソースが登録されました。"
Else
MsgBox "登録されませんでした。"
End If
End Sub
以上