læsning fra fil afhængig af ugedag
Hvordan læser man fra en fil, hvor den vælger fil afhængig af ugedag.Hvordan ser scriptet ud i php?
Har lavet det i asp, hvor det ser således ud:
<%
Sub skrivFil(filnavn)
Dim fso, f, filespec
Set fso = CreateObject("Scripting.FileSystemObject")
filespec = Server.Mappath(filnavn)
Set f = fso.OpenTextFile(filespec,1)
' Læs linie for linie indtil slutningen af filen
Do While not f.AtEndOfStream
Response.write f.ReadLine & "<br>"
Loop
f.Close
End Sub
Dim ugedagsfil
Select Case Weekday(Now,VbMonday)
Case 1
ugedagsfil = "mandag.txt"
Case 2
ugedagsfil = "tirsdag.txt"
Case 3
ugedagsfil = "onsdag.txt"
Case 4
ugedagsfil = "torsdag.txt"
Case 5
ugedagsfil = "fredag.txt"
Case 6
ugedagsfil = "lordag.txt"
Case Else
ugedagsfil = "sondag.txt"
End Select
skrivFil ugedagsfil
%>
