• DİKKAT

    DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
    Altın Üyelik Hakkında Bilgi

webden veri çekmek

Katılım
11 Ekim 2006
Mesajlar
25
Excel Vers. ve Dili
bilmiyor
formda aradım ama bulamadım, bana iş hayatımda her gün lazım oluyor yardımcı olursanız çok sevirim. Sorum şu şahıs kimlik bilgilerini el ile giriyorum ben bu bilgileri tc kimlik bilgilerini girdikten sonra otomatik yerel ağda web üzerinden almasını istiyorum. Ağ üzerinde ki web sayfasına tc kimlik nosunu girdiğimde tüm bilgiler ekrana geliyor ancak excele aktaramıyorum sorğulama yaparken doğruma koduda kullanıyorum 4 hafli.
 

Ekli dosyalar

Merhaba,

Korkarım yapamazsınız.. :( Sebebi ise 4 haneli doğrulama kodu. Her seferinde değişeceğinden webdeki form üzerindeki otomatik post ve get metodlarına karşı koruma maksadıyla yapılmakta zaten.
 
peki doğrumala kodunu el ile girsek yinemi olmaz, tc kimlik no ve doğruma kodu manuel girilse.
 
veri

yerel intranet den çekecem. excel ile dış veri aldan olmuyor..
 
:S Anlayamadım...

Ya, siz intranetten web'e çıkış yapıp bir sayfaya gidiyorsunuz ve veri girişi yapıp butona tıkladığınızda veriler browser ekranına geliyor yada, bütün bilgiler zaten sizin yerel ağınızdaki sunucuda var ve oradan çekmek istiyorsunuz. Eğer ikinci durum söz konusu ise, zaten bunu kendi BİM personelinizden liste olarak talep edebilirsiniz. Ama birinci durum söz konusu ise, sizden ricam hangi sayfaya bağlandığınızı öğrenmenizdir. Bunun da en kolay yolu, tc kimlik numarasını yazdığınız sayfayı açmanız, internet explorer'da sağ mouse ile pop-up menüyü açıp "özellikler" e tıklamanız ile olur. "Address (URL)" kısmında "http://" ile başlayan kısım, o sayfanın web adresidir.
 
slm

ilgin çok teşekür ederim.liste olarak almak mümkün değil, sanırım tam anlatamadım. Örnek verirsek mesala şimdi tc kimlik doğruma var nvi.gov.tr de kimlik numarasını girdiğimiz zaman ekrana sadece adı soyadı ve doğum tarihi geliyor. Benim yapmak istediğim ekrana gelen o adı soyadı ve doğum tarihini excele almak istiyorum. yerel intranette ise tc kimlik doğrumaya girince tüm bilgiler geliyor. Bende gelen bilgileri kağıda döküp veya ekrandan tekrar kullandığım proğrama girmek zorunda kalıyorum.
 
Ok.

Belirttiğiniz adresteki sayfayı inceliyorum. Biraz zamana ihtiyacım var.
 
Merhaba,

Sayfayı inceledim; dürüst olmak gerekirse yapılamayacak iş değil; ancak site içerisindeki bir not (sonradan farkettim :( ) dikkat çekici. Önce buradan başlayalım.


XML Web Servislerini kullanmak isteyenlerin http://www.nvi.gov.tr adresinden Kimlik Paylaşım Sistemi Başvuru Şartları bölümünü okuyarak Genel Müdürlüğümüze müracaat etmeleri gerekmektedir


Umarım başıma iş açmamışımdır..

Diğer taraftan bu konuda teknik bilgi de vermem gerekiyor..

Kimlik doğrulaması yaptıran sitelerde, her seferinde farklı resim çıkması kaçınılmaz bir durum. Bu farklı resimler, ilgili sayfa browser'a her yüklendiğinde random bir kod atayıp, resmin değerini (yani içeriğini) değiştirmekte. Dolayısıyla, siz belki resmin ismini belirten satırı bulsanız dahi, içerikte ne olacağını bilemezsiniz. Şöyle örnekleyelim:

Güvenlik kodu resminin adı : guvenlik.jpg olsun,

Bağlandığınızda, kullandığınız sayfa dinamik olduğundan (asp, aspx, php, jsp.. vb) o sayfanın kodunda, o resim için arkaplanda bir kod çalışır ve resmin adı aynı kalsa bile içeriğini değiştirir. Örneğin;

Beklenen kod: <img src="guvenlik.jpg">
Uygulama kodu: <img src=" & kodla.asp?FTQLHG56UY210% &".jpg gibi. Ve bu örnekten de göreceğiniz üzere, kodla.asp aslında arkaplanda guvenlik.jpg dosyasını, "FTQLHG56UY210%" güvenlik koduyla oluşturuyor.

Tabi her sayfa bu kadar basit değil. Bu kadar basit olsaydı aşağıdaki kod ile hemen resmi alırdınız:

------
ActiveSheet.Pictures.Insert("http://www.oaltd.co.uk/images/OALogo.gif").Select
------


Bazı daha yüksek güvenlikli sayfalarda ise, doğrudan resim adını yazmak yerine o resmi oluşturan ara-kod da kullanılabilir. Bu durumda, her seferinde resmin adı ve içeriği değişecektir.


Şimdi, gelelim sorunuza.. :)

Visual Basic içerisinde regExp denilen ve "string manipulation" işlemleri için kullanılan kodlar da vardır. Detay için http://msdn.microsoft.com/en-us/library/ms974570.aspx adresinden faydalanabilirsiniz. Diğer bir deyişle, güvenlik resminin olduğu kısmı, web sayfası kaynak dosyasından bulup regExp ile çekebilirsiniz; ancak bu, nvi sitesi için illegal olur.

Anlayış göstermenizi rica ediyorum.
 
s

ilgin için çok teşekür ederim. amacım illegal çalışmak değil zaten, resmi olarak mernise bağlanıyorum, amaç işlemlerimi biraz daha hızlı yapmak..iyi çalışmalar..
 
Merhaba,
Ben de benzeri bir çalışma yapmıştım. Sözkonusu dosyayı aşağıdaki linkte bulabilirsiniz. Bu çalışmada resim doğrulama sayısını yazmak için ilgili alana tıklamam gerekiyor. Bu tıklama işini (işlemi hızlandırmak için) kod yazarak yapmak mümkün mü?

Saygılar.

http://www.excel.web.tr/attachment.php?attachmentid=54201&d=1229369218
 
:)

