vba编程时的困惑？

weilai　发表于：2009-02-16 14:59:42 　

1，在vba中，怎样才能执行编写的spl语句

2，怎样才能将编执行过的spl结果集赋给某个变量？

竹笛发表于：2009-02-16 16:46:16

1. docmd.runsql "sql语句"

2.集　不等于变量，没办法赋

集可能是100行20列，变量只是一个值。

ACMAIN.CHM 发表于：2009-02-16 21:25:48

参考一下MS ACCESS 自带的帮助文件中的ADO的帮助手册。

执行SQL 请查看 connection.execute, recordset.open 方法

取值请查看 recordset.move, recordset.fileds(0).value

weilai 发表于：2009-02-17 01:34:02

Set recordset = connection.Execute (CommandText, RecordsAffected, Options)

1、采用以上方法，执行sql的语句，为什么我用此命令来做一个统计查询某个班级有多少人时，结果集中只有一个数据，不像1楼好心人说的那样，为什么还是出错呢？

2、Set recordset = connection.Execute (CommandText, RecordsAffected, Options)

中recordset是执行语句的返回值吗，若是，我再次使用时，它会显示错误信息？

张誉发表于：2009-03-14 21:03:00

表：tab_Class（班级成员信息）按钮：cmdCheck（查询人数）

Private Sub cmdCheck_Click()

Dim strsql As String '定义字符串变量

Dim rst As ADODB.Recordset '定义ADODB数据记录集

Dim n as Integer '定义整型变量

strsql="select * from tab_Class" '定义查询

Set rst=New ADODB.Recordset

rst.Cursorlocation=aduseclient

rst.Open strsql,Currentproject.Connection,adopendynamic,adlockoptimistic '将查询赋予记录集

n=rst.recordcount '人数

Msgbox "该班级共有" & n & "人",vbInformation,"提示" '显示结果

rst.Close

Set rst = Nothing

End Sub

总记录：4篇页次：1/1 9 1 :

Access交流中心