ASP - conexion a bbdd correcta?

tengo un libro donde la conexion a base de datos de hace de una manera algo curiosa: primero tngo que un dns del sistema y luego pongo:
set conexion=createObject("ADODB.Connection")
conexcion.open("ej1")
strsql="select...."
set miconexion=conexion.execute(strsql)

entonces esto en local va de lujo, pero ocmo puedo hacer para que funcione en en un servisor, que registros necesito. Gracias.