%@LANGUAGE="VBSCRIPT" CODEPAGE="1254"%> <% Option Explicit %> <% ' Değişkenlerimizi tanımlıyoruz. Dim degistir, Baglanti, Yol, Kayit, Tablo Dim Bucalisesi, BucalisesiTablo ' Adres satırından alınacak bilgilerin işlenmesi için gerekli tanımlama yapıyoruz. degistir = Request.ServerVariables("URL") degistir = degistir & Request.ServerVariables("QUERY_STRING") degistir = Replace(degistir,"<","(") degistir = Replace(degistir,">",")") Set Baglanti = Server.CreateObject("Adodb.Connection") Baglanti.Open Yol %>
2009-2010 Temmuz Dönemi Ortalama Yükseltme ve Sorumluluk Sınavları |