Not : EXCEL dosyasının ilk satırı alan adlarını gösterir.

<%
Response.Expires = 0 

Set DB = Server.CreateObject("ADODB.Connection") 
DB = "Driver={Microsoft Excel Driver (*.xls)}; DBQ=exceldosyaadi.xls;" 
BAG.Open DB  

Set RS = Server.CreateObject("ADODB.Recordset") 
SQL = "Select * From tabloadi" 
RS.Open SQL, BAG

%>
gibi şeklinden bağlanabilirsin.