加入收藏 | 设为首页 | 会员中心 | 我要投稿 拼字网 - 核心网 (https://www.hexinwang.cn/)- 科技、建站、经验、云计算、5G、大数据,站长网!
当前位置: 首页 > 站长学院 > MsSql教程 > 正文

SQL语句中的全局变量

发布时间:2021-03-01 01:16:03 所属栏目:MsSql教程 来源:网络整理
导读:我在VBA中有以下代码: Dim strSQL As StringstrSQL = "UPDATE Workstations SET MID = newvalue WHERE MID = tempvalue"DoCmd.RunSQL strSQL newvalue和tempvalue都是全局变量,并且已经设置了值.语法明智,这有意义吗?还是我错过了引号? 解决方法 试试这个

我在VBA中有以下代码:

Dim strSQL As String
strSQL = "UPDATE Workstations SET MID = newvalue WHERE MID = tempvalue"
DoCmd.RunSQL strSQL

newvalue和tempvalue都是全局变量,并且已经设置了值.语法明智,这有意义吗?还是我错过了引号?

解决方法

试试这个:

如果MID是数字:

Dim strSQL As String
strSQL = "UPDATE Workstations SET [MID] = " & newvalue & " WHERE [MID] = " & tempvalue
DoCmd.RunSQL strSQL

如果MID是字符串(如果newvalue / tempvalue不包含单引号’):

Dim strSQL As String
strSQL = "UPDATE Workstations SET [MID] = '" & newvalue & "' WHERE [MID] = '" & tempvalue & "'"
DoCmd.RunSQL strSQL

如果MID是字符串(如果newvalue / tempvalue包含单引号’如newvalue =“Mike’s car”):

Dim strSQL As String
strSQL = "UPDATE Workstations SET [MID] = '" & Replace(newvalue,"'","''") & "' WHERE [MID] = '" & Replace(tempvalue,"''") & "'"
DoCmd.RunSQL strSQL

如果MID是日期:

Dim strSQL As String
strSQL = "UPDATE Workstations SET [MID] = #" & newvalue & "# WHERE [MID] = #" & tempvalue & "#"
DoCmd.RunSQL strSQL

感谢@HansUp在评论中指出,那

MID is the name of a function,so it would be safer to bracket or alias that field name in the SQL statement: SET [MID]

(编辑:拼字网 - 核心网)

【声明】本站内容均来自网络,其相关言论仅代表作者个人观点,不代表本站立场。若无意侵犯到您的权利,请及时与联系站长删除相关内容!

    热点阅读