HTML Formundan Excel'e Veri Kaydetme

Katılım
5 Şubat 2007
Mesajlar
1
Excel Vers. ve Dili
Ofice Excel 2003,Türkçe
bu ekli dosyaları nasıl alabiliriz Haluk Bey
 
Katılım
8 Şubat 2007
Mesajlar
1
Excel Vers. ve Dili
xp
html'e excelden veri nasıl alırım

Haluk hocam html'e excelden veri nasıl alırım bana yardımcı olurmusunuz :yardim::roll:
 
Katılım
6 Şubat 2007
Mesajlar
8
Excel Vers. ve Dili
Ofiice xp
Haluk Hocam, verdiğiniz hazine kıymetindeki bilgiler için teşekkür ederim.

Bende buna yakın bir şey sormak istiyorum.
İnternet explorer (html)den bazı veriler girilerek excel çalıştırılacak ve sonucu yine ie de gösterecek yapabilirmiyiz.

Bunu daha önce anlattınız mı bilmiyorum.
şimdiden teşekkür ederim.
 
Katılım
29 Mart 2005
Mesajlar
84
Excel Vers. ve Dili
excel 2003
Sayın Haluk Bey!

Verdiğiniz örnekler çok güzel ama ben çalıştıramadım.

mynet.com dan aldığım web alanına bu xls dosyayı ve htm dosyasını yükledim.

sonra i.explorer çalıştırarak sayfaya ulaşabiliyorum.
Fakat kayıt girdikten sonra ulaşmak istediğiniz sayfa yok diyor ve excel dosyaya kayıt yapmıyor.

Birde acaba o kodlarla bu xls dosyanın o server da var olup olmadığını kontrol edebilirmiyiz?

teşekkür ederim
 
Katılım
13 Nisan 2005
Mesajlar
45
Excel Vers. ve Dili
Excel 2003
SÜPER

Arkadaşlar gerçekten süper...Hepinize sonsuz teşekkürler... Yaptığınız işler tam bir beyin fırtınası yaşatıyor...

Benim de küçük bi problemim var ama bi türlü halledemedim...
ASP ve PHP ile problemin çözümü basit ama dostum illa html formuna istiyor datalarını freehost kullandığı için asp ve php desteği yok.

Problem temel olarak şu;
Bir excel dosyası var ve içinde dataları var. Belgesi ile html belgesi arasında bir bağ kurup çağrı yapmak istiyor.Yani Tc kimlik nosunu yaptığında sadece tc kimlik nosunu yazdığı kişinin bilgilerinin gelmesini istiyor...
Ben tek tek web sayfası ile hallettim ama beğenilmedi... Bir de siz ilgilenirseniz... Eminim yine fırtınalar esecek...

Çalışma örneği ektedir...
 
Katılım
13 Nisan 2005
Mesajlar
45
Excel Vers. ve Dili
Excel 2003
HTML formu ile excel sorgusu

Günlerdir bekliyorum belki bir yorum gelir diye ama yok... "Kel, kör, kendi işini kendin gör" misali sayın Haluk'un kodlarını biraz değiştirerek Excel belgesindeki dataları HTML formuna şartlı sorgu ile getirmeye çalıştım...Bir de nette çalışsa tam süper olacak :)... İnanıyorum ki aynı tür bi sorguyu nette çalıştırmanında bir yolu vardır... Ama ben şimdilik bulamadım....

C:\DATA\ klasörüne atınız... denendi... kullanılmaya devam ediliyor...
 
Katılım
22 Aralık 2006
Mesajlar
8
Excel Vers. ve Dili
excell 2003 türkçe
nette çalıştırmayı bende bulamadım lütfen bir çare....
 
Katılım
24 Şubat 2006
Mesajlar
265
Excel Vers. ve Dili
xp 2003 Türkçe
klasörü servere koydum.içerisinde xls. sayfası da var. Yolunu da şöyle yazdım
Set xlBook = xlApp.Workbooks.open("ftp://xxxxxx@ftp.meb.k12.tr/TestFolder/TestDataBase.xls")
ancak şöyle bir hata oluşuyor.
 
Katılım
13 Nisan 2005
Mesajlar
45
Excel Vers. ve Dili
Excel 2003
html to excel

Galiba hala nette excel belgesinden veri çekme işi için bi kod geliştirilemedi...
php ve asp ile oluyor ama script veya html ile imkansız sanırım...
 
Katılım
17 Temmuz 2006
Mesajlar
8
ben kendi oluşturduğum form sayfasını bir türlü exele atmayı başaramadım yardımcı olursanız sevinirim..
 
