ÖSYM Sınav Sonucu ve TC Kimlik No Alma

csyasar · Mesaj gönderen **csyasar** » 04 Mar 2004 07:43

Kardeşler;

ÖSYM'den verilen kimlik no ya göre sıjnav sonucunu alıp editlere yazmak istiyorum. daha önceden de böyle bi şeye teşebbüsüm olmuştu fakat yapamamıştım. bana bunun hakkında fikir / kod / component ismi bilen arkadaşların yardımını bekliyorum.

YouTube · Mesaj gönderen **Kuri_YJ** » 04 Mar 2004 07:55

Selamlar,

İşin içinde ÖSYM var diyorsan biraz zor gibime geliyor zira bu tür sonuçlar aslında gizlidir ve sadece kişiler için public edilir.

Yani bir yerden bağlanıp sorgulayayım diyorsan sorgulama yapacağın DB'ye yetkili olman filan lazım..

Bunu da ÖSYM kolay kolay vermez gibime geliyor. Ama belki bir ihtimal bir adet DB Server'ı bu iş için ve üzerinde sadece Sonuç sorgulaması yapılabilen bir DB ayırmış olabilir. O zaman sorgulayabilirsin ama ben zannetmiyorum. Yani TCMB'den Kur sorgulamaya benzemiyor bu iş, biraz tehlikeli bir şey. ÖSYM Risk almaz gibime geliyor.

Kolay Gelsin.

csyasar · Mesaj gönderen **csyasar** » 04 Mar 2004 08:05

yok ösymden direkt ip ile bağlanıp database de sorgu yaptırmayacaksın. onun yapılamayacağını bende biliyorum

biz onu da düşündük. bak nasıl olacak:

