トップへ(mam-mam.net/)

SQL文を実行するには

検索:

「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
の後、フォームを開く。