Mam's WebSite
建築CGパース住宅CGパース

Mamの覚書Q&A検索

トップページMamの覚書Q&A検索Access(VBA)⇒Q&A


大項目:「 Access 」 - 中項目:「 VBA 」

「 SQL文を実行するには 」

AccessのVBAからSQL文を実行するには


回答

いくつか方法があります。
1. Docmd.RunSQL
2. Databaseオブジェクトのexecuteメソッドを使う

ちょっとずれるかもしれませんが、
3.Formでrecordsourceプロパティを使う方法もあります。

ソース

1.Docmd.RunSQL
dim sql as string
  sql="insert into t_table1(ID,NAME) values(1,'Jhon')"
  Docmd.RunSQL(sql)


2. Databaseオブジェクトのexecuteメソッドを使う
dim sql as string
dim mydb as database
  set mydb=CurrentDB()
  sql="insert into t_table1(ID,NAME) values(1,'Jhon')"
  mydb.execute(sql)
  sql="update t_table1 set NAME='Mike' where ID=1"
  mydb.execute(sql)
  mydb=nothing

3.Formでrecordsourceプロパティを使う方法
フォームabcをデザインモードで開いて、
dim sql as string
  sql="insert into t_table1(ID,NAME) values(1,'Jhon')"
  forms("abc").recordsource=sql
の後、フォームを開く。


Mam's WebSite