<%@ Language=VBScript %>
<!--#include virtual="asppages/silvi/_include/preheader.inc" -->
<html>
<head>
<title>ASP Kontrollstrukturen: Aufruf von VBScript-Funktionen</title>
<!--#include virtual="asppages/silvi/_include/header.inc" -->
</head>
<body>
<%
'Initialisiert den Zufallsgenerator 
'(notwendig, damit nicht immer dieselbe Zahl erscheint
Randomize()

'Datum anzeigen
Response.Write("Aktuelles Datum: " & Date() & "<br />" & vbCrLf)

'Wochentag anzeigen
Response.Write("Wochentag: " & WeekdayName(Weekday(Date())) & _
  "<br />" & vbCrLf)
  
'Unformatierte Zufallszahl anzeigen
Response.Write("Zufallszahl: " & Rnd() & "<br />" & vbCrLf)

'Zahl formatiert als Dezimalzahl mit 2 Dezimalstellen und führender Null
'Das erste Argument ist zu formatierende Zahl, das zweite die Anzahl, 
'und das dritte bestimmt, das führende Nullen angezeigt werden
Response.Write("Formatierte Zufallszahl: " & _
  FormatNumber(Rnd(),2,-1) & "<br />" & vbCrLf)
%>

<!--#include virtual="asppages/silvi/_include/inchtmlnachspann.asp" -->
</body>
</html>

Demo: beispiele/020vbsfunct.asp

Letzter Update: 26.12.2021 17:48

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