• DİKKAT

    DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
    Altın Üyelik Hakkında Bilgi

Excel Update Etmek sütun Başlıkları

Katılım
19 Mayıs 2013
Mesajlar
34
Excel Vers. ve Dili
2003
Merhaba Arkadaşlar Bizim Birime Günlük Olarak Gelen Bir Excel Dosyamız Var Ben Bu Excel Dosyasını Asp Kod İle veritabanına aktarıyorum sorunum şu birime gelen sütun Başlıklarımda Türkçe Karakterler Var

Örnek İrs. No Burada İ ve boşluk karakterlerinden dolayı veri çekemiyorum bunu asp sayfasıyla update edip örnek a3 e5 sütun başlıklarını otomatik değişebilirmiyim.
 
-excel dosyasını düzenleyebilirsin
-asp kodlarında <% @Language = "VBScript" CODEPAGE="XXXXX" %> değerleriyle oynayabilirsin.
 
Hocam Bununla asp sayfasındaki Türkçe Karakterleri Çözebiliyorum Benim Sorunum Şu.


Excelde Sütun Başlığım İrs. No Bu Şekilde Veriyi Çektiğimde Veriler Gelmiyor Sütun Başlığımın Adını Irsno Yaptığımda Bu Veriler Geliyor Örnek Kodlarımı Aşağıda Veriyorum Hocam.




<%
' EXCEL dosyasýnýn ilk satýrý alan adlarýný gösterir... Bu örnekte alanlar AD, SOYAD, TEL...

abdulkadir = "DBQ=" & Server.MapPath("Kitap1.xls") & "; DRIVER={Microsoft Excel Driver (*.xls)};"

Set abdul = Server.CreateObject("ADODB.Connection")
Set kocer = Server.CreateObject("ADODB.Recordset")
abdul.open abdulkadir


sql="select * from [Sheet$]"
kocer.Open sql, abdul, 1,3
%>
<table border="1" width="91%" id="table1" bordercolor="#000000" cellspacing="0" cellpadding="0" style="border-collapse: collapse">
<tr>
<td><b>Irsaliye No</b></td>
<td><b>Sira No</b></td>

</tr>

<%
do while not kocer.eof
%>

<tr>

<td><%=kocer("İrs. No'")%> </td>
<td><%=kocer("Tahsil Edildi")%> </td>


</tr>

<%
kocer.movenext
loop


kocer.close
Set kocer = nothing
abdul.close
Set abdul = nothing
%>
</table>
 
aşağıdaki kodla recordset nesnesinin alan adlarını kontrol eder misin? TR karakterlerde mi yanlışlık çıkıyor yoksa boşlukta mı? Gene aynı kodları kullanarak meta content encoding bilgisini iso-XXXXX, utf, windows-1264 olarak değiştirip tekrar sonuca bak.
Kod:
foreach (field in kocer.Fields)
{
    response.write(field.Name);
}

Bu şekilde olmazsa,

rs.Fields(0), rs.Fields(1) index bilgisini kullanarak erişmeye çalış
 
Son düzenleme:
Verdiğiniz Kodu Çalıştıramadım Hocam

Kodu Kullanmam Gereken satır aralığını belirtebilirmisiniz.
 
<%
foreach (field in kocer.Fields)

response.write(field.Name);
next
%>


<table border="1" ....
satırından önce yerleştir.

İLAVE: çalışmama sebebi süslü parantezler, aspde block olarak KULLANILMAZ, ona dikkat etmemişim.
 
Microsoft VBScript derleme hatasý hata '800a03ee'

')' gerekli

/excel/ex.asp, satır 15

foreach (field in kocer.Fields)
---------------^

Verdiği Hata Hocam.
 
parantezleri kaldır.
 
Microsoft VBScript derleme hatasý hata '800a0401'

Deyim sonu gerekli

/excel/ex.asp, satır 15

foreach field in kocer.Fields
--------------^

Hocam Yukardaki Kodlara Ekleyerek vermeniz Mümkünmü.
 
son ve umarım DOĞRU hali :p
Kod:
<%
for each field in kocer.Fields
  response.write(field.Name)
next
%>
 
<%
for each field in kocer.Fields
response.write(field.Name);
next
%>
 
ADİrs# NoTELADRESWEBMAIL

Veriler Bu Şekilde Geliyor Hocam Yalnız Noktayı Kullanmadığımdada Hata Alıyorum.
 
benim bir sorum olacak. şimdi excelde bir sütunda olan
A1-eczane@ankara.edu.tr
A2-fizik@ankara.edu.tr
A3-kimya@ankara.edu.tr
A4-biyoloji@ankara.edu.tr diye alanlar var.
B1 hücresine tıkladığımda eczane@ankara.edu.tr. yazmalı. B1 hücresinin köşesinden tutup aşşa doğru sürüklediğimde
B2-de fizik@ankara.edu.tr
B3-kimya@ankara.edu.tr
B4-biyoloji@ankara.edu.tr yazması gerek. yani özetle @ankara.edu.tr her seferinde sabit. ama @işaretinin önündeki sürekli değişkenlik gösteriyor. bunu formülle nasıl yapabilirim. yardımcı olabilir misiniz ??
 
Son düzenleme:
benim bir sorum olacak. şimdi excelde bir sütunda olan
A1-eczane@ankara.edu.tr
A2-fizik@ankara.edu.tr
A3-kimya@ankara.edu.tr
A4-biyoloji@ankara.edu.tr diye alanlar var.
B1 hücresine tıkladığımda eczane@ankara.edu.tr. yazmalı. B1 hücresinin köşesinden tutup aşşa doğru sürüklediğimde
B2-de fizik@ankara.edu.tr
B3-kimya@ankara.edu.tr
B4-biyoloji@ankara.edu.tr yazması gerek. yani özetle @ankara.edu.tr her seferinde sabit. ama @işaretinin önündeki sürekli değişkenlik gösteriyor. bunu formülle nasıl yapabilirim. yardımcı olabilir misiniz ??

lütfen sorunuzu uygun konu başlığı altında, yeni bir soru olarak açın ve forum kurallarını ve alt başlıklarını okuyunuz.
http://www.excel.web.tr/f59/
 
ADİrs# NoTELADRESWEBMAIL
sıkıntının sebebini biliyorduk, doğrulamış olduk.
Şurada bi tırnak hatan varmış
<%=kocer("İrs. No'")%>

son olarak alanlara şu şekilde erişmeyi denedin mi?
<%=kocer(0)%>
<%=kocer(1)%>
 
Teşekkürler Hocam Verilere
<%=kocer(0)%>
<%=kocer(1)%>

Bu Şekilde Ulaşmayı Başardım Çok Teşekkür ederim 7 saatir Bununla Uğaşıyorum Çok Teşekkür ederim.
 
Geri
Üst