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.
