Se le variabili le definisci fuori dalla sub non serve passarle.

Dim objrs, ObjConn

Roby