Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 1
  • 2
  • 3
  • 4
  • 5
[ÇÖZÜLDÜ] WebDav ile Bulut Sunucuya Dosya Yükleme
#1
S.a

Yandex Disk Webdav Protokülü ile erişmeye çalışıyorum
çalışan bir örnek bulamadım

biraz denemeler yaptım malesef çözemedim
IdWebDAV1->URL->Host ="https://webdav.yandex.com";
		  IdWebDAV1->URL->Port = 443;
		  IdWebDAV1->URL->Username = "dGhlU2luYW4wMkB5YW5kZXguY29tLnRy";
		  IdWebDAV1->URL->Password = "dGhlU2luYW4hMDI=";
		  IdWebDAV1->Request->ContentType = "text/xml";
		  IdWebDAV1->Request->CharSet = "utf-8";
		  IdWebDAV1->IOHandler = IdSSLIOHandlerSocketOpenSSL1;
		  IdWebDAV1->Request->CustomHeaders->Values["Authorization"] = "Basic dGhlU2luYW4wMkB5YW5kZXguY29tLnRy:dGhlU2luYW4hMDI=";
		  IdWebDAV1->Request->BasicAuthentication = true;
		  IdWebDAV1->Request->Host ="https://webdav.yandex.com";
		  IdWebDAV1->Connect("https://webdav.yandex.com",443) ;
		  IdWebDAV1->DAVPropPatch("https://disk.yandex.com/client/disk/deneme.txt", q, r);
		  r->Position = 0;
		  Memo1->Lines->Text = ReadStringAsCharset(r, IdWebDAV1->Response->CharSet);[
IdSSLIOHandlerSocketOpenSSL1
için libeay32.dll ve ssleay32.dll Dosyalrını indirdim
SSL ayarlarını yaptım
Bu Şekilde yazdım 

Socket Error # 11001
Host not found.
hatasını veriyor
İşin içinden çıkamadım
Yardımlarınız için Allah Razı Olsun


Ek Dosyalar Resimler
   
Cevapla
#2
Host için https yerine http deneyin.
Ağlarsa kablosuz ağlar, gerisi yerel ağlar...
Cevapla
#3
(24-04-2019, Saat: 13:40)engerex Adlı Kullanıcıdan Alıntı: Linkleri Görebilmeniz İçin Üye Olmanız Gerekiyor. Üye Olabilmek İçin Lütfen Buraya Tıklayınız.Host için https yerine http deneyin.

hocam denedim malesef yine aynı hatayı veriyor
Webdav Çalışmasını C++ Builder de yapıyorum
Makul bir ücret Karşılığında Destek Verebilecek arkadaş olursa 
Destek almak isterim
Cevapla
#4
S.a
Webdav ile Bulut Yedekleme 
Sonunda Çözdüm 
Opendrive.com Hesap Açıp bulut Sunucu olarak opendrive.com kullanabilirsiniz
Bilgi Paylaştıkça Çoğalır
İnşallah Faydası Olur
Dosya Yedeklemek için
IdWebDAV1->Request->UserAgent = "Mozilla/5.0 (Windows NT 6.1; WOW64; rv:12.0) Gecko/20100101 Firefox/12.0";
IdWebDAV1->Request->BasicAuthentication = true;
IdWebDAV1->Request->Username = Kullanici_adi ;
IdWebDAV1->Request->Password = Kullanici_Sifre ;
IdWebDAV1->Request->Accept = "*/*";

if ( FileExists(Yerel_Dosya_Ad) )
 {
    IdWebDAV1->Request->CustomHeaders->Clear();
    IdWebDAV1->Request->CustomHeaders->AddValue("Expect","100-continue");
    IdWebDAV1->Request->ContentType = "application/binary";
    IdWebDAV1->Request->ContentLength = Yerel_Dosya_Boyutu;
    TFileStream *src = new TFileStream(Yerel_Dosya_Ad, fmOpenRead);
         __try {
               IdWebDAV1->Put("https://webdav.opendrive.com/" + ExtractFileName(Yerel_Dosya_Ad), src);
               }
__finally {
 delete src;
}

 }
Cevapla
#5
Delphi için de Clever Componentler bu iş için uygundur. Clever componentlere sahip olan arkadaşlar varsa açık kaynak kodu da buradan bakabilirler:
Linkleri Görebilmeniz İçin Üye Olmanız Gerekiyor. Üye Olabilmek İçin Lütfen Buraya Tıklayınız.
Web Site : Linkleri Görebilmeniz İçin Üye Olmanız Gerekiyor. Üye Olabilmek İçin Lütfen Buraya Tıklayınız.
Facebook Page : Linkleri Görebilmeniz İçin Üye Olmanız Gerekiyor. Üye Olabilmek İçin Lütfen Buraya Tıklayınız.
WWW
Cevapla


Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Son Yorum
  ÇÖZÜLDÜ - Veritabanındaki saat alanını düzenleme wiseman 10 244 24-07-2019, Saat: 21:41
Son Yorum: mcuyan
  Çözüldü. Fastreport ta çalışma anında dataset atama cinarbil 2 175 11-07-2019, Saat: 17:55
Son Yorum: cinarbil
  Çözüldü-sql kodu dengesiz çalışıyor sadikacar60 4 321 11-07-2019, Saat: 14:28
Son Yorum: mcuyan
  Çözüldü - FastReport Pivot ve Group birlikte kullanılabilirmi ? adelphiforumz 5 340 05-07-2019, Saat: 14:20
Son Yorum: adelphiforumz
  Dosya Adı ve İçeriğinde Arama Yapma dkadir 3 315 23-06-2019, Saat: 06:53
Son Yorum: dkadir



Konuyu Okuyanlar: 1 Ziyaretçi