文本版|topic 高级搜索
   名人堂 帮助 论坛制度 意见反馈 | 首页 博客 周新贴 专题 求职 读书
RSS 底部
 
社区导航: 专家门诊   网络技术   操作系统   数据库   程序设计   系统应用   考试认证   CIO及信息化   站长交流   综合交流   下载基地  51CTO产品服务 设为首页 | 收藏本站
51CTO技术论坛» .Net » 请高手帮忙       [ 打印]  [ 订阅]  [ 收藏]  [ 推荐给朋友]   [ 本帖文本页]

论坛跳转:
     
标题: [讨论] 请高手帮忙  ( 查看:334  回复:0 )   
 
andyfan
新新人类  点击可查看详细



帖子 86
精华 0
无忧币 57
积分 174
阅读权限 20
注册日期 2006-8-23
最后登录 2008-8-11 离线

[查看资料]  [发短消息]  [Blog
  QQ       
发表于:2008-7-6 21:22   标题:请高手帮忙
上一帖 |
这是一个VB简单的数据库查询时出现的问题,问题提示“实施错误3251记录集不支持更新“
Private Sub Command10_Click()
Dim zxm As String
zxm = InputBox$("输入要查询的中心名称", "输入框")
Data1.Recordset.FindFirst "中心名称='" & zxm & "'"
Data1.Refresh
If c = "" Then
MsgBox "不能查询空值"
ElseIf Data1.Recordset.NoMatch Then MsgBox "无此中心", , "提示"
End If
MsgBox "无法找到记录 [" & zxm & "]", vbCritical, "查询错误"
End Sub
不知道哪里写错了



网络虽虚拟,技术无边界,来看看大家“真面目”!
2008-7-6 21:221楼
[ 顶部 ]
     
论坛跳转:  

| | |

标记已读 · 删除论坛Cookies · 文本版 · WAP
 
| 诚征版主 | 版主堂 | 意见建议 | 大史记 | 论坛地图
Copyright©2005-2008 51CTO.COM  Powered by Discuz!
本论坛言论纯属发布者个人意见,不代表51CTO网站立场!如有疑义,请与管理员联系。
京ICP备05051492号