| 编程中国 | 业界新闻 | 技术文章 | 视频教程 | 下载频道 | 程序源码 | 个人空间 | 编程论坛
全能ASP/PHP/ASP.NET主机,支持月付专业 MSSQL 数据库空间,支持月付专业 MySQL 数据库空间,支持月付学习型 ASP/PHP/ASP.NET 主机 30元/年
高端软件开发 = 年薪十万不是梦赛孚耐:软件保护加密专家身份认证令牌USB KEY 
共有 261 人关注过本帖
标题:[求助]自动化错误
收藏  订阅  推荐  打印 
紫色青烟
Rank: 1
等级:新手上路
帖子:25
积分:350
注册:2007-9-13
[求助]自动化错误

If rs1.Fields("use_name") = Text1.Text And rs1.Fields("use_password") = Text2.Text And rs1.Fields("use_power") = Combo1.Text Then
当运行至此,提示自动化错误
代码为
rs.Open "select * from use ", cn, adOpenKeyset, adLockPessimistic
If rs.RecordCount > 0 Then
If Text1.Text <> "" And Text2.Text <> "" Then
Set rs1 = New ADODB.Recordset
rs1.Open "select * from use where use_name='" & Text1.Text & " and use_power= " & Combo1.Text & "'", cn, adOpenKeyset, adLockPessimistic
If rs1.Fields("use_name") = Text1.Text And rs1.Fields("use_password") = Text2.Text And rs1.Fields("use_power") = Combo1.Text Then
请问大虾们红色字该怎么改呀
搜索更多相关主题的帖子: 自动化  
2007-10-2 14:25
purana
Rank: 12Rank: 12Rank: 12
来自:广东-广州
等级:版主
威望:66
帖子:6040
积分:61390
注册:2005-6-17

rs1 open的时候单引号不够..


我的msn: myfend@hotmail.com
2007-10-2 14:30
multiple1902
Rank: 12Rank: 12Rank: 12
等级:版主
威望:40
帖子:4479
积分:45682
注册:2007-2-9

2楼正解。

“高考”这个词在耳边不断萦绕,心中的激动不言而喻。写下一句话,一起努力。Let's struggle together.
2007-10-2 14:51
紫色青烟
Rank: 1
等级:新手上路
帖子:25
积分:350
注册:2007-9-13

朋友们
我已经解决了这个问题,不是红色字出的问题
是SELECT语句错问题了
不过还是要谢谢你们!
2007-10-2 15:28
multiple1902
Rank: 12Rank: 12Rank: 12
等级:版主
威望:40
帖子:4479
积分:45682
注册:2007-2-9

2楼说的就是select出错。

“高考”这个词在耳边不断萦绕,心中的激动不言而喻。写下一句话,一起努力。Let's struggle together.
2007-10-2 15:38
缘吇弹
Rank: 12Rank: 12Rank: 12
来自:A与C之间
等级:版主
威望:43
帖子:3024
积分:33034
注册:2007-7-2

呵呵,自己找出错误是最好的.

Repeat  Life=Study;Until (death);        //<a href="http://hi.baidu.com/yzidan" target="_blank"><font color="green">***>[B]欢 迎 光 临 我 的 博 客[/B]
2007-10-2 15:39
关于我们 | 广告合作 | 编程中国 | 清除Cookies | Archiver | WAP | TOP

编程中国 版权所有,并保留所有权利。鲁ICP备08000592号
Powered by Discuz, Processed in 0.063973 second(s), 9 queries.
Copyright©2004-2008, BCCN.NET, All Rights Reserved