当前位置:首页 » 编程语言 » access多条sql语句

access多条sql语句

发布时间: 2022-05-15 19:47:49

‘壹’ 如何在 ACCESS 2003 中一次执行多条sql查询语句

在ACCESS窗体里编写VBA代码可以一次执行多条SQL语句

例如:

PrivateSubCommand1_Click()
DimSql1AsString,Sql2,AsString,Sql3AsString
Sql1="insertintot1(id,name)values('001','Zhangsan');"
Sql2="insertintot1(id,name)values('002','Lisi');"
Sql3="insertintot1(id,name)values('003','Wanghwu');"
WithCurrentProject.Connection
.ExecuteSql1
.ExecuteSql2
.ExecuteSql3
EndWith
EndSub

前提是每条SQL语句都是可以被正确执行的

‘贰’ 如何在access中同时提交多条sql语句

使用ACCESS查询对象是无法一次运行多个SQL语句的,但是通过ACCESS VBA代码可以实现一次运行多个SQL语句。下面是具体实现方案;

1)新建一个ACCESS窗体,窗体添加一个命令按钮;

2)编写按钮单击事件过程

1
2
3
4
5
6
7

Private Sub Command1_Click()
Dim strSql as string
strSQL="Update Policy SET LatestDueDate=Year(Date()) & '-' & Format(PolicyDate,'mm-dd')"
DoCmd.RunSql strSQL '运行第一个更新语句
strSQL="UPDATE Policy SET LatestDueDate= DateAdd('yyyy',1,LatestDueDate) WHERE (((Month(Date())-Month(LatestDueDate)) > 6) and(PaymentMode='H'))"
DoCmd.RunSql strSQL '运行第二个更新语句
End Sub

跟着点击该命令按钮就可以一次执行两条语句了。

*******不过这里必须指出楼主这种通过UPDATE更新来获取缴费提醒的办法绝对是一种非常糟糕的解决方案,其坏处除了你说的,我可以指出N多条!具体就不说了。******

其实要获取你要获取保单续期提醒日期,无需分两步只要一句SELECT语句就能搞定,完全没必要去更新数据表。

将下列SQL语句保存为一个名为“RenewAlertPolicies的选择查询

1
2

select PolicyNo,PolicyDate,DateAdd('yyyy',1,PolicyDueDate) as LatestDueDate
from Policy where DateDiff('m',PolicyDate, Date()) > 6 order by PolicyDate desc;

注意:上面“保单号”字段名是我虚构的,请替换为实际的保单号字段名。如果不想看太旧的保单,筛选可以用时间段来限制,例如...where DateDiff('m',PolicyDate, Date()) between 7 and 12 ....

当你要查看需要提示续保的保单列表时,简单地双击该查询就好了,你可以随要随查,非常方便,查询结果将会展示最新的情况,完全没必要去考虑如何更新LatestDueDate的问题。

‘叁’ ACCESS SQL 插入多行

一般是要用到循环的,目前SQL语句还没有能自动插入你说的这种方式。
插入的SQL语句只有一种:
语法
INSERT
INTO
table_name
(列1,
列2,...)
VALUES
(值1,
值2,....)
你如果不想循环可以,那就是要手工多写几行语句。
你插入多个值,可以有两种办法来操作。
1,一种是一条一条的插入。有多少个记录你就写多少条SQL语句
如:
INSERT
INTO
table_name
(日期)
VALUES
('2001-03')
INSERT
INTO
table_name
(日期)
VALUES
('2001-04')
INSERT
INTO
table_name
(日期)
VALUES
('2001-05')
...
2,把你要插入的多个数值,写入到一个语句中,只执行一次语句即可。
如:
INSERT
INTO
table_name
(日期)
SELECT
'2001-03'
UNION
SELECT
'2001-04'
UNION
SELECT
'2001-05'
...

‘肆’ Access中多个条件查询的sql语句怎么写

我刚回答了一个和你类似的问题,你参考一下!

这个很简单,可以分以下步骤执行:
1、建立optiont 控件组。index分别为0~3
2、建立一个text,并且放置一个command按钮。
3、放置一个ADO控件
4、放置一个datagrid控件

5、ADO连接数据库(在form_load事件)
6、在command1_click()事件写下以下代码:
adodc1.recordsouce = "select * from 表名 where 1=1"
& iif(opt0.value,"and 姓名 = '" & trim(text1) &"'","")
& iif(opt1.value,"and 性别 = '" & trim(text1) &"'","")
& iif(opt2.value,"and 班级 = '" & trim(text1) &"'","")
& iif(opt3.value,"and 照片 = '" & trim(text1) &"'","")
adodc1.resfrsh '(这个代码我写的可能不对,老是记不住)
set datagrid1.datasouce = adodc1 '把查询的结果显示在表格里。

以上代码中的 opt0~opt3 这4个单选框控件分别代表 姓名,性别,班级,照片。
代码的功能是: 如果你点了代表你要查询的单选框,代码就会用你填写在text里的字符到数据库里去查询。查询的结果取决于你选了哪个单选框和text里的内容,不过郁闷的是照片没有办法以这个方式单独查询出来,你要查某人的照片,以上的代码中第一个iif 就可以显示出来。

