| baseportal | |||
| English - Deutsch | "Es gibt keine dummen Fragen - jeder hat einmal angefangen" | ||
|
| baseportal | |||
| English - Deutsch | "Es gibt keine dummen Fragen - jeder hat einmal angefangen" | ||
|
| Ausgewählter Eintrag: | Zur Liste |
<perl> $Datum=time; $Eintragdauer=jetzt-$Datum; </perl>
|
| Alle Einträge zum Thema: | Zur Liste |
put ["nr", $nr, "seite", $seite, "tag", $tag], "klicks";
get "nr==$nr", "klicks"; out "$_amount ";
<perl>
if (put ["nr", $nr, "seite", $seite, "tag", $tag], "Klicks")
{
get "nr==$nr", "Klicks";
out "$_amount ";
}
get "KlickDB"; # ---- die Namen laden
while(get_next("KlickDB")){ # ---- gibt deine Liste aus
out "<a href='http://www.deineCntSeite&klickID=$Id'>$Name</a><br>";
}
&klickID=$Id ... schreibt den Id in den Link und übergibt per url ihn an die 'deineCntSeite'.
get "Id==$klickId", "KlickDB"; # ---- lädt den geklickten Namen aus der DB $Klicks++; # ---- erhöht die Klicks um eins # ---- noch den neuen Wert zurückschreiben mod "Id==$klickId", ["Klicks", $Klicks], "KlickDB";
==
<perl> $logInTime=time; # ---- beim logIn die Zeit festhalten # .... irgendwas .... $dauer=time-$logInTime; # ---- beim logOut die Dauer in Sekunden </perl>
$dauer=int((time-$logInTime)/60); # ---- Dauer in Minuten
<perl>
{
$_put{"Eintragdauer"}=int((time-$Datum)/60);
}
<perl>
if($klickId>0){
get "Id==$klickId", "KlickDB"; # ---- lädt den geklickten Namen aus der DB
$Klicks++; # ---- erhöht die Klicks um eins
mod "Id==$klickId", ["Klicks", $Klicks, "letzterKlick", time], "KlickDB"; # ---- noch den neuen Wert zurückschreiben
}
out "klickList<br><br>";
get "KlickDB"; # ---- die Namen laden
while(get_next("KlickDB")){ # ---- gibt deine Liste aus
out "<a href='http://baseportal.de/cgi-bin/baseportal.pl?htx=/bpTest/klickList2&klickId=$Id'>$Name</a>";
out " --- $Klicks Klicks";
$t=time-$letzterKlick;
out " --- letzter Klick vor $t Sekunden";
out "<br>";
}
</perl>
<perl>
if ($cmd eq "add")
{
$_put{"Zeitpunkt"}=
</perl>
<perl>
{
$_put{"Eintragdauer"}=
out int((datum("jetzt", "time")-datum($Zeitpunkt, "time")));
}
</perl>
get "clickcountertest", "cct";
while(get_next("cct")){
$t=time-datum($Zeitpunkt,"time"));
$t=int($t/60);
mod "Id==$Id",["Eintragdauer",$t],"clickcountertest";}
get "clickcountertest", "cct";
while(get_next("cct")){
$t=time-datum($Zeitpunkt,"time");
$t=int($t/60);
mod "Id==$Id",["Eintragdauer",$t],"clickcountertest";}
<perl> $Datum=time; $Eintragdauer=jetzt-$Datum; </perl>
<perl>
$_put{"Eintragdauer"}=jetzt-Datum;
</perl>
get "clickcountertest", "cct";
while(get_next("cct")){
$t=time-datum($Zeitpunkt,"time");
$t=int($t/86400+10);
mod "Id==$Id",["Eintragdauer",$t],"clickcountertest";}
$t=int($t/86400+10)." Tage";
$eineZahl = soutf "%.2f", $eineZahl;
| Liste der Einträge von 600 bis 750: | Einklappen | Zur Eingabe |
| Neueste Einträge << 3 | 2 | Neuere Einträge < | Zur Eingabe | > Ältere Einträge | 2 | 3 | 4 | 5 | 6 | 7 | 8 | 9 | 10 >> Älteste Einträge |
| © baseportal.de. Alle Rechte vorbehalten. Nutzungsbedingungen |