Aslında evet.. İstediğiniz şey "web formlara otomatik giriş yapmak", yada otomatik login formu gibi, diyebiliriz.

Ancak farklı boyut, webbrowser kontrolunu kullanmıyoruz. Aşağıdaki kodu kendi kullanımınıza göre modifiye etmeniz gerekmekte.


-----
Sub WebFormaOtomatikGiris()
Dim ie As Object
On Error Resume Next
READYSTATE_COMPLETE = 4
Set ie = CreateObject("InternetExplorer.Application")
ie.Visible = True 'False yaparsanız, uygulamayı gizlersiniz
ie.Navigate "http://login.live.com/"
Do
Loop While ie.Busy Or ie.ReadyState <> READYSTATE_COMPLETE
ie.document.all("login").Value = "xxxxxx" 'kullanıcı adınız
ie.document.all("passwd").Value = "xxxxxx" 'şifreniz
ie.document.all("SI").Click
Do
Loop While ie.Busy Or ie.ReadyState <> READYSTATE_COMPLETE
Set doc = ie.document
Range("a1") = doc.body.innertext 'dokuman içindeki yazı
Range("a1") = doc.body.innerHTML 'dokuman kaynağındaki yazı
End Sub
-----


Kolay gelsin, iyi çalışmalar.
 
merhaba,

kaant ,verdiğin örnek ( çözüm ) Html - Htm kaynagındaki text verileri getirir.(artı inframe - table içerisindeki verileri getirmemizde işimize yarayabilir )Resim doğrulama için bu kod zannedersem geçerli değil.

