Question

我有一个返回SQL查询的一部分的函数。

Function GetYQConditions(command, startYQ, endYQ)
    Dim strSql

    strSql = " AND yq>=? and yq<=?"

    command.Parameters.Append(command.CreateParameter(undefined, 200, 1, 61, startYQ))
    command.Parameters.Append(command.CreateParameter(undefined, 200, 1, 61, endYQ))

    GetYQConditions = strSql    
End Function

问题：问题是yq>=? and yq<=?需要将参数作为字符串传递。

预期： yq>='startYQ' and yq<='endYQ'

问题：如何将参数作为字符串值传递？那是paramter在一个qoute``中？或者我的方向完全错误？

Answer 1

我认为你要做的是：

Function GetYQConditions(command, startYQ, endYQ)
    Dim strSql

    strSql = " AND yq>=? and yq<=?"
    startYQ = "'" & startYQ & "'"
    endYQ = "'" & endYQ & "'"

    command.Parameters.Append(command.CreateParameter(undefined, 200, 1, 61, startYQ))
    command.Parameters.Append(command.CreateParameter(undefined, 200, 1, 61, endYQ))

    GetYQConditions = strSql    
End Function

如何使用VBScript将字符串参数传递给ADO中的Command对象

1 个答案: