Office中国论坛/Access中国论坛

标题: [已解决] 插入数据查询 [打印本页]

作者: ycxchen 时间: 2008-9-28 23:21
标题: [已解决] 插入数据查询
我想在例子中建一个查询，运行查询能在“游客表”中的“手机”字段的每条记录中的第4位数字后自动插入一个0，例如，原来一手机号码为15992317888，运行查询后变为159902317888。请问，要达到此目的，如何设计查询呢？
[attach]32453[/attach]

[ 本帖最后由 cuxun 于 2008-10-7 07:26 编辑 ]

作者: ycxchen 时间: 2008-9-29 09:29
十分感谢大肚鸭版主!

作者: ycxchen 时间: 2008-9-29 11:53
运行不正常，提示缺少语句结束，请问，如何解决？
Private Sub Command9_Click()
Dim sql As String
sql = "UPDATE 游客表 SET 游客表.手机 = Mid([手机],1,4) & "0" & Mid([手机],5);"
DoCmd.RunSQL sql
End Sub

作者: zyp 时间: 2008-9-29 13:54

原帖由 ycxchen 于 2008-9-29 11:53 发表
运行不正常，提示缺少语句结束，请问，如何解决？
Private Sub Command9_Click()
Dim sql As String
sql = "UPDATE 游客表 SET 游客表.手机 = Mid([手机],1,4) & "0" & Mid([手机],5);"
DoCmd.RunSQL sql
End ...

sql = "UPDATE 游客表 SET 游客表.手机 = Mid(手机,1,4) & 0 & Mid(手机,5)"

作者: ycxchen 时间: 2008-9-29 15:00
十分多谢zyp了！真有一抹流星划过天幕的微笑的感觉。0是文本符号，按理解在语句中要英文的双引号的，不何“& 0 &”中的0不要英文的双引号的？

作者: ycxchen 时间: 2008-9-29 15:37
另，手机字段值为空或者号码不足4位（例如：123），运行查询也会插入0，如何避免这种情况发生？即当手机字段值为空或者号码不足4位时不插入0。

作者: Henry D. Sy 时间: 2008-9-30 00:50
加 where 条件
where len(手机字段值)>=4

[ 本帖最后由 dddddd 于 2008-9-30 00:57 编辑 ]

作者: ycxchen 时间: 2008-9-30 09:23
十分感谢指教!

作者: 明镜 时间: 2008-10-3 12:05
看一下

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)