Does this do what you need done?:
new = con /. Tooltip[val_,tip_] :> val;
Inspect the first elements and compare:
con[[1]] // FullForm
new[[1]] // FullForm
(*
List[
Rule[Tooltip[101,"Tijuana"],
Tooltip["EUA02","Tijuana River"]],
Rule[Tooltip["EUA01","R\[IAcute]o Unanua, arroyo Alamar, otros"],
Tooltip[101,"Tijuana"]]
]
List[Rule[101,"EUA02"], Rule["EUA01",101]]
*)
