vba 更新mysql数据库_使用VBA中的UPDATE SQL语句更新Access数据库

有人可以查看一下stSQL字符串并帮我修复我与UPDATE语句关联的语法错误吗？

运行时错误'-2147217900(8004e14)'：UPDATE语句中出现语法错误。

我对SQL有一个基本的了解，似乎不明白我哪里出错了。

如果FileName UserForm值与Access Db中的FileName字段匹配，我想更新表1的字段。

由于

Public Sub UpdateDatabaseEntry()

Dim cn As New ADODB.Connection

Dim rs As New ADODB.Recordset

Dim stDB As String, stSQL As String, stProvider As String

Dim FileName As String

Dim Nickname As String

Dim RecipientName As String

Dim RecipientRelationship As String

Dim Summary As String

Dim Noteworthy As String

Dim PreparedBy As String

FileName = UserForm1.FileNameTextBox.Text

Nickname = UserForm1.NicknameTextBox.Text

RecipientName = UserForm1.RecipientNameTextBox.Text

RecipientRelationship = UserForm1.RecipientRelationshipComboBox.Text

Summary = UserForm1.SummaryTextBox.Text

Noteworthy = UserForm1.NoteworthyCheckBox.Value

PreparedBy = UserForm1.PreparedByTextBox.Text

stDB = "Data Source= E:\MyDb.accdb"

stProvider = "Microsoft.ACE.OLEDB.12.0"

//Opening connection to database

With cn

.ConnectionString = stDB

.Provider = stProvider

.Open

End With

//SQL Statement telling database what to do

stSQL = "UPDATE Table1" & _

"SET Nickname= '" & Nickname & "', RecipientName= '" & RecipientName & "', " & _

"RecipientRelationship= '" & RecipientRelationship & "', Summary= '" & Summary & "', " & _

"Noteworthy= '" & Noteworthy & "', PreparedBy= '" & PreparedBy & "', " & _

"WHERE FileName= '" & FileName & "'"

cn.Execute stSQL

cn.Close

Set rs = Nothing

Set cn = Nothing

End Sub

vba 更新mysql数据库_使用VBA中的UPDATE SQL语句更新Access数据库相关推荐

在程序开发中怎样写SQL语句可以提高数据库的性能
1.首先要搞明白什么叫执行计划? 执行计划是数据库根据SQL语句和相关表的统计信息作出的一个查询方案,这个方案是由查询优化器自动分析产生的,比如一条SQL语句如果用来从一个10万条记录的表中查1条记录 ...
webservice mysql配置文件_在WebService中使用Microsoft.Practices.EnterpriseLibrary.Data配置数据库...
标签: 1. 新建WebApplication1项目 1.1 新建-Web-ASP.NET Empty Web Application--WebApplication1 1.2 添加一个WebForm ...
Mysql中使用Update From语句
记录一下mysql中使用Update from 语句更新字段值: 场景是国家行政区划的数据表,字段内容包括: 应用场景中不想使用级联选择,选中下级节点,比如东城区时,直接显示北京-北京市-东城区,因此 ...
VBA小白的福音如何在EXCEL中实现连续编号自动更新打印？
VBA小白的福音如何在EXCEL中实现连续编号自动更新打印? 用下列方法,无论你需要输入连续编号的单元格是否改变,均不需要改变代码. 第一步:将下列代码拷贝到宏中(方法请问度娘,搜代码的人应该会的) ...
如何找出MySQL数据库中的低效SQL语句
面对业务的迅猛发展,DBA的一项重要工作就是及时发现数据库中的低效SQL语句,有的可以立刻着手解决(比如缺少合适的索引),有的需要尽快反馈给开发人员进行修改. MySQL数据库有几个配置选项可以帮助我 ...
mysql navicat 多语句_使用Navicat多对多关系SQL语句在MySQL中实现
/** *功能:模拟两张表关系及添加两个主键和外键详细过程 *日期: 2018年7月26日 18:45 *注释: 学习数据库MySQL的点点记录, 谢谢网上各位大神分享经验与资料, 欢迎各位大神批 ...
php access数据库_在PHP中使用Access数据库
php access数据库 A previous client of mine had an Access database of products they sell, which they had ...
不学c语言能学mysql吗_学C语言难不难？以及简说数据库
有很多小伙伴呢经常会问小编学习C语言和C++难不难今天我跟大家分享一下吧其实还好,坚持下去就可以了,看你的态度,是不是相信自己对自己有没有那个信心,看你自己将来想走一个什么样的路,如果想走程序的路 ...
MYSQL中常用的SQL语句(增删改查)
MYSQL中常用的SQL语句一.增删改查 1.新增指定字段插入: INSERT INTO <表名> (<字段1>, <字段2>, <字段3>) VA ...
自定义表单mysql_自定义表单，计算答案然后更新mysql DB(Custom form, calculate answer then update mysql DB)...
自定义表单,计算答案然后更新mysql DB(Custom form, calculate answer then update mysql DB) 我想要实现的是用户购买代币时的模拟支付系统. 我坚 ...

vba 更新mysql数据库_使用VBA中的UPDATE SQL语句更新Access数据库

vba 更新mysql数据库_使用VBA中的UPDATE SQL语句更新Access数据库相关推荐

最新文章

热门文章