Asp'de Do Loop Döngüsü

'Programlama' forumunda ...... tarafından 14 Eyl 2009 tarihinde açılan konu

Konu etiketleri:
  1. ......

    ...... Misafir



    Do (Yap) komutu ile kuracağımız döngüler iki ayrı türden oluşmaktadır: bu döngü ile bir dizi komutu, bir koşul doğru iken veya doğru oluncaya kadar yapabilmekteyiz. Bu yöntemlerden her biri iki ayrı şekilde yazılabilir. Bir koşul doğru iken bazı işlerin biteviye yapılmasını istiyorsak, Do While yöntemini kullanırız:

    Do While koşul

    // Koşul doğru iken yapılması gereken kod parçası

    Loop

    Bu ifade ile VBScript koşul doğru iken istediğimiz işi yapacaktır. Buradaki Loop kelimesi, döngünün başa dönmesini sağlar. Bu yöntemden şu şekilde de yararlanabiliriz..

    Do

    // koşul gerçekleşinceye kadar yapılacak kod

    Loop Until koşul

    Bir örnek yapalım:

    Kod:
    <% Option Explicit %>
    <HTML>
    <HEAD>
    <TITLE>ASP ILE YAZI-TURA</TITLE>
    <META http-equiv=”content-type” content=”text/html; charset=ISO-8859-9″>
    <META http-equiv=”Content-Type” content=”text/html; charset=windows-1254″>
    </HEAD>
    <BODY>
    <H2>
    <CENTER>
    <%
    Dim ParaAt, Yazi, Tura, Atis
    Randomize
    Yazi = 0
    Tura = 0
    Atis = 0
    Do While Tura < 3
    atis = Atis + 1
    ParaAt = Int(Rnd * 2) + 1
    If ParaAt = 1 Then
    %>
    Yazı!<P>
    <%
    Yazi = Yazi + 1
    Else
    %>
    Tura!<P>
    <%
    Tura = Tura + 1
    End If
    Loop
    %>
    3 Tura getirebilmek için parayı <%=Atis%> kere atmak gerekti!
    </HTML>
    Randomize (Tesadüfî sayı bulma) Kodudur.​
     

Bu Sayfayı Paylaş