Søg
Avatar billede shifter Nybegynder
18. juni 2000 - 12:43 Der er 5 kommentarer og
1 løsning

Reager udfra tid

Jeg har tidligere fået kreeret et script, der kan vise en given side udfra datoen. Problemet er nu, at jeg gerne vil have den til at reagere forskellige udfra dagen OG klokkeslettet.

Et eksempel kommer nedenfor scriptet:

@dag = localtime();
$dagsdato=($dag[5]+1900)*1000000+$dag[4]*10000+$dag[3]*100+$dag[2];
$ugedag=$dag[6]%7;
if (2000032601<=$dagsdato && $dagsdato<2000102901) {
  if ($dag[2]>=22) {
    $ugedag = ($ugedag+1)%7;
  }
} else {
  if ($dag[2]>=23) {
    $ugedag = ($ugedag+1)%7;
  }
}

if ($ugedag==0) {
  print "Søndag\n";
} elsif ($ugedag==1) {
  print "Mandag\n";
} elsif ($ugedag==2) {
  print "Tirsdag\n";
} elsif ($ugedag==3) {
  print "Onsdag\n";
} elsif ($ugedag==4) {
  print "Torsdag\n";
} elsif ($ugedag==5) {
  print "Fredag\n";
} elsif ($ugedag==6) {
  print "Lørdag\n";
}

Jeg vil gerne have, at f.eks. om at scriptet om søndagen fra 0 - 12 viser side 1, mens scriptet fra 12.01 - 23.59 viser side 2.
Avatar billede Lasse Novice
18. juni 2000 - 15:02 #1
Her har du et program der gør det du vil:
#!/usr/bin/perl -w

use CGI;

print "Content-type: text/html\n";
print "\n";

print "
    <html>
    <head>
    <title> Herlevkollegiets fodboldside </title>
    </head>
    <body alink=purple link=purple vlink=purple>";
@dag = localtime();
$dagsdato=($dag[5]+1900)*1000000+$dag[4]*10000+$dag[3]*100+$dag[2];
$ugedag=$dag[6]%7;
if (2000032601<=$dagsdato && $dagsdato<2000102901) {
  if ($dag[2]>=22) {
    $ugedag = ($ugedag+1)%7;
  }
} else {
  if ($dag[2]>=23) {
    $ugedag = ($ugedag+1)%7;
  }
}

if ($ugedag==0) {
  print "Søndag\n";
} elsif ($ugedag==1) {
  print "Mandag\n";
} elsif ($ugedag==2) {
  print "Tirsdag\n";
} elsif ($ugedag==3) {
  print "Onsdag\n";
} elsif ($ugedag==4) {
  print "Torsdag\n";
} elsif ($ugedag==5) {
  print "Fredag\n";
} elsif ($ugedag==6) {
  print "Lørdag\n";
}

print "<br>$dag[2]:$dag[1]:$dag[0]";
if($dag[0]<10) {
$tid=$dag[2]*10000+$dag[1]*100+$dag[0]*10;}
else{
$tid=$dag[2]*10000+$dag[1]*100+$dag[0];}

if($tid<120000)
{    print "<script>document.location.href=\"http://www.jubii.dk\"</script>";}
else
{    print "<script>document.location.href=\"http://www.herlevkollegiet.dk\"</script>";}

print "$tid";

print "   
</table>
</body>
</html>";
Avatar billede Lasse Novice
18. juni 2000 - 15:03 #2
Nu reagerer den KUN udfra tid
Avatar billede Lasse Novice
18. juni 2000 - 17:59 #3
Her er den med både tid og dato:
#!/usr/bin/perl -w

use CGI;

print "Content-type: text/html\n";
print "\n";

print "
    <html>
    <head>
    <title> Herlevkollegiets fodboldside </title>
    </head>
    <body alink=purple link=purple vlink=purple>";
@dag = localtime();
$dagsdato=($dag[5]+1900)*1000000+$dag[4]*10000+$dag[3]*100+$dag[2];
$ugedag=$dag[6]%7;
if (2000032601<=$dagsdato && $dagsdato<2000102901) {
  if ($dag[2]>=22) {
    $ugedag = ($ugedag+1)%7;
  }
} else {
  if ($dag[2]>=23) {
    $ugedag = ($ugedag+1)%7;
  }
}

print "<br>$dag[2]:$dag[1]:$dag[0]";
if($dag[0]<10) {
$tid=$dag[2]*10000+$dag[1]*100+$dag[0]*10;}
else{
$tid=$dag[2]*10000+$dag[1]*100+$dag[0];}

#Hvis tiden er FØR klokken 12.00.00
if($tid<120000)
{
    if ($ugedag==0) {
      print "Søndag\n";
    } elsif ($ugedag==1) {
      print "Mandag\n";
    } elsif ($ugedag==2) {
      print "Tirsdag\n";
    } elsif ($ugedag==3) {
      print "Onsdag\n";
    } elsif ($ugedag==4) {
      print "Torsdag\n";
    } elsif ($ugedag==5) {
      print "Fredag\n";
    } elsif ($ugedag==6) {
      print "Lørdag\n";
    }
    print "<script>document.location.href=\"http://www.jubii.dk\"</script>";
}
#Hvis tiden er EFTER klokken 12.00.00
else
{
    if ($ugedag==0) {
      print "Søndag\n";
    } elsif ($ugedag==1) {
      print "Mandag\n";
    } elsif ($ugedag==2) {
      print "Tirsdag\n";
    } elsif ($ugedag==3) {
      print "Onsdag\n";
    } elsif ($ugedag==4) {
      print "Torsdag\n";
    } elsif ($ugedag==5) {
      print "Fredag\n";
    } elsif ($ugedag==6) {
      print "Lørdag\n";
    }
    print "<script>document.location.href=\"http://www.herlevkollegiet.dk\"</script>";
}

