ASP'de genellikle işilemleri tek sayfada halletmek, kısa kod parçacıklarını ayrı sayfalar gibi göstermek için bölmeler yaratma gereği duyarız. Bu zamanlarda imdadımıza yetişen sub konusunu ele alıyoruz. Sub'lar aynı fonksiyonlar gibi kodlarımızı daha pratik, az yazmaya yarar. Örneğin sitemizde kullanıcı bölümü adında bir yer var. Bu bölümü gerekli yerlerde göstermek için kodları teker teker yazıyoruz. Buda hiç iyi olmuyor. Hem server hemde biz bakımından. Örneğin kullanıcı bölümünden bir yer değiştireceksek hepsinde değiştirmek zorunda kalıyoruz. Ama Sub kullanırsak böyle bir sorun olmaz. Sub'ımızı oluştururuz. Sub'ın içine kullanıcı bölümünü koyarız. Gerekli yerlerde çağırırız. Bu kadar basit şimdi kullanımına geçelim. Öncelikle söz dizimi şöyledir; Kod: <% Sub islemler 'işlemler End Sub %> Gerekli yerlerde çağırmak için call komutunu kullanırız. Kod: <% Call islemler %> Sub diyerek işlemi başlatırız. Sub'ın adını yazarız ve Sub'ın içinde olacağı Nesneleri, Kodları yazarız. End Sub ile bu kodları bitiririz. Bir örnek yapalım; Kod: <% Sub AO response. write "http://www.aspogren.net" End Sub Call AO %> Ekrana AO sub'ının içindeki kodları yansıtacaktır. Call AO komutunu ne kadar yazarsak o kadar kodları gösterir. Peki AO'nun sonundaki parantez ne oluyor Onu yazmasanızda olur. Ama eğer sub'ı çağırırken bir değer vereceksek yazmamız gerekir. Örnek; Kod: <% Sub AO response. write "Hoşgeldiniz "&isim&"" End Sub Call AO %> Ekrana Hoşgeldiniz fatih yazar. Çünkü Sub'ı çağırırken isim değişkenine fatih değerini verdik. Call AO Böyle çağırsaydık Hoşgeldiniz aspogren. net yazardı. Bu şekilde aralarına virgül koymak şartıyla birden fazla değer kullanabiliriz. Kod: <% Sub islemler for i=0 to kackere response. write ""&isim&" <br>" next Call islemler(5,"Fatih") End sub %> Ekrana 5 kere Fatih yazdıracaktır. Çünkü sub'ı çağırırken bir değer verdik (5). Bu değeri sub'da değişken olarak kullanılması için sub'ı tanımlarken belirttik. Ve belirttiğimiz değişkeni döngüye sokarak alınan değer kadar döndürdük. Bir örnek daha yapalım. Pratik bir hesap makinası Kod: <% Sub topla(sayi1, sayi2) response. write sayi1+sayi2 End sub Call topla(5,10) %> Ekrana 15 yazdıracaktır. Bu gibi istediğiniz işlemi yapabilirsiniz. Mesela kendiniz için ufak bir kütüphane oluşturabilirsiniz. şimdi son bir örnek daha yapıyorum. Kod: <% Sub hesapla(sayi1, sayi2, isaret) if isaret="-" then response. write sayi1-sayi2 elseif isaret="+" then response. write sayi1+sayi2 elseif isaret=" " then response. write sayi1 sayi2 elseif isaret="/" then response. write sayi1/sayi2 else response. write "İşaret Tanımsız" end if End Sub Call hesapla(5,10,"-") Call hesapla(5,10,"+") Call hesapla(5,10," ") Call hesapla(5,10,"/") %> Sayi1, Sayi2 değişkenlerimizi çağırdık. islem değişkenindeki işaret ile sayi1 ve sayi2yi işleme sokturduk. Response. write ile işleme sokulan değerleri yazdırdık. Paremetreleri istediğiniz kadar çoğaltabilirsiniz. Bu yazı burada bitmiştir. Kendinize iyi bakın. İyi çalışmalar...