vb.net ile ortam klasöründe resim seçtirme nasıl yapılır?

Durum
Üzgünüz bu konu cevaplar için kapatılmıştır...
N

nalannn

Yeni üye
27 Mar 2016
5
0
merhaba arkadaşlar benim sorunum şu bir otomasyon yazıyorum bu otomasyon wp de hazırlanmış siteye post ekliyor.resimleri ftp den upload ediyorum ve ortam klasörüne diyiim import ettiriyorum. fakat eklenen posta resim seçtiremiyorum.programdan eklenen resim ile ortam dosyasındaki resimleri karşılaştırıp seçtirmem lazım nasıl yapabilirim?

ortam dosyasındaki birinci resim için kaynak kodu;

<li tabindex="0" role="checkbox" aria-label="reklam1" aria-checked="false" data-id="1311" class="attachment save-ready-details">
<div class="attachment-preview js--select-attachment type-image subtype-png landscape">
<div class="thumbnail">

<div class="centered">

<img src="resim yolu" draggable="false" alt=""></div>

</div>

</div>

<button type="button" class="check" tabindex="-1"><span class="media-modal-icon"></span><span class="screen-reader-text">Seçimi kaldır</span></button>


</li>

chrome üzerinde class="attachment save-ready-details" kısmını "attachment save-ready-details details selected" yaptığımda resim seçilmiş oluyor.

Dim doc As HtmlElementCollection = WebBrowser1.do(c)ument.All

For Each element As HtmlElement In doc
If element.GetAttribute("classname").Contains("attachment save-ready") Then

element.SetAttribute("classname", "attachment save-ready details selected ")
End If
Next
kodu ile bütün resimleri seçtirebildim şuan tek sorunum istediğim resimi seçtirmek olarak kaldı :/
NOT: data-id her resimde gelişi güzel değişmekte aria-label ile belki karşılaştırma yaptırabilirim ama nasıl yapabilirim bilmiyorum.yardımlarınızı bekliyorum şimdiden çok çok teşekkürler..
 
Moderatör tarafında düzenlendi:
Tarihe göre sırala Oylara göre sırala
N

nalannn

Yeni üye
27 Mar 2016
5
0
Dim dataid As Integer
Dim doc As HtmlElementCollection = WebBrowser1.do(c)ument.All
For Each element As HtmlElement In doc
If element.GetAttribute("classname").Contains("attachment save-ready") Then
ListBox1.Items.Add(element.GetAttribute("data-id"))
dataid = ListBox1.Items(0).ToString
End If
Next
WebBrowser1.Refres(h)
cls.Bekle(15)

For Each element As HtmlElement In doc
If element.GetAttribute("classname").Contains("attachment save-ready") Then
If element.GetAttribute("data-id") = ListBox1.Items(0).ToString + 1 Then
element.InvokeMember("click")
End If
End If
If element.GetAttribute("classname").Contains("button media-button button-primary button-large media-button-select") Then
element.InvokeMember("click")
End If
Next

kodları ile istediğim işlemi yaptırabildim.burada yazmadığım ftp den attığım dosyaları add from server eklentisini program içerisinde çalıştırarak ortam klasörüne düşmesini sağladım.benden sonra işine yarayan olursa diye çözümü burada paylaşıyorum zira forumlardan gram destek gelmiyor ,belki çok sonra. :)
 
Oyla 0 Downvote
Durum
Üzgünüz bu konu cevaplar için kapatılmıştır...
Üst

Turkhackteam.org internet sitesi 5651 sayılı kanun’un 2. maddesinin 1. fıkrasının m) bendi ile aynı kanunun 5. maddesi kapsamında "Yer Sağlayıcı" konumundadır. İçerikler ön onay olmaksızın tamamen kullanıcılar tarafından oluşturulmaktadır. Turkhackteam.org; Yer sağlayıcı olarak, kullanıcılar tarafından oluşturulan içeriği ya da hukuka aykırı paylaşımı kontrol etmekle ya da araştırmakla yükümlü değildir. Türkhackteam saldırı timleri Türk sitelerine hiçbir zararlı faaliyette bulunmaz. Türkhackteam üyelerinin yaptığı bireysel hack faaliyetlerinden Türkhackteam sorumlu değildir. Sitelerinize Türkhackteam ismi kullanılarak hack faaliyetinde bulunulursa, site-sunucu erişim loglarından bu faaliyeti gerçekleştiren ip adresini tespit edip diğer kanıtlarla birlikte savcılığa suç duyurusunda bulununuz.