LGS 2018 Toplu Sonuç

Kodla Büyü
Program Merkezi Yerleştirme - Yerel Yerleştirme ve Tercih Yapmayan ve Tercihine Yerleşemeyen Öğrencileri ayırıyor. Umarım işinize yarar.
 

Ekli dosyalar

1-) TC ve Doğum Tarihini birlikte alabileceğimiz bi sayfa var mı acaba?

2-) Birde Bursluluk Sonuçlarını da bu programla alabilir miyiz?
 
Makroya baktığımda sonuç sayfası linki farklıydı aşağıdaki link ile değiştirdim.
Sonuç sayfası linki : http://www.meb.gov.tr/sinavlar/sonuc/sorgu.php?SINAV_ID=4D4CF2672F75CC1FF6EC1DFD96C1C805
Başta yaptığım bir hata vardı sonuç sayfasında kodu girdikten sonra yine bu sayfadaki "Tamam" butonuna ben tıklıyordum o zaman almıyordu.
Makroya baktığımda sonuç sayfasındaki"Tamam" butonuna tıklamamam gerektiğini anladım.
Şu iki hususu sormak istiyorum doğrulama kodu hatalı girildiğinde aynı öğrenci için tekrar sorgulama yaptırılabilir mi?
Programı durdurup kaldığımız yerden devam ettirebilir miyiz? Teşekkürler.
 
Son düzenleme:
merhaba arkadaşlar gerçekten harika bir kolaylık. bende aöf için toplu olarak sonuç yazdırmak bilgi ararken bu konuya denk geldim. aöf sonuçlarını yazdırmak için bu yazılımı düzenlemek mümkün mü? aöf de doğrulama kodu yok ama sayfaya giriş yaptıktan sonra ilgili butonlara tıklamak gerekiyor bilgi verebilir misiniz yada bu konuda benimle iletişime geçebilir misiniz.
 
selam yine ben pek yardıma istekli kimse yok gibi :) ama ben kendi çabalarımla aöf ye uyarlamayı başardım kodları aşahıda yazdıklarımla değiştirirseniz çalışır.


Kod: 
  ie.navigate "https://aof.anadolu.edu.tr/ogrenci/Login.aspx"
                Do While ie.Busy Or ie.readyState <> 4: DoEvents: Loop  'Tarayıcı sayfayı yükleyene kadar burada bekle
                ie.document.getElementById("txtAccount").Value = Cells(a, 2).Value
                ie.document.getElementById("txtAccount").FireEvent "onchange"
                ie.document.getElementById("txtPassword").Value = Cells(a, 3).Value
                ie.document.getElementById("txtPassword").FireEvent "onchange"
                ie.document.getElementsByName("doButton")(0).Click
                Do While ie.Busy Or ie.readyState <> 4: DoEvents: Loop 'Tarayıcı sayfayı yükleyene kadar burada bekle
                ie.navigate "https://aof.anadolu.edu.tr/ogrenci/NotGoruntule.aspx"
                Do While ie.Busy Or ie.readyState <> 4: DoEvents: Loop  'Tarayıcı sayfayı yükleyene kadar burada bekle
                ie.ExecWB OLECMDID_PRINT, OLECMDEXECOPT_DONTPROMPTUSER    'Sayfayı yazdırma komutu
                ie.document.getElementsByName("ctl00_logOut")(0).Click     'Çıkış Butonuna tıklar
 
Var mı yeni sistem için değişiklik yapabilecek acaba? Doğum tarihi kısmı değiştirilmiş.
 
Cevap yazmak için giriş yap yada kayıt ol.
Geri
Üst