Question

access 如何更新并添加新数据

表1 身份证 姓名 联系方式
表2 身份证 姓名 联系方式
表1为总表，表2为最新数据表，表2里的数据一部分为表1中的老客户，一部分为新客户数据表1中原来没有的，现在要把表2中的数据更新到表1中，表2中的老客户数据，直接更新到表1中，比如联系方式变更了直接更新到表1中，表2中的新客户数据直接添加到表1中，这样子要如何实现

Answer 1

在Access中，更新与添加是不同的操作。

版本：Access 2013

1、更新数据

有原数据如下：

要将“08物理”的“与bad的关系”一列内容改成“bad的不二粉丝”，可用如下语句：

update 新表 set  [与bad的关系] = 'bad的不二粉丝' where name='08物理'

更新后结果：

2、添加数据

要在上述表中添加一条“id”为“4”，“name”为“答疑组小惠”，“与bad的关系”为“没关系”。可用如下语句：

insert into 新表(id,name,[与bad的关系]) values (4,'答疑组小惠','没关系')

执行后结果：

Answer 2

提问中的这个需求必须运行一个更新查询和一个追加查询共两个动作查询才能实现

1）将表2中的老数据更新到表1

UPDATE 表1, 表2 SET 表1.姓名 = 表2.姓名, 表1.联系方式 = 表2.联系方式
WHERE 表1.身份证=表2.身份证;

2）将表2中的新数据追加到表1

INSERT INTO 表1
SELECT a.*
FROM 表2 AS a LEFT JOIN 表1 AS b ON a.身份证=b.身份证
WHERE b.身份证 is null;

也可以编写ACCESS窗体命令按钮单击事件代码，简单点击一下按钮就可以一次执行上述两个动作查询

Private Sub Command2_Click()
    Dim AstrSql As String, BstrSql As String
    AstrSql = "UPDATE 表1, 表2 SET 表1.姓名 = 表2.姓名, 表1.联系方式 = 表2.联系方式 WHERE 表1.身份证=表2.身份证;"
    BstrSql = "INSERT INTO 表1 SELECT a.* FROM 表2 AS a LEFT JOIN 表1 AS b ON a.身份证=b.身份证 WHERE b.身份证 is null;"
    With CurrentProject.Connection
        .Execute AstrSql
        .Execute BstrSql
    End With
End Sub

Answer 3

具体方法如下：

方法一

进入数据库，打开所要添加的表，在数据表视图下直接输入。

如图所示:

方法二

在SQL视图下输入如下语句

INSERT INTO表名(列1,列2,...)VALUES(值1,值2,....)

【注意】

1.是文本型的要加引号

2.日期两边要加#