Yeni Kayıt
Konudaki Resimler
|
Hızlı 
Bildirim
Visual Studio 2010 ile XML'den veri almak
Sıcak Fırsatlarda Tıklananlar
Editörün Seçtiği Fırsatlar
Daha Fazla 
Bu Konudaki Kullanıcılar:
Daha Az 
2 Misafir - 2 Masaüstü
Giriş
Mesaj
-
-
Bu konuda bilgisi olan yokmu aceba? -
Şu ara müsait değilim hafta sonu bakmaya çalışırım. -
Buradan İndirin C#
< Bu mesaj bu kişi tarafından değiştirildi nezuk -- 2 Temmuz 2011; 19:25:33 > -
Çok teşekkürler daha yeni indirdim hemen deniyorum,
tekrar tekrar teşekküler -
teşekkürler fakat mümkünse bunun vb.net olarak alabilir miyim visual c# anlamıyorum maalesef 
yaada birbirleri arasında convert etme şansım varmıdır? -
Bu işini görür sanırım. xmlverial("C:\Dosya.xml") olarak kullanabilirsin.
Not: Veridiğin xml dosyası aslında microsoft office excel 2002 XML Spreadsheet türünde bir dosya . yazdığım kod sadece bu tür dosyalar için çalışır.
bu linkte bu tür dosyaların detayını bulabilirsin.http://msdn.microsoft.com/en-us/library/aa140066(office.10).aspx
Public Function XmlVeriAl(ByVal XmlDosya As String) As DataTable
'Verilerin aktarılacağı Data Table nesnelerinin oluşturulması
Dim dtXmlVeri As DataTable = New DataTable("XML Veri"), dtCol As DataColumn, dtrow As DataRow
'Xml Dosyasının Açılması
Dim xmlDoc As XmlDocument = New XmlDocument
xmlDoc.Load(XmlDosya)
' Gerekli olan Sütünların Tabloya Eklenmesi
For A As Integer = 1 To xmlDoc.GetElementsByTagName("ss:Column").Count
dtCol = New DataColumn("Sütun " & A.ToString)
dtXmlVeri.Columns.Add(dtCol)
Next
Dim SatirSayisi As Integer = 0
'Satırların işlenmek üzere Sıraya Alınması
For Each oNode As XmlNode In xmlDoc.GetElementsByTagName("Row")
If oNode.ChildNodes.Count > 6 Then
' ilk satırın başlık satırı olarak kullanılması
If SatirSayisi = 0 Then
For Each node2 As XmlNode In oNode.ChildNodes
dtXmlVeri.Columns(CInt(node2.Attributes("ss:Index").InnerText)).ColumnName = node2.ChildNodes(0).InnerText
Next
Else
dtrow = dtXmlVeri.NewRow
'her Satırdaki Hücrelerin ss:Index Numarasına Göre Sütünlara yerleştirilmesi
For Each node2 As XmlNode In oNode.ChildNodes
dtrow.Item(CInt(node2.Attributes("ss:Index").InnerText)) = node2.ChildNodes(0).InnerText
Next
'Oluşturulan Satırın Tabloya Eklenmesş
dtXmlVeri.Rows.Add(dtrow)
End If
SatirSayisi += 1
End If
Next
'fazlalık Sütunların temizlenmesi
Dim tempColid As Integer = 1
Do While tempColid = 1
For Each col As DataColumn In dtXmlVeri.Columns
If col.ColumnName.Substring(0, 5) = "Sütun" Then
dtXmlVeri.Columns.Remove(col)
tempColid = 1
Exit For
Else
tempColid = 0
End If
Next
Loop
xmlDoc = Nothing
Return dtXmlVeri
< Bu mesaj bu kişi tarafından değiştirildi LaCagot -- 2 Temmuz 2011; 1:34:02 >
-
@nezuk verdiği kod C# icin uygun
@LaCagot verdiği kod VB.net için uygun ve ikisi ile de sorunsuz veri alabildim.
tekrar 2 arkadaşada teşekkürler -
-
linkler malesef çalışmıyor, buna benzer örneği olan varsa paylaşabilirmi?
konsol uygulaması ile sqlserver veritabanına her akşam veri çekmem gerekiyor bu tarz bir örnek lazım olacaktır..
Sayfa:
1
Ip işlemleri
Bu mesaj IP'si ile atılan mesajları ara Bu kullanıcının son IP'si ile atılan mesajları ara Bu mesaj IP'si ile kullanıcı ara Bu kullanıcının son IP'si ile kullanıcı ara
KAPAT X
Bu mesaj IP'si ile atılan mesajları ara Bu kullanıcının son IP'si ile atılan mesajları ara Bu mesaj IP'si ile kullanıcı ara Bu kullanıcının son IP'si ile kullanıcı ara
KAPAT X
