falla store procedure

[mkgreidi]

Si,los fallos han sido al copiar,esos espacios no estan en el codigo(lo he comprobado por si acaso...)
No me da ningun error,pero no inserta nada en la base de datos
He comprobado que al asignar el valor a las variables se le asigne bien y si,eso lo hace correcto
Lo copio tambien por si el fallo estuviera aqui

mycommand = New SqlCommand("spInsertarContactoweb", conexion)
mycommand.CommandType = CommandType.StoredProcedure

mycommand.Parameters.Add(New SqlParameter("@motivo", SqlDbType.Char))
mycommand.Parameters.Add(New SqlParameter("@nombre", SqlDbType.Char))
mycommand.Parameters.Add(New SqlParameter("@apellidos", SqlDbType.Char))
mycommand.Parameters.Add(New SqlParameter("@cif", SqlDbType.Char))
mycommand.Parameters.Add(New SqlParameter("@email", SqlDbType.Char))
mycommand.Parameters.Add(New SqlParameter("@cargo", SqlDbType.Char))
mycommand.Parameters.Add(New SqlParameter("@empresa", SqlDbType.Char))
mycommand.Parameters.Add(New SqlParameter("@direccion", SqlDbType.Char))
mycommand.Parameters.Add(New SqlParameter("@poblacion", SqlDbType.Char))
mycommand.Parameters.Add(New SqlParameter("@cp", SqlDbType.Char))
mycommand.Parameters.Add(New SqlParameter("@provincia", SqlDbType.Char))
mycommand.Parameters.Add(New SqlParameter("@pais", SqlDbType.Char))
mycommand.Parameters.Add(New SqlParameter("@telefono", SqlDbType.Char))
mycommand.Parameters.Add(New SqlParameter("@info", SqlDbType.Bit))
mycommand.Parameters.Add(New SqlParameter("@ocupacion", SqlDbType.Char))

mycommand.Parameters("@motivo").Value = motivo
mycommand.Parameters("@nombre").Value = nombre
mycommand.Parameters("@apellidos").Value = apellidos
mycommand.Parameters("@cif").Value = cif
mycommand.Parameters("@email").Value = email
mycommand.Parameters("@cargo").Value = cargo
mycommand.Parameters("@empresa").Value = nombreemp
mycommand.Parameters("@direccion").Value = direccion
mycommand.Parameters("@poblacion").Value = poblacion
mycommand.Parameters("@cp").Value = cp
mycommand.Parameters("@provincia").Value = provincia
mycommand.Parameters("@pais").Value = pais
mycommand.Parameters("@telefono").Value = telefono
mycommand.Parameters("@info").Value = pub
mycommand.Parameters("@ocupacion").Value = actividad