关于数据库查询的问题，急需解答，在线给分！！！！！！！！！

[mc3361]

在使用这句中select * from Table1,Table2,Table3 where Table1.字段1=条件1 And Table1.字段2=条件2 And Table2.字段2=条件3 And table2.字段3=条件4
（条件指字段中的某值）

就是用上面这句后面跟的条件进行查询，我有时查询只需要满足条件一就行了，有时要查条件1和条件2，有时要查所有条件，这样组合起来就有16种，对于这种情况我只会写IF语句列出所以情况，我想问有没有简单的方法实现查询这16种情况。不知道说清楚了没，谢谢解答。在线等待解答，能解决的马上给分。

[goodname008]

Dim strSQL As String

像这样定义一个保存SQL命令的字符串，然后根据需要精心构造它，最后再执行就可以了。
肯定没问题，我遇到过这种情况，就是用这种方法解决的，主要是构造SQL命令字符串的算法问题。

[mc3361]

能说具体点吗？怎么构造呢？我大概能理解点，但我觉得还是挺麻烦的，能有更简便的方法吗？

[armu80830]

Dim strSQL As String '做为查询条件
Dim ts as string '查询记录SQL语句
根据各种条件生成strSQL
。。。

ts="select * from Table1,Table2,Table3 where " & strSQL
rs.open ts,cn,1,1
....

[mc3361]

rs.open ts,cn,1,1 '这句不明白，怎么来选择这些条件，能说清楚点吗？

[goodname008]

Open 方法 (ADO Recordset)


打开游标。

语法

recordset.Open Source, ActiveConnection, CursorType, LockType, Options

参数

Source 可选，变体型，计算 Command 对象的变量名、SQL 语句、表名、存储过程调用或持久 Recordset 文件名。

ActiveConnection 可选。变体型，计算有效 Connection 对象变量名；或字符串，包含 ConnectionString 参数。

CursorType 可选，CursorTypeEnum 值，确定提供者打开 Recordset 时应该使用的游标类型。可为下列常量之一（参阅 CursorType 属性可获得这些设置的定义）。

常量 说明
adOpenForwardOnly （默认值）打开仅向前类型游标。
adOpenKeyset 打开键集类型游标。
adOpenDynamic 打开动态类型游标。
adOpenStatic 打开静态类型游标。


LockType 可选。确定提供者打开 Recordset 时应该使用的锁定（并发）类型的 LockTypeEnum 值，可为下列常量之一（参见 LockType 属性可获得详细信息）。

常量 说明
adLockReadOnly （默认值）只读 — 不能改变数据。
adLockPessimistic 保守式锁定（逐个） — 提供者完成确保成功编辑记录所需的工作，通常通过在编辑时立即锁定数据源的记录来完成。
adLockOptimistic 开放式锁定（逐个） — 提供者使用开放式锁定，只在调用 Update 方法时才锁定记录。
adLockBatchOptimistic 开放式批更新 — 用于批更新模式（与立即更新模式相对）。


Options 可选，长整型值，用于指示提供者如何计算 Source 参数（如果它代表的不是 Command 对象），或从以前保存 Recordset 的文件中恢复 Recordset。可为下列常量之一（参见 CommandType 属性可获得该列表中前五个常量的详细说明）。

常量 说明
adCmdText 指示提供者应该将 Source 作为命令的文本定义来计算。
adCmdTable 指示 ADO 生成 SQL 查询以便从 Source 命名的表返回所有行。
adCmdTableDirect 指示提供者更改从 Source 命名的表返回的所有行。
adCmdStoredProc 指示提供者应该将 Source 视为存储的过程。
adCmdUnknown 指示 Source 参数中的命令类型为未知。
adCommandFile 指示应从 Source 命名的文件中恢复持久（保存的）Recordset。
adExecuteAsync 指示应异步执行 Source。
adFetchAsync 指示在提取 CacheSize 属性中指定的初始数量后，应该异步提取所有剩余的行。


说明

使用 Recordset 对象的 Open 方法可打开代表基本表、查询结果或者以前保存的 Recordset 中记录的游标。

使用可选的 Source 参数指定使用下列内容之一的数据源：Command 对象变量、SQL 语句、存储过程、表名或完整的文件路径名。

ActiveConnection 参数对应于 ActiveConnection 属性并且指定在其中打开 Recordset 对象的连接。如果传送该参数的连接定义，则 ADO 使用指定的参数打开新连接。可以在打开 Recordset 之后更改该属性的值以便将更新发送到其他提供者。或者可以将该属性设置为 Nothing（在 Microsoft Visual Basic 中）以便将 Recordset 与所有提供者断开。

对于直接对应于 Recordset 对象属性的参数（Source、CursorType 和 LockType），参数和属性的关系如下：

在 Recordset 对象打开之前属性是读/写。


除非在执行 Open 方法时传送相应的参数，否则将使用属性设置。如果传送参数，则它将覆盖相应的属性设置，并且用参数值更新属性设置。


在打开 Recordset 对象后，这些属性将变为只读。
注意 对于其 Source 属性设置为有效 Command 对象的 Recordset，即使 Recordset 对象没有打开，ActiveConnection 属性也是只读的。

如果在 Source 参数中传送 Command 对象并且同时传递 ActiveConnection 参数，那么将产生错误。Command 对象的 ActiveConnection 属性必须已设置为有效的 Connection 对象或者连接字符串。

如果在 Source 参数中传送的不是 Command 对象，那么可以使用 Options 参数优化 Source 参数的计算。如果没有定义 Options 则性能将会降低，原因是 ADO 必须调用提供者以确定参数为 SQL 语句、存储过程还是表名。如果确知所用的 Source 类型，则可以设置 Options 参数以指示 ADO 直接跳转到相关的代码。如果 Options 参数与 Source 类型不匹配，将产生错误。

如果不存在与记录集关联的连接，Options 参数的默认值将为 adCommandFile。这是持久 Recordset 对象的典型情况。

如果数据源没有返回记录，那么提供者将 BOF 和 EOF 属性同时设置为 True，并且不定义当前记录位置。但如果游标类型允许，仍然可以将新数据添加到该空 Recordset 对象。

在结束对打开的 Recordset 对象的操作后，可使用 Close 方法释放所有关联的系统资源。关闭对象并非将它从内存中删除，可以更改它的属性设置并在以后使用 Open 方法再次将其打开。要将对象从内存中完全删除，可将对象变量设置为 Nothing。

在设置 ActiveConnection 属性之前调用不带操作数的 Open，可通过将字段追加到 Recordset Fields 集合创建 Recordset 的实例。

[mc3361]

在楼上这么多东西中，我还是没有发现对我有帮助的东西，能说清楚点吗？我学vb才一个多星期，很多名词都不太清楚。

[Amphibian]

搂主用if不错了，和构造字符串差不多。

[liuyongpc]

书是你的朋友

[goodname008]

"rs.open ts,cn,1,1 '这句不明白，怎么来选择这些条件，能说清楚点吗？"
你不是问这个来着吗？我把MSDN中的说明贴过来了。

对于你提的问题，我还是想坚持我的观点，用算法去精心构造一个SQL命令。

首先声明一个字符串变量
Dim strSQL As String

然后用程序算法去修改这个字符串的内容，使之成为你最终想要执行的SQL命令，最后一执行。
根据不同需要构造命令时会用到 If 判断和 For 循环，但它们的语句体中并不是执行SQL命令，而仅仅是修改 strSQL 这个字符串，渐渐地使这个字符串成为一条完整的你最终想要执行的SQL命令。

[vv1vv]

up