دوستان لطفا کمک کنید

[hamid_reza_s1980]

سلام من یک sp توی sql نوشتم برای select

CREATE PROCEDURE qrySelectMemberInfo @MemberNo char(5)
As
SELECT tblMemberInfo.MemberNo, rTrim([MemberTitle])+' '+rTrim([MemberName]) AS MemberNameFa
FROM tblMemberInfo
WHERE tblMemberInfo.MemberNo = @MemberNo

برنامه توی vb هم این طوری نوشتم

Set dbc = New ADODB.Connection
dbc.Provider = "SQLOLEDB;Data Source=HAMID-45B45C463; Initial Catalog=gs1; User ID=sa;Password=sa;"
dbc.CursorLocation = adUseClient
dbc.Open
Set cmdQuery = New ADODB.Command
cmdQuery.ActiveConnection = dbc
cmdQuery.CommandType = adCmdStoredProc
cmdQuery.CommandText = "qrySelectMemberInfo"
Set prmQuery = New ADODB.Parameter
prmQuery.Type = adBSTR
prmQuery.Value = Value
cmdQuery.Parameters.Append prmQuery
Set rdsQuery = New ADODB.Recordset
rdsQuery.CursorType = adOpenStatic
rdsQuery.CursorLocation = adUseServer
Set rdsQuery = cmdQuery.Execute


خروجی باید یک رکورد باشد در حالی که توی رکورد ست هیچ خروجی وجود ندارد جالب این که این برنامه با همین شکل وقتی به بانک اکسس وصل است کار می کند از دوستان تقاضا دارم اگر کسی می دونه مشکل از چی هست به من کمک کنه ممنون می شم