ösym nin sınav sonucu sorgulama sitesine(http://sonuc.osym.gov.tr/Sorgu.aspx?SonucID=7) bağlanacak bu bizim program. oradaki textbox'a öğrencinin kimlik numarasını yazacaksın sen(bunu delphi kendi database'inden alıp otomatik yapacak) ve cevap olarak gelen sayfadaki yazıları parçalayarak(adı, soyadı, vs. alanlarını) database'e yazacak. hepsi hepsi bu...

celalatak · Mesaj gönderen **celalatak** » 04 Mar 2004 09:16

Soket açan herhangi bir bileşeni kullanarak yapabilirisin.

Ösym'nin sitesine baktım post ile geri gönderme yapıyor. Delphi6 da indy demoların arasında HTTPClient adında bir örnek var. İncelersen yardımcı olacaktır sanırım.
Kolay gelsin.

Mesaj gönderen **DotCom** » 04 Mar 2004 10:11

yanlız arkadaşlar gözünüzden kaçırdığınız bir durum var. ÖSYM her ene aynı dizaynı kullanmaz. atıyorum bu sene için yaptın programı. sınav sonuçları açıklanma günü geldi ve çattı. sende açtın programını ama açlışmıyor neden acaba ?

arkadaşlar adamlar her sene farklı bir sistem kullanıyor. birbirinden farklı 4-5 server açıyorlar o işler için çünkü aynı anda 2 milyona yakın insan saldırıyo siteye. ve adamlar her sene sayfanın dizaynı şöyle olsun geçen senede böyle yapmıştık. ay çocuklar koskoca program yazmış şimdi sayfayı değiştirirsek çocukların programı bozulucak die düşüneceklerini hiçmi hiç tahmin etmiyorum.

kısacası anlatmak istediğim senin bugün alacagın html içeriği ile o gün yayınlanan ,içerik tutmayacaktır. bundan emin olabilirsin.

Benim aklıma gelen bir başka şey ise. Devlet in bir çok internetten sorgulama işlemini kale yazılım yapıyor. sanırım bu şirkette Tansu Türkoglu nun , onunla görüşebilirsin. belki yardımcı olabilir. ama gizlilik açısından bunada pek aklım yatmadı.

kolay gelsin

celalatak · Mesaj gönderen **celalatak** » 04 Mar 2004 10:20

Katılmıyorum programı yazdıktan sonra sorun olmaz. Sadece linkleri değiştirirsin.

İcq da online olan ları bulan bir program yazmıştım. Onlarda arada linkleri değiştiriyorlardı. Küçük uyarlamalarla programı yine çalıştırabiliyordu.

Programda Osym nin kullandığı bütün linkleride girebilirisin. Bir serverden yanıt alamazsa program diğerine gider.

Mesaj gönderen **mussimsek** » 04 Mar 2004 11:02

Forum kurallarına lütfen uyalım.

- Lütfen Mesajın ve başlığın tümünü büyük harflerle yazmayın. Büyük harflerle yazmanın net kullanıcıları arasında bağırmak anlamına geldiğini unutmayın.

Başka bir forumda TC Kimlik nosunu alan bir program gördüm. Ama detaylı incelemedim. Demek ki alınabiliyor.

Kolay gelsin.

sako · Mesaj gönderen **sako** » 05 Mar 2004 09:18

şöyle bişe var ama işini görürmü bilemem

html deki metin kutularını, butonları, açılır kutuları, check ve radio kutularını browser aracılığıyla el değmeden kontrol eder
...... /demos/coolstuf/webbrows.dpr projesinin main formuna gerekli butonları ekleyip deneyin.
procedure TMainForm.Button1Click(Sender: TObject);
//web sayfasındaki metin kutularına "email@aaa.aaa" yazar
//sorguda element.name:= 'TextKutsununHTML_Adı' yazılarak istenilen kutuya istenilen değer yazılır
var
Doc: IHTMLDocument2;
I: Integer;
Element: OleVariant;
Elements: IHTMLElementCollection;
begin
Doc := WebBrowser1.Document as IHTMLDocument2;
Elements := Doc.all;
for I := 0 to Elements.length - 1 do
begin
Element := Elements.item(I, varEmpty);
if (Element.tagName = 'INPUT') and (Element.type = 'text') then
Element.value := 'email@aaa.aaa';

end;

end;

procedure TMainForm.Button3Click(Sender: TObject);
//web sayfasında gönder adıyla gözüken butona basar,
//yani "click" olayı gerçekleşir
var
ovElements: OleVariant;
i: Integer;
begin
ovElements := WebBrowser1.OleObject.Document.forms.item(0).elements;
for i := 0 to (ovElements.Length - 1) do
if (ovElements.item(i).type = 'submit') and
(ovElements.item(i).Value = 'Gönder') then
ovElements.item(i).Click;
end;
procedure TMainForm.Button4Click(Sender: TObject);
//web sayfasındaki combo box taki istenilen satırı seçer
//burada 2
var
Doc: IHTMLDocument2;
I: Integer;
Element: OleVariant;
Elements: IHTMLElementCollection;
begin
Doc := WebBrowser1.Document as IHTMLDocument2;
Elements := Doc.all;
for I := 0 to Elements.length - 1 do
begin
Element := Elements.item(I, varEmpty);
if (Element.tagName = 'SELECT') then
element.item(2).selected :=1;

end;
end;
procedure TMainForm.Button5Click(Sender: TObject);
var
Doc: IHTMLDocument2;
I: Integer;
Element: OleVariant;
Elements: IHTMLElementCollection;
begin
Doc := WebBrowser1.Document as IHTMLDocument2;
Elements := Doc.all;
for I := 0 to Elements.length - 1 do
begin
Element := Elements.item(I, varEmpty);
if (Element.tagName = 'INPUT') and (Element.type = 'radio')
and (element.value='V2') then
element.checked:=1;

end;

end;

procedure TMainForm.Button6Click(Sender: TObject);
var
Doc: IHTMLDocument2;
I: Integer;
Element: OleVariant;
Elements: IHTMLElementCollection;
begin
Doc := WebBrowser1.Document as IHTMLDocument2;
Elements := Doc.all;
for I := 0 to Elements.length - 1 do
begin
Element := Elements.item(I, varEmpty);
if (Element.tagName = 'INPUT') and (Element.type = 'checkbox')
and (element.name='C2') then
element.checked:=1;

end;

end;
end.

hakkus · Mesaj gönderen **hakkus** » 05 Mar 2004 11:08

Merhabalar,
Farklı iki yöntem önerebilirim.
#1-ÖSYM heryıl sınavdan sonra sınava giren adayların sınav sonuçlarını text formatında bir cd de yayınlar. Veya en azından biz (S.Ü.BESYO) heryıl ÖSYM den bu CD yi alırız ve bize müracaat eden öğrencilerin başvuru formlarındaki bilgileri bu cd den karşılaştırırız..
Bu çok kolay ÖSYM cd deki text dosyayı memo ya açarsınız.
Karakter saydırarak TC kimlik No, Mezun Olduğu Okul türü, puanları gibi bilgileri karşılaştırabilirsiniz.
#2-Delphide bir web browser yapıp tcKimlikNoyu OSYM nin sitesine sorgu olarak gönderin. Açılan sayfayı Html olarak kaydedin. Html kodunu açın ve inceleyin. Örnegin Sayısal Puanın etiketi nedir ve bundan sonraki kaç karakter sayısal puanı veriyor.
Html dosyayı text formatında açın POS() la ilgili kelimeyi buldurun ve bundan sonra kaç karakter alacaksanız örnegin 7 karakter SözPuanı bunu Copy ile alıp edite veya ilgili kişinin ilgili database alanına yazdırın.
Kolay gelsin

csyasar · Mesaj gönderen **csyasar** » 07 Mar 2004 11:00

arkadaşlar;

1)ösym den bu sınav sonuçlarını alırken öyle balık gibi adrese atlamayacak. program önce benim web siteme bağlanıp linkleri ve textbox isimlerini alacak. daha sonra ösym ye bağlanacak.

