Access 2000 VBAでシステム開発を行っております。
Oracle 7 と接続してリンクテーブルを作成しています。
通常は問題なく動作するのですが、
Access のフォーム上にボタンを配置して、あるボタンがクリックされたら、
リンクテーブルの参照先を変更して、リンクテーブルを再作成するといったことを
行おうと考えております。
しかし、ソース上でリンクテーブルの参照先を変更しても、
元の参照先でリンクテーブルが作成されてしまい、大変困っております。
どなたか本現象について分かられる方がいらっしゃいましたらご回答のほど
宜しくお願いいたします。
以下がリンクテーブル作成時のソースになります。
Function Create_odbc_table(str_OraTblName As String, str_mdbTblName As String) As Long
On Error GoTo Create_odbc_table_Err
Create_odbc_table = True
Set DBS = CurrentDb
DBS.TableDefs.Delete Trim(str_mdbTblName)
DBS.TableDefs.Refresh
Set tdfA = DBS.CreateTableDef(Trim(str_mdbTblName))
tdfA.Connect = "ODBC;DSN=" & DSN_NAME & ";UID=" & Oracle_UID & ";DBQ= " & Trim(TNS) & ";ASY=OFF;PWD=" & Oracle_PWD & ";TABLE=" & Trim(str_OraTblName)
tdfA.SourceTableName = Trim(str_mdbTblName)
DBS.TableDefs.Append tdfA
DBS.Close
end function
A 回答 (2件)
- 最新から表示
- 回答順に表示
No.2
- 回答日時:
こちらではDelete Create しないで Connect に再代入する方法を行っています。
tdf.Connect = <接続文字列>
tdf.Attributes = dbAttachSavePWD
tdf.RefreshLink
Access 2003, postgreSQL または SQLServer で実施しています。
Oracleだとうまくいかないと言うことはないと思います。
どこかで例外が発生していませんか。
No.1
- 回答日時:
> On Error GoTo Create_odbc_table_Err
の飛び先が無いところを見ると、かなり端折ってる?
Deleteは成功してるのかな?
STEP実行して、一行ずつ結果を確認してみては?
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Ruby pandasでsqlite3にテーブル作成・追加・読み出しでindexの取り扱い方教えてください 5 2023/03/08 09:57
- Access(アクセス) access,vbaでフォルダ内のファイルをテーブルにインポート、ファイル名もフィールドに追加したい 1 2022/08/31 11:11
- MySQL PHPとMySQLを使った掲示板の作り方 1 2022/06/02 13:00
- Visual Basic(VBA) ACCESS DAO で不要なテーブルのフィールド(列)の削除 4 2022/06/23 12:13
- MySQL PHP 画像のアップロード Qiita 2 2022/11/28 04:44
- MySQL php テーブルを作れない 2 2022/11/17 18:22
- Excel(エクセル) EXCELの外部データ取得ができない 1 2023/03/23 09:03
- PHP php テーブルが作成できない 1 2022/11/17 23:41
- その他(データベース) pythonでsqlight勉強中、クエリー結果の利用法教えて下さい 1 2022/04/28 20:38
- Visual Basic(VBA) access count数を変数に格納 2 2022/03/30 19:21
関連するカテゴリからQ&Aを探す
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
『列名 '担当者CD' があいま...
-
WORD VBA プログラム修正をお願...
-
HTMLのテーブルの行数が多くな...
-
アクセステーブル、リンクとロ...
-
Accessで宛名ラベルに同一宛先...
-
MDBテーブルへの追加変更を教え...
-
ACCESSのテーブル名をリストに...
-
DataGridViewに画像を表示する方法
-
複数のテーブルからのデータ取...
-
DataSetの複数テーブルをひとつ...
-
エクセルのテーブルを解除する...
-
DAOでフィールドのデータ型を変...
-
複数のデータベースを検索したい
-
同一セッションIDのブラウザを...
-
★クリスタルレポートの元になる...
-
ExcelからAccessのテーブルに書...
-
DataGridViewで変更した値を反...
-
ASP.NET GridView 一致した行の...
-
ADO&mdbで、リンクテーブルの...
-
Accessで別mdbのテーブルをコピー
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
VBとアクセスでSQL文に変...
-
WORD VBA プログラム修正をお願...
-
Accessで別mdbのテーブルをコピー
-
『列名 '担当者CD' があいま...
-
DataGridViewに複数テーブルの...
-
他のMDBのテーブルに追加したい
-
エクセルのテーブルを解除する...
-
Excel複数シートをaccessへ一括...
-
手動または分散トランザクショ...
-
SQLを発行とは?クエリの作成と...
-
AccessからExcelへエクスポート...
-
CSVファイルのエクスポートでソ...
-
ACCESS2010 実行時エラー 2766
-
HTMLのテーブルの行数が多くな...
-
ExcelVBAからAccessMDB内のテー...
-
【ADO】「Execute」を使うと...
-
★クリスタルレポートの元になる...
-
DataGridの中身をDataSetにテー...
-
ACCESSのテーブル名をリストに...
-
COBOLのINVALID KEYが理解でき...
おすすめ情報