はじめまして、坂本といいます。
Access200+MSDEで開発をしております。（初心者です）
ストアドプロシージャを実行し、その結果が取得できないのですが？

Sub Test()
Dim conn as ADODB.Connection
Dim cmd as ADODB.Command

	Set conn = Currentprojct.Connection
	Set Cmd = New ADODB.Command
	cmd.ActiveConnection = conn
	cmd.CommandText = "SP_Seles"
	cmd.CommandType = acCmdStoredProc
	cmd.Parameters("@seles_no")  = Me![selesnumber]
.
.
.
End Sub

<ストアド：SP_Seles>
Alter Procedure SP_Seles
	(
		@seles_no	int
	)
As
Select ＊ From Seles Where code = @seles_no
return

上記の記述で実行すると"SP_Seles"でパラメータ"@seles_no"を指定してください
とエラーがでてしまいます。
どこがおかしのでしょうか？教えてください。
宜しくお願いいたします。