Clomosy | Forum : XML VERİLERİNİ AYIRMA https://forum.clomosy.com.tr/ Copyright (c) 2006-2013 Web Wiz Forums - All Rights Reserved. Mon, 04 May 2026 08:57:47 +0000 Fri, 25 Jul 2025 11:51:21 +0000 http://blogs.law.harvard.edu/tech/rss Web Wiz Forums 12.07 360 https://forum.clomosy.com.tr/RSS_post_feed.asp?TID=1108 <![CDATA[Clomosy | Forum]]> https://forum.clomosy.com.tr/forum_images/logo.png https://forum.clomosy.com.tr/ <![CDATA[XML VERİLERİNİ AYIRMA : Tamamdır. Tekrar hata alırsan...]]> https://forum.clomosy.com.tr/forum_posts.asp?TID=1108&PID=2364#2364 Yazar: Emr.Erkmn
Konu: 1108
Gönderim Zamanı: 25 Temmuz 2025 Saat 11:51

Tamamdır. Tekrar hata alırsan paylaşırsın bizimle. 
İyi çalışmalar]]> Fri, 25 Jul 2025 11:51:21 +0000 https://forum.clomosy.com.tr/forum_posts.asp?TID=1108&PID=2364#2364 <![CDATA[XML VERİLERİNİ AYIRMA : void description_bul{ mevcut_xml_description...]]> https://forum.clomosy.com.tr/forum_posts.asp?TID=1108&PID=2334#2334 Yazar: Ahmet_27
Konu: 1108
Gönderim Zamanı: 24 Temmuz 2025 Saat 12:39

void description_bul
{
  mevcut_xml_description = gelen_xml;
  Delete(mevcut_xml_description, 1, 550);
//  ShowMessage(mevcut_xml);
  description_index_baslangic = Pos('description', mevcut_xml_description);
//  ShowMessage(title_index_baslangic);
  

  
  Delete(mevcut_xml_description, 1, description_index_baslangic + 11);
  
//  ShowMessage(mevcut_xml);
  
  description_index_son = Pos('description', mevcut_xml_description);
//  ShowMessage(title_index_son);
  
  nihai_description = Copy(mevcut_xml_description, 1, description_index_son-3)
  
  
      while (Pos('"', nihai_description) <> 0)
    {
    cift_tirnak_index = Pos('"', nihai_description);
    Delete(nihai_description, cift_tirnak_index, 1);
    }


  nihai_description = Trim(nihai_description);
  

  
}

