但是我们使用 Access 存储过程的主要目的，就是使用参数额外提供的查询，使用存储过程，我们不必再面对将参数值拼接到 SQL 语句字符串中时遇到的各种麻烦，比如： 代码: -------------------------------------------------------------------------------- Dim sql sql = "SELECT * FROM Users WHERE UserName = '" & userName & "'" -------------------------------------------------------------------------------- 以上代码中，如果字符串变量 userName 中含有“'”单引号，则会报错。我们必须手工转化： 代码: -------------------------------------------------------------------------------- Dim sql sql = "SELECT * FROM Users WHERE UserName = '" & Replace(userName, "'", "''") & "'" '转化为连续两个单引号 -------------------------------------------------------------------------------- 而使用带参数查询，我们的 SQL 语句可以写为： 代码: -------------------------------------------------------------------------------- Dim sql sql = "SELECT * FROM Users WHERE UserName = @userName" -------------------------------------------------------------------------------- 然后把参数 @userName 的值以 Command 对象的 Parameter 属性来传入即可，很方便直观。 代码: -------------------------------------------------------------------------------- With cmd '创建参数对象 .Parameters.Append .CreateParameter("@userName") '给各参数指定值 .Parameters("@userName") = userName End With --------------------------------------------------------------------------------
这里还要说明 Access 存储过程中参数的使用。和 SQL Server 的存储过程中用 @ 变量指定参数，然后同名传入参数对象不同，Access 中的参数，是以“顺序”而非“名字”来识别的。传入的参数无需指定名字，随便起，SQL 中的参数名字也可以随便起，只要传入参数值时，按照 SQL 语句中的参数出现顺序指定就行了。通常，我们使用 Command 对象的 Execute 方法，直接传入参数值数组来执行～ 代码: -------------------------------------------------------------------------------- cmd.Execute , Array(userName) -------------------------------------------------------------------------------- 再比如，你的一个 Access 存储过程这么写： 代码: -------------------------------------------------------------------------------- select * from Users where UserName = p_UserName and BookTitle = p_bookTitle -------------------------------------------------------------------------------- 你可以就这么执行，通过传入参数值数组，但是顺序要对应： 代码: -------------------------------------------------------------------------------- cmd.Execute , Array(userName, bookTitle) -------------------------------------------------------------------------------- OK，看看我们的例子中使用的两个查询，一个是写入数据。写好 SQL 语句后存并命名。
另一个读取数据的存储过程代码。