Katılım
20 Kasım 2005
Mesajlar
27
Günlerdir bekliyorum belki bir yorum gelir diye ama yok... "Kel, kör, kendi işini kendin gör" misali sayın Haluk'un kodlarını biraz değiştirerek Excel belgesindeki dataları HTML formuna şartlı sorgu ile getirmeye çalıştım...Bir de nette çalışsa tam süper olacak :)... İnanıyorum ki aynı tür bi sorguyu nette çalıştırmanında bir yolu vardır... Ama ben şimdilik bulamadım....

C:\DATA\ klasörüne atınız... denendi... kullanılmaya devam ediliyor...
Merhaba hocam
Aylardan beri sizin çalıştığınız konuda arayış içindeydim.
Bizim okul sitesine de böyle bir uygulamaya ihtiyaç var.
DATA dosyanız masa üstünde güzel çalışıyor.daha web den denemedim. İnşallah güzel çalışırda rüyalarım gerçek olur.
 
Katılım
20 Kasım 2005
Mesajlar
27
Malesef olmadı
Sanırım bağlantı kodlarında hata yapıyoruz.
Access mdb dosyasıyla da aynı işi yaptım olmadı.
kodlar şöyle yazdım acaba yanlışlık burdamı?

;Data Source=ftp:\\canakkalempmem.k12.tr\fpdb\PERSONEL.mdb;Jet OLEDB: Database Password=1234;"...

FrontPage ile açılan sorgu formu asp uzantılı olarak siteye yerleştirdim.mdb dosyasınıda yine "fpdb" klasörü içine yerleştirdim.

çalışan formun ismi: PERSONEL.asp
mdb dosyası ismi: PERSONEL.mdb

bilgsayar masaüstünde gayet güzel çalışıyor. Web de çalışmıyor. Acaba nerde hatayapıyorum. Ayrıca IE active-x i etkinleştirmeyi her defasında soruyor.
Görüşlerinize ihtiyacım var. Yardımınızı beklerim.
Herkese Çanakkale den sevgiler Saygılar.
 
Son düzenleme:
Katılım
14 Şubat 2006
Mesajlar
3,426
Excel Vers. ve Dili
(Excel 2016 - İngilizce)
Altın Üyelik Bitiş Tarihi
30-11-2022
Web konusunda açıkcası fazla bilgim yok.İşin içinde birde asp olunca, bu konunun uzmanları mutlaka yardımcı olacaktır.
 
Katılım
25 Aralık 2005
Mesajlar
4,160
Excel Vers. ve Dili
MS Office 2010 Pro Türkçe
Malesef olmadı
Sanırım bağlantı kodlarında hata yapıyoruz.
Access mdb dosyasıyla da aynı işi yaptım olmadı.
kodlar şöyle yazdım acaba yanlışlık burdamı?




FrontPage ile açılan sorgu formu asp uzantılı olarak siteye yerleştirdim.mdb dosyasınıda yine "fpdb" klasörü içine yerleştirdim.

çalışan formun ismi: PERSONEL.asp
mdb dosyası ismi: PERSONEL.mdb

bilgsayar masaüstünde gayet güzel çalışıyor. Web de çalışmıyor. Acaba nerde hatayapıyorum. Ayrıca IE active-x i etkinleştirmeyi her defasında soruyor.
Görüşlerinize ihtiyacım var. Yardımınızı beklerim.
Herkese Çanakkale den sevgiler Saygılar.
Sayın yanar17, siteniz eğer meb nin serverinde ise sanırım asp desteği yok ve oradaki mdb dosyasına ulaşamazsınız. Eğer asp destekli bir serverda ise ve html formunuz da aynı sitenin içinde ise o zaman:

Kod:
<% 
[B]Set conn=Server.CreateObject("ADODB.Connection")
Set rs=Server.CreateObject("ADODB.Recordset")
conn.Provider="Microsoft.Jet.OLEDB.4.0"
conn.Open Server.MapPath("\db\db.mdb")[/B]
id=Request.QueryString("id")
sql="SELECT tblMesaj.*, tblUyeler.*, tblMesaj.MesajTarihi FROM tblUyeler INNER JOIN tblMesaj ON tblUyeler.UyeID = tblMesaj.MesajUser WHERE tblMesaj.BaslikID=" & CInt(id) & " ORDER BY tblMesaj.MesajTarihi DESC"
rs.Open sql, conn,3,1
%>
Koyu olan kodlar mdb yi açıyor. Daha sonrakiler ise sql çalıştırıp veri çekiyor.

İyi çalışmalar
 
