beengineer
🌱Yeni Üye🌱
- Katılım
- 2 Ağu 2008
- Mesajlar
- 11
- Tepkime puanı
- 0
Merhaba arkadaşlar,netten excele bağlanma kodlarını denedim ancak biçok kez hata verdi,hatanın sebebinide çözemedim birçok farklı yol denememe rağmen.
Kod şu şekilde:
<%
'Değeri sıfır yaptık ve geçici bellekte veri saklanmasını önledik
Response.Expires = 0
'Baglanti nesnesi oluşturduk
Set DB = Server.CreateObject("ADODB.Connection")
DB = "Driver={Microsoft Excel Driver (*.xls)}; DBQ=deneme.xls;" 'Veritabanımızın yerini belirttik
Baglanti.Open DB 'Veritabanımızı açtık
Set r*** = Server.CreateObject("ADODB.Recordset")
strSQL = "Select * From tabloadi"
r***.Open strSQL, Baglanti
'Verileri yazdırıyoruz.
Response.Write ("<table border=1><tr><td>")
Response.Write r***.GetString (, 10, "</tr><td>", "</td></tr><tr><td>", NBSPACE)
%>
özellikle şu son kısmını anlayamadım,yani excelde A1 sütunundaki,B1 sütunudaki bilgileri, A1,B1 diye belirterek çağırmayacak mıyız ,yardımcı olursanız çok sevinirim...
Kod şu şekilde:
<%
'Değeri sıfır yaptık ve geçici bellekte veri saklanmasını önledik
Response.Expires = 0
'Baglanti nesnesi oluşturduk
Set DB = Server.CreateObject("ADODB.Connection")
DB = "Driver={Microsoft Excel Driver (*.xls)}; DBQ=deneme.xls;" 'Veritabanımızın yerini belirttik
Baglanti.Open DB 'Veritabanımızı açtık
Set r*** = Server.CreateObject("ADODB.Recordset")
strSQL = "Select * From tabloadi"
r***.Open strSQL, Baglanti
'Verileri yazdırıyoruz.
Response.Write ("<table border=1><tr><td>")
Response.Write r***.GetString (, 10, "</tr><td>", "</td></tr><tr><td>", NBSPACE)
%>
özellikle şu son kısmını anlayamadım,yani excelde A1 sütunundaki,B1 sütunudaki bilgileri, A1,B1 diye belirterek çağırmayacak mıyız ,yardımcı olursanız çok sevinirim...