Asp'de girilen herhangi bir sayının faktöriyelini alma işlemi.
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=ISO-8859-9" />
<title>Bir Sayının Faktöriyeli</title>
</head>
<body>
<%
islem = request.querystring("islem")
if islem = "" then
%>
<form method="post" action="?islem=hesapla" />
Sayı : <input type="text" name="sayi" />
<br>
<input type="submit" value="Hesapla" />
</form>
<%
elseif islem = "hesapla" then
sayi = request.form("sayi")
if sayi <> "" AND IsNumeric(sayi)=TRUE Then
baslangic = "1"
for i = 1 to sayi
baslangic = i*baslangic
next
response.write " "&sayi&" sayısının faktöriyeli : <b>"&baslangic&"</b><br><a href=""?islem="">Yeni Hesap</a> "
else
Response.write "Sayısal bir ifade giriniz.<br><a href=""?islem="">Yeni Hesap</a>"
end if
end if
%>
Arkadaşlar alıntı çalıntı değildir. Kendi üretimimim
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=ISO-8859-9" />
<title>Bir Sayının Faktöriyeli</title>
</head>
<body>
<%
islem = request.querystring("islem")
if islem = "" then
%>
<form method="post" action="?islem=hesapla" />
Sayı : <input type="text" name="sayi" />
<br>
<input type="submit" value="Hesapla" />
</form>
<%
elseif islem = "hesapla" then
sayi = request.form("sayi")
if sayi <> "" AND IsNumeric(sayi)=TRUE Then
baslangic = "1"
for i = 1 to sayi
baslangic = i*baslangic
next
response.write " "&sayi&" sayısının faktöriyeli : <b>"&baslangic&"</b><br><a href=""?islem="">Yeni Hesap</a> "
else
Response.write "Sayısal bir ifade giriniz.<br><a href=""?islem="">Yeni Hesap</a>"
end if
end if
%>
Arkadaşlar alıntı çalıntı değildir. Kendi üretimimim