以上代码可能有个别字母书写错误,但是你只要在vb里写,VB会自动提示正确的代码。希望能对你有所帮助。

‘伍’ access如何批量执行sql语句

Access Jet引擎不支持同时运行多条语句,如果想要执行多条语句,用VBA写Macro宏脚本吧。

‘陆’ access数据库SQL查询多表语句

select name as 姓名,a.degree as 初一,b.degree as 初二
from 初一成绩表 as a
right join 初二成绩表 as b on a.name=b.name
楼下说的有道理,已经更改,既然初二成绩表人员是全的,那么用right join就OK了

‘柒’ ACCESS一对多行,查询时实现一行多列,SQL语句怎么写

select员工表.姓名,
max(switch(考勤表.日期='周一',出勤,true,''))as周一,
max(switch(考勤表.日期='周二',出勤,true,''))as周二,
max(switch(考勤表.日期='周三',出勤,true,''))as周三,
max(switch(考勤表.日期='周四',出勤,true,''))as周四,
max(switch(考勤表.日期='周五',出勤,true,''))as周五
from员工表,考勤表where员工表.id=考勤表.员工id
groupby员工表.姓名

‘捌’ Access多表汇总SQL语句

Select
类型名称
As
类型汇总,Count(*)
As
数量,Sum(金额)
As
总额
From
类型表
A,项目表
B
Where
A.编号=B.类型编号
Group
by
类型名称

‘玖’ access数据库sql插入语句,插入多条怎么写

基本不用想了,access不支持在sql视图里一次执行多个插入,用这个方法好了:

开始事务
try
{
执行第一条...
执行第2条...
.
.
.
执行第n条
提交事务
}
catch{rollback();}


string[]SQLStringList={sql1,sql2,sql3};
for(intn=0;n<SQLStringList.Length;n++)
{
stringstrsql=SQLStringList[n].ToString();
if(strsql.Trim().Length>1)
{
cmd.CommandText=strsql;
cmd.ExecuteNonQuery();
}
}
cmd.Transaction.Commit();//提交事务

还有,你库存量的字段应该是个数字型的,为什么要加引号呢?序号字段如果也是数字类型,也改了吧

‘拾’ access的sql语句有哪些

介绍基础语句:
1、说明:创建 数据库
CREATE DATABASE database-name
2、说明:删除数据库
drop database dbname
3、说明:备份sql server
--- 创建 备份数据的 device
USE master
EXEC sp_admpdevice 'disk', 'testBack', 'c:\mssql7backup\MyNwind_1.dat'
--- 开始 备份
BACKUP DATABASE pubs TO testBack
4、说明:创建新表
create table tabname(col1 type1 [not null] [primary key],col2 type2 [not null],..)
根据已有的表创建新表:
A:create table tab_new like tab_old (使用旧表创建新表)
B:create table tab_new as select col1,col2… from tab_old definition only
5、说明:
删除新表:drop table tabname
6、说明:
增加一个列:Alter table tabname add column col type
注:列增加后将不能删除。DB2中列加上后数据类型也不能改变,唯一能改变的是增加varchar类型的长度。
7、说明:
添加主键:Alter table tabname add primary key(col)
说明:
删除主键:Alter table tabname drop primary key(col)
8、说明:
创建索引:create [unique] index idxname on tabname(col….)
删除索引:drop index idxname
注:索引是不可更改的,想更改必须删除重新建。
9、说明:
创建视图:create view viewname as select statement
删除视图:drop view viewname
10、说明:几个简单的基本的sql语句
选择:select * from table1 where 范围
插入:insert into table1(field1,field2) values(value1,value2)
删除:delete from table1 where 范围
更新:update table1 set field1=value1 where 范围
查找:select * from table1 where field1 like ’%value1%’ ---like的语法很精妙,查资料!
排序:select * from table1 order by field1,field2 [desc]
总数:select count * as totalcount from table1
求和:select sum(field1) as sumvalue from table1
平均:select avg(field1) as avgvalue from table1
最大:select max(field1) as maxvalue from table1
最小:select min(field1) as minvalue from table1

热点内容
usb大容量存储驱动 发布:2024-05-07 19:02:01 浏览:815
红米1s没有存储空间 发布:2024-05-07 18:59:09 浏览:505
妖云解压密码 发布:2024-05-07 18:50:08 浏览:1002
sql语句等于怎么写 发布:2024-05-07 18:05:46 浏览:816
我的世界电脑版第三方服务器大全 发布:2024-05-07 18:00:46 浏览:627
主服务器的ip地址 发布:2024-05-07 17:58:50 浏览:546
组服务器打电脑游戏 发布:2024-05-07 17:46:19 浏览:866
java的文件路径 发布:2024-05-07 16:55:29 浏览:293
云表服务器安装导致电脑崩溃 发布:2024-05-07 15:58:35 浏览:524
ftp是什么检测器 发布:2024-05-07 15:37:59 浏览:403