codice:
  strDSN = "DSN=nomeDSN"
  Set conn = Server.CreateObject("ADODB.Connection")
  conn.Open strDSN