("ADODB.Command") With cmdUpdate 'Set up command properties .ActiveConnection = CONN_DSN .CommandText = "spInsertMfg;" .CommandType = adCmdStoredProc 'Add input variables .Parameters.Append .CreateParameter ("_MfgName", adVarChar, adParamInput, 100, "Test Company") .Parameters.Append ....