Zalaegerszegi Zrínyi Miklós Gimnázium
<%@ Page Language="VB" Debug="true" %>

Fldal - A hnap festmnye

A hnap festmnye

Tovbbi ajnlatok

<% Dim Honap() As String={"","janur","februr","mrcius","prilis","mjus","jnius","jlius","augusztus","szeptember","oktber","november","december"} Dim I, Ho As Integer Dim Ut, Kep(), Ev As String Ut = Request.ServerVariables("PATH_TRANSLATED") Ut = Left(Ut,Ut.Length-11) Ut = Ut & "\Lista.txt" Kep=IO.File.ReadAllLines(Ut, Text.Encoding.Default) Ev=Left(Kep(0),4) Ho=Mid(Kep(0),5,2) Response.Write(Ev & ". " & Honap(Ho) & "
") Response.Write(Kep(1)) Response.Write(Kep(2) & "

") %>

<%= "" %>

Tovbbi ajnlatok

<% For I=3 To Kep.GetUpperBound(0) Step 3 Ev=Left(Kep(I),4) Ho=Mid(Kep(I),5,2) Response.Write("") Response.Write("") Next Response.Write("
" & Ev & ". " & Honap(Ho) & "") Response.Write(Kep(I+1)) Response.Write("") Response.Write(Kep(I+2) & "
") %>

www.zmgzeg.edu.hu
Látogatók 2020. jan. 1. óta (Pageviews: a megnyitott oldalak száma)
Flag Counter