rothen ecotronics Bern: ASP-Skript "ASP Kontrollstrukturen: Verzweigung mit If"

<%@ Language=VBScript %>
<%
Option Explicit
Response.Expires = 0
On Error Resume Next

Dim sngzufallszahl, strvergleich
Randomize()
sngzufallszahl = Rnd()
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=windows-1252">
<title>ASP Kontrollstrukturen: Verzweigung mit If</title>
<body>
<%
If sngzufallszahl < 0.5 Then
  strvergleich = "kleiner"
Else
  strvergleich = "grösser"
End If

Response.Write("Die Zahl " & sngzufallszahl & " ist " & _
  strvergleich & " als 0.5!" & vbCrLf)
%>

</body>
</html>

Demo: uebungen/uebung2_1.asp

Letzter Update: 26.12.2021 17:48

Zurück zur Liste mit ASP-Übungen auf www.ecotronics.ch