2 Temmuz 2011 Cumartesi, 17:08
2415
Asp'de girilen herhangi bir sayının faktöriyelini alma işlemi.
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<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 IsNull(sayi) = False 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>"
Response.Write "<br /><a href=""?islem="">Yeni Hesap</a>"
Else
Response.Write "Sayısal bir ifade giriniz.<br />"
Response.Write "<a href=""?islem="">Yeni Hesap</a>"
End If
End If
%>
</body>
</html>