• 締切済み

access2000のADO

Access2000を使い始めて4年ほどになりますが、最近ようやくＡＤＯの事を知りまして、早速MSDTをインストールしました。 テーブルを作り始めたのですが、規定値などの設定に使えるコマンドがＪＥＴとは少し違うみたいで参考書を探しています。ＡＤＯ入門用のテキストは購入し、大まかなことは分かったんですが、もう少し詳しいテキストで、何かいいものがありましたら教えてください。よろしくお願いします。

みんなの回答

  • maruru01
  • ベストアンサー率51% (1179/2272)
回答No.1

こんにちは。maruru01です。 ADO専門よりは、Access2000のVBAの参考書の方がいいと思います。 とりあえず、私が使っている参考書を紹介します。 「ACCESS VBA 応用プログラミング」 　　　　著：谷尻かおり　出版社：技術評論社 「ACCESS2000VBA 基本例題300」 　　　　編：システムサイエンス研究所　出版社：技術評論社 あと、いくつかサイトも紹介しておきます。（ADO専門じゃないですが） http://www.akj.co.jp/aug/ http://www.accessclub.jp/ http://www.loadsystem.net/loadsys.asp http://www.moug.net/ http://plaza14.mbn.or.jp/~sunago/ では。

yanmar-z
質問者

お礼

ご親切にいろいろありがとうございます。 すこし時間をかけて、見てみたいと思います。ありがとうございました。

  1. カテゴリ
  2. [技術者向] コンピューター
  3. データベース
  4. その他(データベース)