void description_bul2
{

    // 2. DESCRİPTİON
  
    description_index_baslangic = Pos('description', mevcut_xml_description);
    Delete(mevcut_xml_description, 1, description_index_baslangic + 11);
    description_index_baslangic = Pos('description', mevcut_xml_description);
    Delete(mevcut_xml_description, 1, description_index_baslangic + 11);
    description_index_baslangic = Pos('description', mevcut_xml_description);
    nihai_description2 = Copy(mevcut_xml_description, 1, description_index_baslangic-3)



      while (Pos('"', nihai_description2) <> 0)
    {
    cift_tirnak_index = Pos('"', nihai_description2);
    Delete(nihai_description2, cift_tirnak_index, 1);
    }
  
    nihai_description2 = Trim(nihai_description2);
  
  
  
  // 3. DESCRİPTİON
  
    description_index_baslangic = Pos('description', mevcut_xml_description);
    Delete(mevcut_xml_description, 1, description_index_baslangic + 11);
    description_index_baslangic = Pos('description', mevcut_xml_description);
    Delete(mevcut_xml_description, 1, description_index_baslangic + 11);
    description_index_baslangic = Pos('description', mevcut_xml_description);
    nihai_description3 = Copy(mevcut_xml_description, 1, description_index_baslangic-3)


  
      while (Pos('"', nihai_description3) <> 0)
    {
    cift_tirnak_index = Pos('"', nihai_description3);
    Delete(nihai_description3, cift_tirnak_index, 1);
    }
  
    nihai_description3 = Trim(nihai_description3);
    
    
    
    
  // 4. DESCRİPTİON
  
    description_index_baslangic = Pos('description', mevcut_xml_description);
    Delete(mevcut_xml_description, 1, description_index_baslangic + 11);
    description_index_baslangic = Pos('description', mevcut_xml_description);
    Delete(mevcut_xml_description, 1, description_index_baslangic + 11);
    description_index_baslangic = Pos('description', mevcut_xml_description);
    nihai_description4 = Copy(mevcut_xml_description, 1, description_index_baslangic-3)


      while (Pos('"', nihai_description4) <> 0)
    {
    cift_tirnak_index = Pos('"', nihai_description4);
    Delete(nihai_description4, cift_tirnak_index, 1);
    }
  
  
    nihai_description4 = Trim(nihai_description4);
    
    
  // 5. DESCRİPTİON
  
    description_index_baslangic = Pos('description', mevcut_xml_description);
    Delete(mevcut_xml_description, 1, description_index_baslangic + 11);
    description_index_baslangic = Pos('description', mevcut_xml_description);
    Delete(mevcut_xml_description, 1, description_index_baslangic + 11);
    description_index_baslangic = Pos('description', mevcut_xml_description);
    nihai_description5 = Copy(mevcut_xml_description, 1, description_index_baslangic-3)


      while (Pos('"', nihai_description5) <> 0)
    {
    cift_tirnak_index = Pos('"', nihai_description5);
    Delete(nihai_description5, cift_tirnak_index, 1);
    }
  
    nihai_description5 = Trim(nihai_description5);
    
    
  // 6. DESCRİPTİON
  
    description_index_baslangic = Pos('description', mevcut_xml_description);
    Delete(mevcut_xml_description, 1, description_index_baslangic + 11);
    description_index_baslangic = Pos('description', mevcut_xml_description);
    Delete(mevcut_xml_description, 1, description_index_baslangic + 11);
    description_index_baslangic = Pos('description', mevcut_xml_description);
    nihai_description6 = Copy(mevcut_xml_description, 1, description_index_baslangic-3)


      while (Pos('"', nihai_description6) <> 0)
    {
    cift_tirnak_index = Pos('"', nihai_description6);
    Delete(nihai_description6, cift_tirnak_index, 1);
    }
  
    nihai_description6 = Trim(nihai_description6);
    
    
  // 7. DESCRİPTİON
  
    description_index_baslangic = Pos('description', mevcut_xml_description);
    Delete(mevcut_xml_description, 1, description_index_baslangic + 11);
    description_index_baslangic = Pos('description', mevcut_xml_description);
    Delete(mevcut_xml_description, 1, description_index_baslangic + 11);
    description_index_baslangic = Pos('description', mevcut_xml_description);
    nihai_description7 = Copy(mevcut_xml_description, 1, description_index_baslangic-3)


      while (Pos('"', nihai_description7) <> 0)
    {
    cift_tirnak_index = Pos('"', nihai_description7);
    Delete(nihai_description7, cift_tirnak_index, 1);
    }
  
    nihai_description7 = Trim(nihai_description7);
    
    
    
  // 8. DESCRİPTİON
  
    description_index_baslangic = Pos('description', mevcut_xml_description);
    Delete(mevcut_xml_description, 1, description_index_baslangic + 11);
    description_index_baslangic = Pos('description', mevcut_xml_description);
    Delete(mevcut_xml_description, 1, description_index_baslangic + 11);
    description_index_baslangic = Pos('description', mevcut_xml_description);
    nihai_description8 = Copy(mevcut_xml_description, 1, description_index_baslangic-3)


      while (Pos('"', nihai_description8) <> 0)
    {
    cift_tirnak_index = Pos('"', nihai_description8);
    Delete(nihai_description8, cift_tirnak_index, 1);
    }
  
    nihai_description8 = Trim(nihai_description8);
    
    
    
  // 9. DESCRİPTİON
  
    description_index_baslangic = Pos('description', mevcut_xml_description);
    Delete(mevcut_xml_description, 1, description_index_baslangic + 11);
    description_index_baslangic = Pos('description', mevcut_xml_description);
    Delete(mevcut_xml_description, 1, description_index_baslangic + 11);
    description_index_baslangic = Pos('description', mevcut_xml_description);
    nihai_description9 = Copy(mevcut_xml_description, 1, description_index_baslangic-3)


      while (Pos('"', nihai_description9) <> 0)
    {
    cift_tirnak_index = Pos('"', nihai_description9);
    Delete(nihai_description9, cift_tirnak_index, 1);
    }
  
    nihai_description9 = Trim(nihai_description9);
    
    
    
    
  // 10. DESCRİPTİON
  
    description_index_baslangic = Pos('description', mevcut_xml_description);
    Delete(mevcut_xml_description, 1, description_index_baslangic + 11);
    description_index_baslangic = Pos('description', mevcut_xml_description);
    Delete(mevcut_xml_description, 1, description_index_baslangic + 11);
    description_index_baslangic = Pos('description', mevcut_xml_description);
    nihai_description10 = Copy(mevcut_xml_description, 1, description_index_baslangic-3)


      while (Pos('"', nihai_description10) <> 0)
    {
    cift_tirnak_index = Pos('"', nihai_description10);
    Delete(nihai_description10, cift_tirnak_index, 1);
    }
  
    nihai_description10 = Trim(nihai_description10);


  
}

şu algoritma ile ayırdım. sadece bu xml'e özel bir ayırma şekli ve yani dinamik bir şey değil ama işimi gördü şimdilik ileride patlamazsa.
]]> Thu, 24 Jul 2025 12:39:44 +0000 https://forum.clomosy.com.tr/forum_posts.asp?TID=1108&PID=2334#2334 <![CDATA[XML VERİLERİNİ AYIRMA : Merhaba Ahmet,XML içindeki &lt;title&gt;...]]> https://forum.clomosy.com.tr/forum_posts.asp?TID=1108&PID=2330#2330 Yazar: Emr.Erkmn
Konu: 1108
Gönderim Zamanı: 24 Temmuz 2025 Saat 11:56

Merhaba Ahmet, 

XML içindeki <title> ve <description> etiketlerinin verilerini ayıklamak istiyorsan.. Clomosy'nin TclStringList veya TclArrayString gibi yapılarıyla bunu yapabilirsin.

İyi çalışmalar. 

]]> Thu, 24 Jul 2025 11:56:11 +0000 https://forum.clomosy.com.tr/forum_posts.asp?TID=1108&PID=2330#2330 <![CDATA[XML VERİLERİNİ AYIRMA : Internetten XML verisi çektim....]]> https://forum.clomosy.com.tr/forum_posts.asp?TID=1108&PID=2272#2272 Yazar: Ahmet_27
Konu: 1108
Gönderim Zamanı: 18 Temmuz 2025 Saat 16:57

Internetten XML verisi çektim. Bu XML Verisini nasil ayiracagim?

<title> ....................<title>
<description> ................<description>
<title> ....................<title>
<description> ................<description>
<title> ....................<title>
<description> ................<description>
<title> ....................<title>
<description> ................<description>

böyle veri geliyor mesela
tüm title'lari bir title dizisine almak istiyorum içindeki verileri sirayla]]> Fri, 18 Jul 2025 16:57:14 +0000 https://forum.clomosy.com.tr/forum_posts.asp?TID=1108&PID=2272#2272