Postada em 10/06/2005 13:23 hs
Dim CmdSP As New ADODB.Command
'Set CmdSP = New ADODB.Command
CmdSP.ActiveConnection = cnn
CmdSP.CommandType = adCmdStoredProc
CmdSP.CommandText = "CORES_S"
Dim RstRegistro As ADODB.Recordset
Set RstRegistro = CmdSP.Execute
xx = RstRegistro.RecordCount, quando chega aqui diz que o objeto está fechado..... o que pode ser
|