関連するQ&A

  • ACCESS ADOでupdateが効かない

    いつもありがとうございます。 現在、ADOを使ってカレントプロジェクト以外のMDBファイルのテーブルにレコードを追加する処理を行っているのですが、何のエラーメッセージも出ないままレコードが追加されません。 この場合、updateコマンドが実行された後の状態(リターンコード)を調べる事はできないでしょうか？

  • アクセスのADO

    アクセスのADOで ウォッチ式にrsを登録してみていると rs.CursorLocation = adUseClient rs.Open "テーブル1", cn, adOpenStatic, adLockOptimistic を通過後は、 RecordCountには、20と数字が入るのですが、 rs.CursorLocation = adUseClient rs.Open "テーブル2", cn, adOpenStatic, adLockOptimistic にすると RecordCount : <データ プロバイダーまたはほかのサービスが E_FAIL 状態を返しました。> となってしまいます。 テーブルの中身が原因だと思うのですが どういう条件なら、 <データ プロバイダーまたはほかのサービスが E_FAIL 状態を返しました。> になるのでしょうか？ rs.CursorLocation = adUseClient を使う理由は、 rs.Sort = "日付 DESC" とソートする為です。 参照設定はMicrosoft Activex Data Objects 2.8 Library にしています。 Access2010・32bitです。

  • ADOによる列の追加について

    access2000を使用しており、 最近ADOについて勉強しています。 しかし、ADOが難しく、大変困っております。 テーブルＡの数量を判断して、列の最後に 列「判別」（奇数か偶数かを判断）を追加したいと 思っています。どのようにADOを書けばよいのでしょうか？ テーブルＡ 　数量 　4 　1 テーブルＢ 　数量　判別 　　4 偶数 　　1 奇数

  • AccessVBAにおけるADOとSQLについて

    AccessVBA（Ver.2000）を使用しております。 ADOとSQLを市販のテキストで最近学び始めたばかりの者です。 調べ方が悪いのか、疑問なので教えてください。 例えばテーブルデータの更新をする際にSQLとADOのいずれでも可能かと思いますが、両者の違いはあるのでしょうか？ こういう場合はSQL、こういう場合はADOを使用するのが良いというのがあるのであれば教えていただけたらと思います。 どうぞよろしくお願いいたします。

  • Excel　→　ADO　→　ACCESS

    Client　EXCEL　Server　ACCESSで数人で使うシステムを 開発中です（接続はADO）。 ある程度までできたので、他のPCで動作確認すると 参照先でエラーが発生します。 例えば set CN = new adodb.connection Cn.ConnectionString = "Provider=Microsoft.jet.oledb.4.0;Data Source=保存先" Cn.open set RS = new adodb.recordset rs.open "テーブル名",Cn,設定１,設定2 ←ここでエラー エラー内容の参照先が自分のパソコンの保存先を参照していて Data Sourceを書き換えても、エラーが帰ってきてお手上げ状態です。 自分のPCで保存先を変えても問題なくできますが パソコン自体を変えるとエラーが出ます。 cn.openでACCESSには接続できていて、rs.openでエラーが発生します。 よろしくお願いします。 環境:OS VISTA OFFICE 2007 他のクライアントPCもすべてOFFICE2007です。

  • Access起動中にエクセルからADOでデータの更新ができない

    こんばんは。原因がわからないので質問させてください。 SQLサーバーのデータをAccessのmdbへリンクテーブルしています。 （SQLサーバー　→　Access） 全て一つのパソコンで行なっています。（LANには接続していません） Accessのmdbファイルを起動している時に ExcelからSQLサーバーのAccessにリンクしている上記のテーブルへ ADOを使ってデータを追加しています。 （Excel　→　Access）　 しかし、「rs.Update」の部分で 　「ODBC--リンク　テーブル'テーブル1'での更新に失敗しました。」 となってしまいます。 なので、一度mdbファイルを落として、コードを再開すると通るので ADOでExcel　→　Accessにデータを追加し終わってから再度mdbファイルを立ち上げています。 また同じ状態（mdbファイルを起動）で Excel　→　SQLサーバー　へ更新クエリをしようとすると「時間切れになりました」となります。 （こちらもmdbファイルを落とすと再開できます。） いちいちmdbファイルを落とすのめんどうなのですが 回避する方法はありますか？ cn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & "C:\Users\Documents.test.mdb" rs.Open "テーブル", cn, adOpenStatic, adLockPessimistic rs("フィールド") = True rs.Update '保存 rs.Close: Set rs = Nothing というコードを書いています。 Accessを落とせば正常に動きます。 ご教授よろしくお願い致します。

  • VBSでADOを使ってaccessのテーブルに接続

    VBSでADOを使ってaccessのテーブルに接続する方法は？ Sub ADO_test() Dim cn As New ADODB.Connection Dim rs As New ADODB.Recordset cn.Open "Provider=Microsoft.Jet.OLEDB.4.0;" & "Data Source= " & "D:\【Access】サンプル.mdb" rs.Open "テーブル1", cn, adOpenKeyset, adLockOptimistic MsgBox "test成功です" rs.Close: Set rs = Nothing cn.Close: Set cn = Nothing End Sub をACCESSVBAで実行すると成功しますが 全く同じコードをメモ帳に貼り付けてtest.vbsで保存し、ダブルクリックすると、 行：３ 文字：１１ エラー：ステートメントの末尾が不正です。 コード：800A0401 のエラーになります。 ＶＢＡは少しわかるのですが、ＶＢＳに関しては初心者です。 どこを修正すればコードが通るのか教えてください。

  • VBA ACCESS 更新　追加　find ADO テーブル

    いつもお世話になっております。 ACCESSのフォームに作成したコマンドボタンを実行すると 元テーブルから対象テーブルへIDを元に値を更新するようなプログラムを 作りたいと思います。 また、注意点として元テーブルでは「ID」、対象テーブルでは「管理番号」の異なる名称によりデータの管理を行っております。 アドバイスお願いします。 VBAの中でADO関数やFind関数を使ったら出来ると考えております。

  • アクセス入門書添付のＣＤインストールについて

    アクセス入門書を購入しその添付のＣＤをインストールしようとしたのですがうまく使えません。その本はアクセス2000の入門書なのですが私のPCの環境はというとウィンドウズｘｐですがパーソナルだったのでアクセスはありませんでした。そこで前のpcの時にオフィス97があったのでアクセスのみ今のpcで使っている状態です。つまりアクセス97を使っているのです。もともと無理なのでしょうか。 ちなみにインストールしてアクセスのアイコンがでてくるのですがクリックするとエラーメッセージがでてヘルプを押すとJETエラーメッセージリファレンス　データベースの形式 <ファイル名> を認識できません。(Error 3343)と表示されます。”指定したファイル名は Jet データベースではありません。”とはどういう意味なのでしょうか。そしてこのCDは使えないのでしょうか。PC初心者です。よろしくお願いします。

  • Access のADOのrecordset

    Access　VBA　でのrecordseｔ　はDAOとADOがあります。 DAOの場合recordsetからrecordsetを作成できました。 つまり、日本からある県を選び出し、その中から10代の人を選び出せました。 ところが、ADOの場合それができません。ある県の１０代の人を選び出そうとしても、 結果的に全日本の10代の人となってしまいます。 例として RD1.Filter = "購入日># " & DateAdd("yyyy", -1, Date) & "#" Set RD2 = RD1.OpenRecordset この「RD2」という新しいrecordsetができます。 RD2は購入日が今日から1年前の１つのファイルとしてsetされます。 この中から山田さんの売り上げを集計することができます。 ところが、ADOの場合下記のように書いて、 str = RS!ブランド RS.Filter = ("ブランド = " & "'" & str & "'") RS.MoveFirst str = RS!名前 RS.Filter = ("名前 = " & "'" & str & "'") 上はある雑貨店のDBですが、あるブランドを抽出します。次にその中から、ある顧客の売り上げを集計する場合、結局全ブランドの”田中さん”になってしまいます。 要は、最初にブランドで抽出した意味がないのです、 ADOでDAOのようにrecordsetからrecordsetを作る方法はないのでしょうか？ ADOの書き換えるのはMSのQSLserverがDAOの対応してないからです。

注目のQ&A

カテゴリ

専門家に質問してみよう

職業から探して質問する

あなたにピッタリな商品が見つかる！ OKWAVEセレクト

質問する