Buradaki değerli arkadaşlar üzerine alınmasın ama (illegal çözümlerin paylaşıması yasaktır , yanlıştır )

İyi çalışmalar.
 
Merhaba,
Yukarıda belirttiğim linkteki dosyayı inceleme fırsatınız oldu mu bilmiyorum. Bu dosya üzerinde İE zaten açık durumda. Bu nedenle verdiğiniz kodların büyük bir kısmına gerek duyulmuyor. Sadece ie.document.all("SI").Click gibi bir satıra ihtiyacım var. Ancak bunu yapamadım. .click komutu yanıt vermedi.
VBA nın temellerini bilmediğim için Activate ve SetFocus gibi komutlarıda denedim ama deneneler yanılmayla sonuçlandı.
Bu arada sözkonusu dosyaya bazı ekler yaptım. Bittiğinde buraya göndereceğim. Ahh.... şu click olayını da bir çözebilsem.

Saygılar

Önemli Not: Sayın Kemal Demir'e katılıyorum. Ancak amacım illegal çözüm değil. Resim doğrulama yine olacak ve elle yazılacak. Yani hiçbirşey değişmiyor.
Sadece Resim doğrulamanın yazılacağı alana tıklamayı otomatik yapmak istiyorum.
Saygılar.
 
Son düzenleme:
Sayın Demir, ben de sizinle aynı fikirdeyim, müsterih olun (ki, resim doğrulama apayrı ve illegal oluşumlara yol açabilecek bir konu; bu yüzden daha da detaya girmiyorum).

Sayın dEdE, kullandığınız web formdaki butonun adını SI yerine yazmanız gerekiyor. Bu isim HTML'de "name" veya "id" olarak tanımlanır. Böylece tıklama yerine, otomatik işlem yaptırabilirsiniz.
 
Sn.kaant,

Mesajım özellikle tarafınıza cevaplandırılmamıstır.Bu ve benzer konular hakkında illegal işlerin forum'umuz tarafından hoş karsılanmadıgının altını tekrar çizmek istedim

İyi akşamlar.
 
Kod:
IE.document.forms(formadı).Elements(kacincielemnt).Click

yada submit özellği ile

Kod:
IE.Document.forms(formadı).submit

Yukarıdaki 2 kod ile deneyebilirsiniz.
 
Sayın dEdE, kullandığınız web formdaki butonun adını SI yerine yazmanız gerekiyor. Bu isim HTML'de "name" veya "id" olarak tanımlanır. Böylece tıklama yerine, otomatik işlem yaptırabilirsiniz.

Sayın kaant,
Tıklamak istediğm bir buton değil, Table7 isimli tablonun 4. elamanı olan bir hücre(texbox). Bu hücre id="mnbxSecurityCode" şeklinde tanımlanmış. Bu tanımdan yola çıkarak excelde bu hücreye değer atayabiliyorum. Bu işlem yerine mouse ile hücreye tıklayıp resim doğrulama bilgisini elle yazabiliyorum.
İşte yapmak istediğim bu hücreye mouse ile tıklama işlemini kod ile yapmak. (Sadece daha hızlı çalışmak için) Rakamlar yine el ile girilecek.
Örnek dosya aşağıdaki linktedir.

http://www.excel.web.tr/attachment.php?attachmentid=54201&d=1229369218

Sayın Demir,
Öncelikle teşekkür ediyorum.

Kod:
[I]IE.document.forms(formadı).Elements(kacincielemnt).Click[/I]
ve
Kod:
[I]IE.Document.forms(formadı).submit[/I]
komutları ile de yapamadım.

Saygılar.
 
Merhaba,
Sayfa yenileniyor ama imleç resim doğrulama sayısının yazılacağı yere gelmiyor. İE sayfasındaki resim doğrulama sayısının yazılacağı alana tıklamadan sayıyı yazamıyorum. Bu tıklama olayını bulmaya çalışıyorum. Gerçi bu çalışmam için çok önemli değil ama klavyeden elini kaldır, mousla o noktaya tıka, sora tekrar sayıyı yaz zaman alıyor.
Teşekkürler
 
Geri
Üst