<%@ Language=VBScript %>
<%
option explicit
Response.Expires = 0
on error resume next

Dim arrbez, arrelem

arrbez = Array("WebMaster/in","WebPublisher/in", _
  "PC-Supporter/in""Netzwerkspezialist/in")
%>

<!--#include virtual="asppages/silvi/_include/preheader.inc" -->
<html>
<head>
<title>ASP Kontrollstrukturen: For Each mit Array</title>
<!--#include virtual="asppages/silvi/_include/header.inc" -->
</head>
<body>
<%
for each arrelem in arrbez
  Response.Write(arrelem & "<br />" & vbCrLf)
next
%>

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

Demo: beispiele/020vbsarrayloop.asp

Letzter Update: 26.12.2021 16:48

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