print "   
</table>
</body>
</html>";

Avatar billede Lasse Novice
18. juni 2000 - 18:00 #4
Ups, FORKERT, her er den lige igen:
#!/usr/bin/perl -w

use CGI;

print "Content-type: text/html\n";
print "\n";

print "
    <html>
    <head>
    <title> Herlevkollegiets fodboldside </title>
    </head>
    <body alink=purple link=purple vlink=purple>";
@dag = localtime();
$dagsdato=($dag[5]+1900)*1000000+$dag[4]*10000+$dag[3]*100+$dag[2];
$ugedag=$dag[6]%7;
if (2000032601<=$dagsdato && $dagsdato<2000102901) {
  if ($dag[2]>=22) {
    $ugedag = ($ugedag+1)%7;
  }
} else {
  if ($dag[2]>=23) {
    $ugedag = ($ugedag+1)%7;
  }
}

print "<br>$dag[2]:$dag[1]:$dag[0]";
if($dag[0]<10) {
$tid=$dag[2]*10000+$dag[1]*100+$dag[0]*10;}
else{
$tid=$dag[2]*10000+$dag[1]*100+$dag[0];}

#Hvis tiden er FØR klokken 12.00.00
if($tid<120000)
{
    if ($ugedag==0) {
      print "Søndag\n";
    } elsif ($ugedag==1) {
      print "Mandag\n";
    } elsif ($ugedag==2) {
      print "Tirsdag\n";
    } elsif ($ugedag==3) {
      print "Onsdag\n";
    } elsif ($ugedag==4) {
      print "Torsdag\n";
    } elsif ($ugedag==5) {
      print "Fredag\n";
    } elsif ($ugedag==6) {
      print "<script>document.location.href=\"http://www.jubii.dk\"</script>";
      print "Lørdag\n";
    }
   
}
#Hvis tiden er EFTER klokken 12.00.00
else
{
    if ($ugedag==0) {
      print "Søndag\n";
    } elsif ($ugedag==1) {
      print "Mandag\n";
    } elsif ($ugedag==2) {
      print "Tirsdag\n";
    } elsif ($ugedag==3) {
      print "Onsdag\n";
    } elsif ($ugedag==4) {
      print "Torsdag\n";
    } elsif ($ugedag==5) {
      print "Fredag\n";
    } elsif ($ugedag==6) {
    print "<script>document.location.href=\"http://www.herlevkollegiet.dk\"</script>";
      print "Lørdag\n";
    }

}

print "   
</table>
</body>
</html>";
Avatar billede Lasse Novice
18. juni 2000 - 18:01 #5
Nu går den til en anden side hvis det er lørdag både om formiddagen og om eftermiddagen
Avatar billede shifter Nybegynder
20. juni 2000 - 16:40 #6
det virkede fint. Takker for svaret.
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Programmeringssprog kurser
Kurser inden for grundlæggende programmering
Se alle Programmeringssprog kurser

Flere spørgsmål fra Andet programmering kategorien

Titel Indlæg Oprettet Seneste aktivitet
Bat file. Af johnnylassen i Andet programmering 4 23/04/202616:10 21/08/202611:03
Hjælp til Api.asmx Af lurup i Andet programmering 1 17/03/202609:27 17/03/202614:12
burgermenu til hjemmeside - hjælp! Af SabrinaL i Andet programmering 2 12/11/202514:10 21/08/202611:08
Hjælp til programmering af website Af hamdenlange i Andet programmering 16 17/08/202522:26 19/08/202515:53
Kan man registrere hvis folk lukker en side ned Af KurtG i Andet programmering 8 24/07/202513:06 28/07/202517:03
Se alle spørgsmål i kategorien Opret spørgsmål

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Opret Log ind

Du kan også logge ind via nedenstående tjenester

Alle kategorier på Eksperten
IT-JOB

KMD A/S

Senior SAP Architect

Riskpoint A/S (Riskpoint Solutions Limited)

Senior Developer

KMD A/S

Senior Business Architect

Netcompany A/S

Network Engineer

Capgemini Danmark A/S

AI Data Architect
Seneste spørgsmål Seneste aktivitet
I går 16:43 Nomad Tracking Car Af fleknes i Apps til Android
25/0916:15 Internet forsvinder hele tiden Af TTA i Internetforbindelser
23/0920:49 Fejl på Tv2 Play Af Bukse i Browsere
23/0918:11 VB, Lægge 2 celler sammen og skrive den i cellen ved side af Af MC3390 i Excel
21/0910:39 DBA er ikke hvad det tidligere var - desværre! Af ErikHg i Fri debat
White papers
Flere white papers »