|
发表于 2013-10-22 14:46:58
|
显示全部楼层
江苏省扬州市
[e]
.版本 2.子程序 查询数据库, 文本型, , 根据指定的参数得到整行的值.参数 参数, 文本型, , 此参数就是你需要查询的字段参数,多个字段用逗号隔开.局部变量 数据库句柄, 整数型.局部变量 表名, 文本型.局部变量 字段名, 文本型.局部变量 参数数组, 文本型.局部变量 返回参数, 文本型.局部变量 k, 整数型数据库连接.连接Access (取运行目录 () + “\数据库.mdb”, )表名 = “工资表” ' 这里是数据库中的表名字字段名 = “id” ' 这里和参数对应,参数是id,那么你这个字段的名称就要填写参数对应的字段名数据库句柄 = 数据库连接.查询 (“SELECT * FROM `” + 表名 + “` where ” + 字段名 + “='” + 参数 + “'”).如果 (寻找文本 (参数, “,”, , 假) > 0) ' 如果参数是多个字段 参数数组 = 分割文本 (参数, “,”, ) ' 把参数分割出来,便于查询各字段的内容 .计次循环首 (取数组成员数 (参数数组), k) 返回参数 = 返回参数 + 数据库连接.读字段文本 (数据库句柄, 参数数组 [k]) + “,” ' 把所有读出来的字段值组合,中间用逗号隔开 .计次循环尾 ().否则 返回参数 = 数据库连接.读字段文本 (数据库句柄, 参数) ' 如果是查询单个字段,执行这里的语句.如果结束返回 (返回参数)
[/e]
这么详细的回复你这个帖子,标注的很清楚啦,几乎采纳哦
|
|