Type name is invalid for Stored Procedure

[Chris Asaipillai]

I have a problem executing the following Stored Procedure from code.
The SP Text runs like this:
ALTER PROCEDURE prc_InsertContr actDirectStatus *_tmp
@var_ContractID VARCHAR(50)
insert into tblContractAudi tHistory (ContractID)
VALUES (@var_ContractI D)
The VB code which calls the procedure runs like this:
Dim adoRs As ADODB.Recordset
Dim adoCmd As ADODB.Command
Dim adoPm As ADODB.Parameter
Dim strContractID As Variant
Dim strContractStat us As Variant
Set adoCmd = New ADODB.Command
With adoCmd
.ActiveConnecti on = strConnection
Set adoPm = .CreateParamete r("ContractID ", adVariant, adParamInput,
, strContractID)
.Parameters.App end adoPm
.CommandText = "prc_InsertCont ractDirectStatu *s_tmp"
.CommandType = adCmdStoredProc
adoCmd.Execute
End With
However i get the following error message:
Type name is invalid.
Error code : -2147217872
Any ideas as to why this is happening?

[Randy Birch]

In the SP you have :

prc_InsertContr actDirectStatus-_tmp
whereas in the code you have:

prc_InsertContr actDirectStatu-s_tmp
Note the position of the dash.

--

Randy Birch
MS MVP Visual Basic
http://vbnet.mvps.org/
----------------------------------------------------------------------------
Read. Decide. Sign the petition to Microsoft.
http://classicvb.org/petition/
----------------------------------------------------------------------------

"Chris Asaipillai" <ch************ **@btinternet.c om> wrote in message
news:42******** *************** @news.zen.co.uk ...
:I have a problem executing the following Stored Procedure from code.
:
:
: The SP Text runs like this:
:
:
: ALTER PROCEDURE prc_InsertContr actDirectStatus-_tmp
: @var_ContractID VARCHAR(50)
:
:
: insert into tblContractAudi tHistory (ContractID)
: VALUES (@var_ContractI D)
:
:
: The VB code which calls the procedure runs like this:
:
:
: Dim adoRs As ADODB.Recordset
: Dim adoCmd As ADODB.Command
: Dim adoPm As ADODB.Parameter
:
:
: Dim strContractID As Variant
: Dim strContractStat us As Variant
:
:
: Set adoCmd = New ADODB.Command
:
:
: With adoCmd
: .ActiveConnecti on = strConnection
:
:
: Set adoPm = .CreateParamete r("ContractID ", adVariant, adParamInput,
: , strContractID)
: .Parameters.App end adoPm
: .CommandText = "prc_InsertCont ractDirectStatu-s_tmp"
: .CommandType = adCmdStoredProc
:
:
: adoCmd.Execute
: End With
:
:
: However i get the following error message:
: Type name is invalid.
:
:
: Error code : -2147217872
:
:
: Any ideas as to why this is happening?
:
:
: