http://www.csdn.net/expert/Topic/444/444094.shtm

解决方案 »

  1.   

    http://www.csdn.net/expert/Topic/384/384635.shtm
    这个更好点
      

  2.   

    哈,这个
    http://www.csdn.net/expert/Topic/384/384635.shtm
    正好是我答的。
    多谢!分我点吧。
      

  3.   

    Option Explicit
    Dim Cnn As New ADODB.Connection
    Dim cmd As New ADODB.Command
    Dim param0 As New ADODB.Parameter
    Dim param1 As New ADODB.Parameter
    Dim param2 As New ADODB.Parameter
    'public Parameter(String name, int type, int dir, int size, Object value)Private Sub Form_Load()
    Cnn.ConnectionString = "Provider=SQLOLEDB.1;Integrated Security=SSPI;" & _
                    "Persist Security Info=False;Initial Catalog=Project;Data Source=localhost"
    Cnn.Opencmd.ActiveConnection = Cnncmd.CommandType = adCmdStoredProc
    cmd.CommandText = "insert_工程信息_1"param0.Type = adInteger
    param0.Size = 4
    param0.Value = 62256
    param0.Name = "bh"param1.Type = adChar
    param1.Size = 50
    param1.Name = "工程名称"
    param1.Value = "00100"param2.Type = adChar
    param2.Size = 50
    param2.Name = "工程编号"
    param2.Value = "121238992"cmd.Parameters.Append param0
    cmd.Parameters.Append param1
    cmd.Parameters.Append param2cmd.ExecuteEnd SubSub ProcedureInit(ByVal cmd As Command, ByRef invalue() As Variant)End Sub
      

  4.   

    to:crystal2000(爱干什么就干什么)
    我是在存储过程中定义了一个变量,而且在存储过程中多次执行了Select语句
    在VB中我想分别得到每一个查询的记录总数
    该如何,请大虾明言