就一条SQL语句的问题,一晚上都没找到答案。郁闷呀。哎~ 帮帮忙吧。
利用ACCESS的VBA写一条查询,其中查询语句中有一个值是从一个文本框里获得的。用DoCmd.RunSQL做。
意思就是有一个文本匡,通过一个按扭运行一个SQL语句,之后把文本匡的内容添加到表的一个列里面,后面有个where限制条件。不用我的例子也可以,写个别的也行。谁帮忙弄一下吧。谢谢了。
dim myname
myname=text1.text
DoCmd.RunSQL "update 表1 set 名字="&myname&"where 性别=男"
要是没有后面的where 直接DoCmd.RunSQL "update 表1 set 名字="&myname 这样就可以。但加上后面那个我就不会了。 怎么写也不对,就告诉我缺少结束语句。
问题点数:100、回复次数:3Top
1 楼techgopher(米粒之珠也放光华)回复于 2005-04-02 11:19:32 得分 65
没有where的时候可以吗?你明明没有把常量用引号括起来嘛:
"update 表1 set 名字='" & myname & "' where 性别='男'"Top
2 楼gjd111686(数字金刚)回复于 2005-04-02 12:35:30 得分 35
"update 表1 set 名字='"&myname&"' where 性别='男'"Top
3 楼yzbt124124()回复于 2005-04-02 13:14:16 得分 0
谢谢二位大哥。已经解决了。哎~ 怪我太笨了,我也是刚学VBA,以前会点VB,但没做过SQL查询,昨天晚上10点到今天早晨6点,就这个破问题,高手一看遍知是低级错误。那个变量外面有一对"&"符号,再加一对双引号,还有一层单引号。呵呵,我一开始也看到这个范例了,我还以为那个双引号是和最左边那个是一对,我还纳闷,是不是多写了个单引号呀。大意了。 结帐!!Top




