Hi Marc, Thanks for your help.
I did add that statement as you suggusted. And that problem was solved.
I proceeded to execute the project and modified the code statement " Set prm3 = cmd1.CreateParameter("year", adChar, adParaInput, 4)" to "Set prm3 = cmd1.CreateParameter(year", adInteger, adParamOutput)" after I got a Run-time error '3001': Arguments are of the wrong type, are out of acceptable range, or are in conflict with one another.
Then I continued to execute the project and I got a new Run-time error '-2147217900(80040e14)': Could not find stored procedure 'Year_In_@year_In_out_return' on the code statement "Set rst1 = cmd1.Execute". I tried and created a regular stored procedure in the "Queries" section for solving that new Run-time error. But it did not work for me. I am completely lost now. Do you have any ideas about solving this new Run-time error? Please help and advise me.
Thanks again,
Scott Chang