SQL Server Stored Procedure Via VBA And ADODB

I'm creating my first stored procedure ever and it looks relatively good so far. The problem is with passing the parameters, more exactly:

Arguments are of wrong type, are out of acceptable range, or are in confilict with one another

The essential part of the stored procedure looks like:

Code:
CREATE PROC GetUserAuthForApp
@User varchar(7),
@application int
AS

while the essential code calling it from VBA looks like:

Code:
Dim strConn As String 'Connection string to SQL Server
Dim strSQLtoExecute As String 'SQL query string to execute
Dim oConn As ADODB.Connection 'Object for connecting
Dim rs As ADODB.Recordset 'Object for recordset
Dim cmd As ADODB.Command
Dim prmUser As ADODB.Parameter
Dim prmApplication As ADODB.Parameter
Dim stProcName As String 'Stored Procedure name

[code]....

and in that rs.Open comes that error.

What have I done wrong, how do I fix it?