可以的,妳可用字符傳生成這樣的一句sql,然后去執行該sql語句

解决方案 »

  1.   

    Dim cn As New ADODB.Connection
        cn.Open ConnectString
        Dim CC As New ADODB.Command
        Set CC.ActiveConnection = cn
        CC.CommandText = "test"'你的存储过程
        CC.CommandType = adCmdStoredProc
        CC.Parameters.Refresh
        CC.Parameters("@begindate") = Trim(text1.text)'这里你自己加个时间转换的函数
        CC.Parameters("@enddate") = Trim(text2.text)
        CC.Execute