Como eu crio um DNS e localizo a base de dados no DNS?
Pois quando estou no ODBC criando o alias teria que selecionar a Base de Dados, mas não aparece nada para selecionar. O que eu faço p/ aparecer o meu banco MySQL lá?

Vc instalou o odbc para Mysql??

eu não utilizo DNS ... faço assim:

<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>

<%
  Set vgdb = server.createobject("adodb.connection")
  vgdb.open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source="&Server.Mappath("BD.mdb")
%>

<%
 Dim SQL
 Dim rst
 Dim Codigo
 Codigo = trim(Request("Codigo"))
 SQL = "Select Produtos.[Codigo], Produtos.[Descricao], Produtos.[Preco] From Produtos Where Produtos.[Codigo] = " & Codigo
 Set rst = server.createobject("adodb.recordset")
 rst.open SQL, vgdb, 1, 1
%>