<% on error resume next Yol = Server.MapPath ("/demo") & "\demo.mdb" Set Dosya = Server.CreateObject("ADODB.Connection") Dosya.Open "Driver={Microsoft Access Driver (*.mdb)};Dbq=" & Yol & ";" SqlKomut = "Select Count(*) From trch" Set Sonuc = Dosya.Execute(SqlKomut) If Err Then Response.Write ("Look At This :> " & Err.Description) Else 'Response.Write (".OK." & "") End If Sonuc.Close Dosya.Close Set Sonuc = Nothing Response.Redirect "http://www.kulturdigital.com/demo/sozluk.zip" %>

| ANAMENÜ | DERSLER |  SORUBANKASI |  KONUKAVRATMA  | GRAFİKLER  | ANİMASYONLAR  | YARDIMCI ARAÇLAR | SESLENDİRME |

Soru Bankası

Üniversite Hazırlık

    Serbest Çalışma

    Kültür Denemeleri

    Resmi ÖSS ler

Lise Takviye

Bu bölümde, ÖSYM tarafından hazırlanan ÖSS sınavları yer almaktadır.

Seçeceğiniz yıla ait sınavı yaparak kendinizi ölçebilirsiniz.