perchè crei una sub


se non la richiami non la vedrai mai

prova semplicemente coosì
codice:
Set conn=Server.CreateObject("ADODB.Connection") 
conn.Open "dsn=sedo;uid=sedodba;pwd=manager;"