working stored procedure... vb6 code not working