VB6中数据库参数化查询的技巧

最新推荐文章于 2025-07-10 13:33:11 发布

原创

最新推荐文章于 2025-07-10 13:33:11 发布 · 3.6k 阅读

6 ·

CC 4.0 BY-SA版权

文章标签：

#数据库 #vb #sql #cmd #sql server #parameters

本文介绍了VB6中如何进行数据库参数化查询，强调其高效、安全且避免SQL拼接错误的优点。通过示例代码展示了一种不依赖于Append方法的序列化方式，适用于SQL Server 2000和Access 2003。此外，还提到这种方法可应用于存储过程，并分享了在处理多平台数据库时的经验和思考。

通常对数据库的查询和操作，大家习惯于拼接sql语句，在论坛上也经常有拼接sql语句方面的问题，让许多初学者深感头痛，即使是老手，遇到复杂的拼接也难免会出错。其实访问数据库我们有更好的选择，这就是参数化查询，这种方法高效安全，又可以省掉程序中拼接sql的麻烦。不过呢，这方面的介绍不是很多，有介绍通常的方法似乎比较烦琐，不能写成通用的方法函数，所以好象使用的人比较少。最近小小的研究了一下，有所发现，备忘在此，共大家参考：

以下示例，基于xp sp3 + ADO2.8 + sql server 2000 (或者Access 2003)
常见的方法：

Dim cn As ADODB.Connection Dim rs As ADODB.Recordset Dim cmd As ADODB.Command Dim param As ADODB.Parameter Dim Sql As String sql = "Select * From tb Where userName = ? And age = ? " Set cn = New ADODB.Connection cn.Open "......" '数据库连接语句 Set cmd = New ADODB.Command With cmd .ActiveConnection = cn .CommandType = adCmdText .CommandText = sql Set param = .CreateParameter("?", adVarchar, adParamInput, 20, txtName.Text) .Parameters.Append param Set param = .CreateParameter("?",