Tu codigo se ve bien al parecer solo es cuestión de utilizar las condiciones correctamente.
Código:
On error Resume Next
connBD.Execute strSQL
if Err <> 0 then
'response.write "NO"
'Registra el error
else
call Register_Action(connBD, paramUser, "Inserto un nuevo usuario a la tabla user ")
end if
Saludos