Kodları lütfen aşağıdaki butonları kullanarak renklendirin. Örnek: <php> echo "Selam Dünya"; </php>
Yardım
karakter kaldı

Delphi ile TJK at yarışı sitesinden veri almak

Merhaba,
Benim yıllardır nette arayıpta bir türlü çözüme ulaşamadığım TJK at yarışı sitesinden SQL Server 2008 veri tabanına otomatik olarak veri almak istiyorum. Nasıl yapabilirim resimli olarak anlatırsanız sevinirim.
    
+0
-0
Cevaba KatılıyorumKatılmıyorum
Cevap Yaz Yorum Yaz Arşivime Ekle Takip Et

Doğru Cevap

  • ayhan adlı üyenin fotoğrafı
    12 yıl önce yazılmış
    1 cevap - 0 soru
    Delphiden verileri çekip sql'e yazdırabilirsiniz. File->New->Others->Delphi projects->WebServices->WSDL Importer' seçeneğinden http://www.tjk.org/WebService/Bahis.asmx?WSDL
    adresini import edip içindeki fonksiyonlarla istediğiniz verileri çekebilirsiniz
    • beren55 adlı üyenin fotoğrafı beren55
      Bende zaten importtan sonrasını soruyorum. wsdl ile alıyorum sonra ne yapacam SQL a nasıl yazdırıcam ve wsdl den verileri nasıl seçecen ufak bir yardımda bulunursanız o kadar makbule geçerki inanın.
      12 yıl önce yazılmış
    • ayhan adlı üyenin fotoğrafı ayhan
      tjk yetki istiyor eğer kullanıcı adınız ve şifreniz varsa söyleyin siteden veri çekip access'e kaydeden bir örnek yazıp yarın size mail atayım.
      12 yıl önce yazılmış
    • beren55 adlı üyenin fotoğrafı beren55
      Şifreyi TJK arayayım şifre verirlerse size ulaştırim. Peki nasıl yapılıyor acaba
      12 yıl önce yazılmış
    • beren55 adlı üyenin fotoğrafı beren55
      Merhaba,
      TJK dan kimseye ulaşamdım yetki kontrolü gerektirmeyen yerler var oradan deneseniz mümkünse.
      12 yıl önce yazılmış
    • ayhan adlı üyenin fotoğrafı ayhan
      merhaba tjk da açık servis bulamadım şifre istiyor. fakat http://www.webservicex.net/globalweather.asmx?WSDL adresinden il bilgilerini alan bir örnek yazdım. formun üzerinde HTTPRIO1 ,Edit1, Button1,Memo1,XMLDocument1 ve Memo2 nesneleri var. HTTPRIO nesnesinin URL'si http://www.webservicex.net/globalweather.asmx?WSDL olacak diğer özelliklerine dokunmadım. birde http://www.webservicex.net/globalweather.asmx?WSDL yi import etmen lazım.

      unit Unit1;
      
      interface
      
      uses
        Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
        Dialogs, InvokeRegistry, StdCtrls, Rio, SOAPHTTPClient,globalweather,
        xmldom, XMLIntf, msxmldom, XMLDoc;
      
      type
        TForm1 = class(TForm)
          HTTPRIO1: THTTPRIO;
          Edit1: TEdit;
          Button1: TButton;
          Memo1: TMemo;
          XMLDocument1: TXMLDocument;
          Memo2: TMemo;
          procedure Button1Click(Sender: TObject);
        private
          { Private declarations }
        public
          { Public declarations }
        end;
      
      var
        Form1: TForm1;
      
      implementation
      
      {$R *.dfm}
      
      
      procedure XMLOku;
      var
         StartItemNode, ANode : IXMLNode;
         sTitle, sDesc, sLink : widestring;
      begin
         Form1.XMLDocument1.Active:=False;
         Form1.XMLDocument1.FileName := ExtractFilePath(Application.ExeName)+'a.xml';
         Form1.XMLDocument1.Active:=True;
         StartItemNode := Form1.XMLDocument1.DocumentElement.ChildNodes.FindNode('Table');
         ANode := StartItemNode;
         form1.Memo2.Clear;
         form1.Memo2.Lines.Add( UTF8Decode(ANode.ChildNodes['Country'].Text)+' daki iller');
         repeat
           form1.memo2.Lines.Add( UTF8Decode(ANode.ChildNodes['City'].Text));
           ANode := ANode.NextSibling;
         until ANode = nil;
      end;
      
      
      procedure TForm1.Button1Click(Sender: TObject);
       begin
        memo1.Text:=(HTTPRIO1 as GlobalWeatherSoap).GetCitiesByCountry(edit1.Text);
        memo1.Lines.SaveToFile('a.xml');
        XMLOku;
       end;
      
      end.
      
      


      umarım işini görür.
      not:Delphi 2010 da denendi.Delphi 7 de aynı kod çalışmadı.
      12 yıl önce yazılmış

Cevaplar

  • fthkck adlı üyenin fotoğrafı
    12 yıl önce yazılmış
    20 cevap - 6 soru
    Nasıl bir veri almak istiyosun? At yarışlarını kendi veritabanınamı kayıt etmek istiyorsun?
    • beren55 adlı üyenin fotoğrafı beren55
      Öncelikle teşekkürler. Ben TJK sitesinde bülten var ve sitede at ile ilgili her türlü veriyi çekmek istiyorum. http://www.tjk.org/WebService/Bahis.asmx daha önce internettte araştırdım web service ile yukarıdaki adresten çekilir veri tabanı oluşturulur denildi. Ben Sql server 2008 öğrenim seti aldım öğrenmek için ama orada web service yok. Beceremedim yardımcı olursanız sevinirim.
      12 yıl önce yazılmış
    • fthkck adlı üyenin fotoğrafı fthkck
      Web servisler XML tipinde başka bir sistemin datalarına ulaşmanı sağlar, eğer Delphide webservisleri işleyip veritabanına kayıt etmek istiyorsan webservislerin Delphide kullanımına bakman lazım arama motorlarından “Delphi web service kullanımı” diye yazarsan bulabilirsin.
      12 yıl önce yazılmış
  • tan_by adlı üyenin fotoğrafı
    10 yıl önce yazılmış
    1 cevap - 2 soru
    merhaba,
    At yarışı tahmin programı yapacağım, bunun için günlük koşuları ve koşudaki atların bilgilerini almam gerekiyor fakat web servisten gerekli bilgileri bulamadım.bazı servislerde kullanıcı adı ve şifre istiyor bu bilgileri nereden bulabilirim yardımcı olabilecek var mı?