Katılım
20 Kasım 2005
Mesajlar
27
Sayın yanar17, siteniz eğer meb nin serverinde ise sanırım asp desteği yok ve oradaki mdb dosyasına ulaşamazsınız. Eğer asp destekli bir serverda ise ve html formunuz da aynı ......................... İyi çalışmalar
Sayın modalı ilginize teşekkür ederim.
çalışmalarımı bu doğrultuda yürütüp en kısa zamanda durumdan bilgi vereceğim. Ripek arkadaşıma da ilgilerinden dolayı teşekkür ederim.
Çanakkale'den Sevgiler selamlar.
 
Katılım
27 Şubat 2007
Mesajlar
98
Excel Vers. ve Dili
excel 2002
database konusunu anlamad&#305;&#287;&#305;m i&#231;in soruyorum bu kodlar&#305; nerde ve nas&#305;l kullan&#305;cam benim istedi&#287;im b&#246;yle bir &#231;al&#305;&#351;ma.

yard&#305;mc&#305; olursan&#305;z sevinirim.
 
Katılım
4 Eylül 2007
Mesajlar
11
Excel Vers. ve Dili
office exel 2003 sp2
Kolay gelsin .. Html den Excel e veri aktarma

Arkadaşlar Haluk Bey'in kodlarından faydalanarak böyle bir sayfa yaptım amam sanırım bir yerlerde bir yanlışlık var.. Yardımcı olursanız sevinirim..
Kod:
<html lang=Tr>

<title>Test Form</title>

<head>
	<meta http-equiv=Content-Type content="text/html; charset=Windows-1254">

	<style>
		body {font:10pt tahoma;}
		table {font:10pt tahoma;}
	</style>

	<script language="VBscript">
		Dim adoCn
		Dim adoRs
		Dim adoFld
		Dim strQuery
		Dim strResults

		Const adClipString = 2
		Const strColDelim = "</td><td>"
		Const strRowDelim = "</td></tr><tr><td>"

		Set adoCn = CreateObject("ADODB.Connection")
		Set adoRs = CreateObject("ADODB.Recordset")
		With adoCn
			.Provider = "Microsoft.Jet.OLEDB.4.0"
			.ConnectionString = "Data Source=C:\Users\latif\Desktop\Yeni Klasör\excel_web\Data.xls; Extended Properties=Excel 8.0;"
			.Open
		End With

		strQuery = "SELECT * FROM [Data$] ORDER BY Ad"
		With adoRs
			Set .ActiveConnection = adoCn
			.Open strQuery
		End With
	</script>

</head>

<body>
<u>Veri Girişi</u>:
<script language="VBscript">
	Sub SendData()
		Set xlApp = CreateObject("Excel.Application")
		xlApp.Visible = False
		Set xlBook = xlApp.Workbooks.open("C:\Users\latif\Desktop\Yeni Klasör\excel_web\Data.xls")
		Set Sh=xlBook.sheets("Sayfa1")
		NoA = Sh.cells(a65536).end(3).row + 1
		Sh.cells(NoA, 1) = NoA - 1
		Sh.cells(NoA, 2) = document.veriler.urunno.value
		Sh.cells(NoA, 3) = document.veriler.kalipno.value
		Sh.cells(NoA, 4) = document.veriler.siparis.value
		Sh.cells(NoA, 5) = document.veriler.altyapimci.value
		Sh.cells(NoA, 6) = document.veriler.irsaliyeno.value
		Sh.cells(NoA, 7) = document.veriler.tarih.value
		Sh.cells(NoA, 8) = document.koliicadedi.value
		Sh.cells(NoA, 9) = document.paletkoliadedi.value
		Sh.cells(NoA, 10) = document.tampaletadedi.value
		Sh.cells(NoA, 11) = document.yarimpaletkoliadedi.value
		Sh.cells(NoA, 12) = document.adres.value
		
		xlBook.save
		xlBook.close
		xlApp.quit
		Set xlBook = Nothing
		Set xlApp = Nothing
	End Sub
</script> 

