Şifre ile girilen web sitesinden istenen verilerin alınması

[zcbilgin]

Merhaba Arkadaşlar, Excel veri sekmesi ile kullanıcı adı ve şifresi ile giriş yapılabilen bir web sitesine bağlanmaya çalışıyorum ancak daha ilk aşamalarda iken "Sağlanan kimlik bilgileri geçersiz." şeklinde bir uyarı mesajı ile karşılaşıyorum. Bu sorun Excel ile aşılabilir mi? Farklı yol ya da yöntem önerisi olan var mı? Teşekkürler.

 

[Necdet]

Merhaba,

Girmek istediğiniz sitenin adını yazmazsanız, kim nasıl yardımcı olabilir?

 

[zcbilgin]

Merhaba,

Girmek istediğiniz sitenin adını yazmazsanız, kim nasıl yardımcı olabilir?

https://b2b.aksel.com.tr/bayi

 

[Necdet]

Merhaba,

Selenium ile istediğiniz web' giriş kodlarını yazdım.
Bilgisayarınızda Selenium yüklü olmalı
Referanslardan Selenium Type Library seçili olmalı

Verdiğim kodlarda ChromeDriver kullandım, sizde Chrome kullanıyorsanız kullandığınız Chromun ilgili driver'ını yüklemeniz gerekin.

Kısaca zahmetli bir iş, ilk defa Selenium kullanıyorsanız.

Sub WebGiris()
                                'Selenium Type Library
    Dim driver As New WebDriver
    
'    driver.AddArgument ("headless")    'Bu satır yazıldığında Chrome görünür
    driver.Start "chrome"
    driver.Get "https://b2b.aksel.com.tr/bayi"
    
    'Kullanıcı Girişi
    driver.FindElementById("txtUser").SendKeys "KullanıcAdım"
    
    'Şifre Girişi
    driver.FindElementById("txtPass").SendKeys "Şifrem"
    'Giriş Butonuna Basma
    driver.FindElementById("ContinueButton").Click
    
    driver.Close

End Sub

 

[ykend]

Bu LOGO'nun web tabanlı Tiger HR programı, admin şifresi yetkiniz var ise zaten direkt girebilyorsunuz.
Excel ile giriş yapmayı niçin istediniz?

 

[zcbilgin]

Bu LOGO'nun web tabanlı Tiger HR programı, admin şifresi yetkiniz var ise zaten direkt girebilyorsunuz.
Excel ile giriş yapmayı niçin istediniz?

Bu site bize yurt dışından ürünleri getiren ithalatçının sitesi kendi yazılımlarına ait admin yetkisinde görüntülenebilecek bir bilgiyi bayileri veya başkaları ile paylaşmak istememelerini doğal olarak karşılıyorum. Sorun şu ki firmanın hiçbir bayisine xml ya da farklı bir desteği bulunmuyor. Hal böyle olunca her bayiye ayrı ayrı tanımlanmış olan kullanıcı adı ve şifresi ile giriş yapılarak binlerce ürünün tek tek incelenmesi ve o ürünlere ait detayların kopyala yapıştır tarzı bir yöntemle alınması imkansız görünüyor. Bu noktada ihtiyacım olan en can alıcı konu ürünlerin anlık stok bilgisi oluyor. Stok bilgilerini anlık alamadığım için distribütörde stoğu olmayan bir ürün pazar yerlerindeki mağazalarımda var olarak göründüğünden maddi ve manevi kayba uğruyorum. Bu işin çözümünün Excel ile olup olamayacağı hakkında da bir fikrim yok. PHP tarafında cURL ya da benzeri ifadelerle bu tarz ihtiyaçların karşılanabildiğine dair yazılar okudum. Eğer Excel ile daha kolay bir çözümü varsa bunun yolunu öğrenmek istiyorum.

 

[zcbilgin]

Merhaba,

Selenium ile istediğiniz web' giriş kodlarını yazdım.
Bilgisayarınızda Selenium yüklü olmalı
Referanslardan Selenium Type Library seçili olmalı

Verdiğim kodlarda ChromeDriver kullandım, sizde Chrome kullanıyorsanız kullandığınız Chromun ilgili driver'ını yüklemeniz gerekin.

Kısaca zahmetli bir iş, ilk defa Selenium kullanıyorsanız.

Sub WebGiris()
                                'Selenium Type Library
    Dim driver As New WebDriver
   
'    driver.AddArgument ("headless")    'Bu satır yazıldığında Chrome görünür
    driver.Start "chrome"
    driver.Get "https://b2b.aksel.com.tr/bayi"
   
    'Kullanıcı Girişi
    driver.FindElementById("txtUser").SendKeys "KullanıcAdım"
   
    'Şifre Girişi
    driver.FindElementById("txtPass").SendKeys "Şifrem"
    'Giriş Butonuna Basma
    driver.FindElementById("ContinueButton").Click
   
    driver.Close

End Sub

Çok teşekkür ederim. Ellerinize, emeklerinize sağlık.