% set myConnection = CreateObject("ADODB.Connection") myConnection.Open "DSN=BaseSrv; UID=sa;PWD=;" %>