关于recordset.find方法
Dim pn As String
pn = Form1.TreeView1.SelectedItem.Text
rec.Open "pinfo", con, adOpenKeyset, adLockOptimistic 'rec为recordset对象
rec.MoveFirst
rec.Find "pname = 'pn'", , , 1
If Not rec.EOF Then
Text1.Text = rec("pname")
Text1.SetFocus
End If
请高手帮我看一下为什么找不到该记录呢 我确定该记录一定存在数据库中!
每次调试的时候都是不走if 真是郁闷死了 我错在哪了呢?
pn = Form1.TreeView1.SelectedItem.Text
rec.Open "pinfo", con, adOpenKeyset, adLockOptimistic 'rec为recordset对象
rec.MoveFirst
rec.Find "pname = 'pn'", , , 1
If Not rec.EOF Then
Text1.Text = rec("pname")
Text1.SetFocus
End If
请高手帮我看一下为什么找不到该记录呢 我确定该记录一定存在数据库中!
每次调试的时候都是不走if 真是郁闷死了 我错在哪了呢?
...全文
相关推荐
VB recordset
**Clone**:创建 Recordset 的副本。10. **Find**:在 Recordset 中搜索满足特定条件的第一条记录。11.
JSP与Ajax网站开发实战指南
本文还有配套的精品资源,点击获取 简介:本书详细介绍了如何将JSP(JavaServer Pages)与Ajax(异步JavaScript和XML)技术相结合,用于创建高效、用户友好的动态网页应用。JSP允许在HTML中嵌入Java代码,实现复杂的业务逻辑,而Ajax则使得网页能够异步地与服务器通信,无需刷新页面即可更新内容,从而提高用户体验。本书提供了构建动态表格、实现分...
LabSQL 大家说的缺少的4个VI
**ADO Recordset Find.vi** 在处理大量数据时,查找特定记录是一项常见任务。ADO Recordset Find.vi提供了在Recordset中搜索特定条件的记录的功能。
VB数据库实例.pdf
```vbAdodc1.Recordset.Find "=''"If x.Text = "" Then MsgBox("XXX")Else ado1.Refresh ado1.Recordset.Find
用ADO删除和修改数据库记录
方法定位到指定的记录,如果找到,则调用Delete方法进行删除。


数据库(包含打印,安装,报表)