<form name="veriler" enctype="text/plain">
	<table border="0" cellspacing="0" cellpadding="4" width="90%">
		<tr>
			<td width="15%"><div align="right">Ürün No :</div></td>
			<td width="35%"><input type="text" name="urunno" size="30"></td>
			<td width="15%"><div align="right">Tarih :</div></td>
			<td width="35%"><input type="text" name="tarih" size="30"></td>
		</tr>
		<tr>
			<td width="15%"><div align="right">Kalıp No :</div></td>
			<td width="35%"><input type="text" name="kalipno" size="30"></td>
			<td width="15%"><div align="right">Koli İç Adedi :</div></td>
			<td width="35%"><input type="text" name="koliicadedi" size="30"></td>
		</tr>
		<tr>
			<td width="15%"><div align="right">Sipariş No :</div></td>
			<td width="35%"><input type="text" name="siparisno" size="30"></td>
			<td width="15%"><div align="right">Palet Koli Adedi :</div></td>
			<td width="35%"><input type="text" name="paletkoliadedi" size="30"></td>
			<tr>
			<td width="15%"><div align="right">Alt Yapımcı Firma :</div></td>
			<td width="35%"><input type="text" name="altyapimci" size="30"></td>
			<td width="15%"><div align="right">Tam Palet Adedi :</div></td>
			<td width="35%"><input type="text" name="tampaletadedi" size="30"></td>
		</tr>
			<tr>
			<td width="15%"><div align="right">İrsaliye No :</div></td>
			<td width="35%"><input type="text" name="irsaliyeno" size="30"></td>
			<td width="15%"><div align="right">Yarım Palet Koli Adedi :</div></td>
			<td width="35%"><input type="text" name="yarimpaletkoliadedi" size="30"></td>
		</tr>
		<tr>
			<td></td>
			<td></td>
			<td width="15%"><div align="right">Adres :</div></td>
			<td width="35%"><input type="text" name="adres" size="30"></td>
		</tr>

		
	</table><br>
	<table cellpadding="3" cellspacing="0">
			<tr>
			<td><input type="submit" name="submit" value=" Kaydet " onClick="SendData()"></td>
			<td><input type="submit" name="submit" value=" Sorgula " onClick=""></td>
			<td><input type="submit" name="submit" value=" Temizle " onClick=""></td>
			</tr>
	</table><br>
<u>Veri Tabanı</u>:






	<table cellpadding="3" cellspacing="0" 
		style="border:1px solid silver;">
		<tr>
			<td rowspan="<%= adoRs.RecordCount + 2 %>">
			</td>
		</tr>
		<tr>
			
		<script language="VBscript">
			For Each adoFld in adoRs.Fields
				document.Write "<td style=""border-bottom:1px solid silver;"">" & adoFld.Name & "</td>"
			Next
		</script>
			
		</tr>			
		<tr>
			<td>
			<script language="VBscript">
				strResults = adoRs.GetString(adClipString,adoRs.RecordCount, strColDelim, strRowDelim)
				strResults = Left(strResults, InStrRev(strResults,"<tr><td>") - 1)
				document.Write strResults
				Set adoCn = nothing
				Set adoRs = nothing
			</script>
		</tr>
	</table>
</body>
</html>
veri tabanı olarak kullandığım Excel kitabı ve html sayfası ektedir.
 
Katılım
13 Nisan 2005
Mesajlar
45
Excel Vers. ve Dili
Excel 2003
Merhaba hocam
Aylardan beri sizin çalıştığınız konuda arayış içindeydim.
Bizim okul sitesine de böyle bir uygulamaya ihtiyaç var.
DATA dosyanız masa üstünde güzel çalışıyor.daha web den denemedim. İnşallah güzel çalışırda rüyalarım gerçek olur.
Değerli Yanar17 !
Öncelikle Çanakkale ye selamlar, Sevgiler...Ünversite Yıllarım geçti Çanakkale de. O zamanlar Trakya Ünv. bağlıydı.
Neyse gelelim probleme. Çözüm asp, MySqL, SQL, php, ile kolay. Ama meb serverları bu dil kodlamalarına geçit vermiyor. Sadece html ve bir yere kadar da java scriptlere... Uzun arayışlardan sonra şöyle bir sistem geliştirdim incelersen ve işine yararsa çok sevinirim... Link http://excel.web.tr/showthread.php?p=267754#post267754
 
Katılım
13 Nisan 2005
Mesajlar
45
Excel Vers. ve Dili
Excel 2003
Arkadaşlar Haluk Bey'in kodlarından faydalanarak böyle bir sayfa yaptım amam sanırım bir yerlerde bir yanlışlık var.. Yardımcı olursanız sevinirim..

veri tabanı olarak kullandığım Excel kitabı ve html sayfası ektedir.
Değerli Iseker !
Haluk Beyin Kodları ile benzer bir çalışmam olmuştu. Dosyanızı indirdim. Bir kaç yerinde küçük hatalar vardı. Örneğin sayfa adı "Data" olarak kalmış. Ama tümünü inceleyemedim. Yerine kolayca düzenleyebileceğiniz komplike bir çalışma gönderiyorum. Umarım işinize yarar..
Dosyaları C:\2008_web_evrak\ klasörüne çıkartırsanız çalışacaktır. Kendi formunuza uydurmak için ise html kodlarını ve A sütünuna dokunmamak şarı ile excel belgesini düzenleyebilirsiniz... Kolay gelsin..
 
Üst