找回密码
 加入
搜索
查看: 3348|回复: 7

请教MDB数据库 查找并读取该条记录

  [复制链接]
发表于 2008-8-16 21:20:55 | 显示全部楼层 |阅读模式
DIM $CARDNO="123123"
$RS.Open ('Select * From tblCardInfo where '  & "CardNo" &  '=' & '"' & $CARDNO & '"')
我要找到数据库tblCardInfo 中CardNo 字段=123123的那条记录,并将该条记录下的NAME字段和PASS字段显示出来或放入一个函数中
请问该怎么实现
发表于 2008-8-17 08:16:49 | 显示全部楼层
$s_Tablename = "tblCardInfo"
$s_FindFieldName = "CardNo"
$s_FindData = "123123"

$Rs.Open("Select * From " & $s_Tablename & " where " & $s_FindFieldName & "='" & $s_FindData & "'")

While (Not $Rs.eof And Not $Rs.bof)
        If @error = 1 Then        ExitLoop
;                For $x = 1 To $s_RetrunDataNum
;                        $Return[$x] = $o_adoRs.Fields($x).value
;                Next
        $Return = $Rs.Fields(0).value
        $o_adoRs.movenext
WEnd
发表于 2008-9-19 13:14:51 | 显示全部楼层
回答的非常好
发表于 2008-9-20 21:45:58 | 显示全部楼层
用AU3也二年了,但只是限于实用的程序范围,近日接触数据库,总是写不好,版主的程序写的不错,但我看的不太懂,能不能详细说一下啊,谢谢!
尤其是:
While (Not $Rs.eof And Not $Rs.bof)
        If @error = 1 Then        ExitLoop
;                For $x = 1 To $s_RetrunDataNum
;                        $Return[$x] = $o_adoRs.Fields($x).value
;                Next
        $Return = $Rs.Fields(0).value
        $o_adoRs.movenext
WEnd
发表于 2008-9-20 22:21:35 | 显示全部楼层
我来说说:

While (Not $Rs.eof And Not $Rs.bof); 判断记录为不为空
        If @error = 1 Then        ExitLoop
;                For $x = 1 To $s_RetrunDataNum
;                        $Return[$x] = $o_adoRs.Fields($x).value
;                Next
        $Return = $Rs.Fields(0).value;逐条记录查询,直到查到符合的记录
        $o_adoRs.movenext;指针指向下一条
WEnd
发表于 2008-9-22 16:22:34 | 显示全部楼层
数据库操作,牛,还没接触到
发表于 2008-9-24 02:51:32 | 显示全部楼层
会用accesscom里面的函数就可以解决了。
管他什么sql的语法。效率第一。
发表于 2008-10-27 03:58:51 | 显示全部楼层
数据库名字在哪连接,比如我有自己的一个序列号然后想读数据库中他没有这一条数据,如果有则执行下面的程序应该怎样?
麻烦赐教
您需要登录后才可以回帖 登录 | 加入

本版积分规则

QQ|手机版|小黑屋|AUTOIT CN ( 鲁ICP备19019924号-1 )谷歌 百度

GMT+8, 2024-6-16 17:58 , Processed in 0.085659 second(s), 23 queries .

Powered by Discuz! X3.5 Licensed

© 2001-2024 Discuz! Team.

快速回复 返回顶部 返回列表