Asp ile Excel Bağlantısı Hakkında;
<%
onurludunya = "DBQ=" & Server.MapPath("staj_listesi.xls") & "; DRIVER={Microsoft Excel Driver (*.xls)};"
Set onur = Server.CreateObject("ADODB.Connection")
Set unurlu = Server.CreateObject("ADODB.Recordset")
onur.open onurludunya
sql="select * from [stajlistesi$]"
unurlu.Open sql, onur, 1,3
%>
<%
do while not unurlu.eof
%>
<%=Ucase(unurlu("ogrenciadisoyadi"))%>
<%=unurlu("sinifi")%>
<%=unurlu("okulno")%>
<%=Ucase(unurlu("anneadi"))%>
<%=Ucase(unurlu("babaadi"))%>
<%=unurlu("tel1")%>
<%
unurlu.movenext
loop
%>
onurludunya = "DBQ=" & Server.MapPath("staj_listesi.xls") & "; DRIVER={Microsoft Excel Driver (*.xls)};"
Set onur = Server.CreateObject("ADODB.Connection")
Set unurlu = Server.CreateObject("ADODB.Recordset")
onur.open onurludunya
sql="select * from [stajlistesi$]"
unurlu.Open sql, onur, 1,3
%>
<%
do while not unurlu.eof
%>
<%=Ucase(unurlu("ogrenciadisoyadi"))%>
<%=unurlu("sinifi")%>
<%=unurlu("okulno")%>
<%=Ucase(unurlu("anneadi"))%>
<%=Ucase(unurlu("babaadi"))%>
<%=unurlu("tel1")%>
<%
unurlu.movenext
loop
%>