2)bu sistem ile adam belki 1000 tane öğrencinin listesini alacak. buna göre işlem zamanının da uzun sürmemesi gerekir. önerilerinizi(mümkünse) bu bağlamda yaparsanız memnun olurum.

Not: 2. maddeyi yazarken şu ana kadar öneri yazmış kimseye "sen kullanışsız bir yöntem yazmışsın, bu uzun sürer" demiyorum. hepinize teşekkür ederim. yeni önerilerinizi bekliyorum.

hepinize iyi çalışmalar

mrmarman · Mesaj gönderen **mrmarman** » 07 Mar 2004 11:29

Selam...

- Arkadaşların vediği cevapların aslında yeterli olduğunu gördüğümden bu başlığı ve cevapları sessiz sedasız izliyordum... ...

- Şahsen bu verdiğin son cevabını çözümleyemedim.. @hakkus net bir şekilde bu sonuca nasıl ulaşabileceğini ifade etmiş...

- Forumda da arama yaptırdığında browse edilen bir Web sayfasının okunması ve okunan bu sayfadan bilgilierin parse diye tabir edilen okuma metodunu bulabilirsin..

celalatak · Mesaj gönderen **celalatak** » 08 Mar 2004 01:22

Arkadaşım 2. maddeyi uygulayamazsın düşündüğün gibi uygulayamazsın döngüyle ancak yapabilirsin. Her defasında ösym nin sayfasına bağlanman lazım.

Ben bu tarz çalışan programlar yazdım.

Eğer bu konuda bir pazar bulduysan, programı satabileceksen yardımcı olurum. Mailde yazabilirsin.

celalatak@hotmail.com

tuanna · Mesaj gönderen **tuanna** » 23 Ara 2004 01:15

sako kardeş demo programı denemeye çalıştım ama

su değişkenin olmadığını söylüyor....söylediğine göre ek bir sey yapmamıza gerek yok

Doc: IHTMLDocument2; tanınmayan değişken satırı ....ne yapacağız şimdi

Mesaj gönderen **fduman** » 23 Ara 2004 08:10

TC Kimlik No'nun nasıl alınacağı ile ilgili bir makaleyi, makaleler ve ipuçları bölümüne gönderdim.

Örnek programın kodlarını ise siteye eklenmesi için mussimsek'e göndermiştim. Akibeti ne oldu bilemiyorum.

ovural · Mesaj gönderen **ovural** » 23 Ara 2004 09:22

bununla ilgili benim yazdığım program var .. ve satışını yapıyorum ve yaptım ..

simdi method su .. bir ini file oluşturdum .. bunu inifile in icine hangi alanları doldurup gondereceksem ve hangi alanları alacaksam kaydediyorum ..

sonrada sayfayı her seferinde acıp bilgileri doldurup formu gonderiyorum ve gelen sayfadan istediğim bilgileri alıyorum ..

her sene ösym sayfa yapısını değiştirebiliyor ..
ayrıca farklı yontemlerde deneyebiliyor .. mesela aynı ipden belli sayıdan sonra calısmaması gibi ..

su an calısıyor ama ..
arayuz pek guzel değil ugrasmadım .. ama islevselligi iyi ..

http://www.oziyazilim.com/download/downoss/DownOss.zip

gecen hafta tckimlik sayfasınında yapısı değişti ona gorede ayarlandı ..