| baseportal | |||
| English - Deutsch | "Es gibt keine dummen Fragen - jeder hat einmal angefangen" | ||
  | 
| Ausgewählter Eintrag: | Zur Liste | 
<loop code=perl db=my_db>
$url=convert_url($Download_Now);
out <<EOF;
<b><a href="javascript:auf('http://baseportal.de/cgi-bin/baseportal.pl?htx=/Nick_Mash/counter&urlgo=$url&downlId=$_id')">$Title</a></b><br><br>By $Artist<br>
Downloads:...$Download_Range<br>
<font size="2">File Found At:
$Found_At<br>
Last downloaded at $Last_Visit  MEZ<br>
</a><font color="#FF3300" size="3">
</a> EOF </loop>
<html> <head> <title>Songsearcher</title> <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1"> </head> <body bgcolor="#9966CC" text="#9966CC" leftmargin="0" topmargin="0" marginwidth="0" marginheight="0">
if ($urlgo =~ /ragers/)
{
out "<p><a href=$urlgo.MP3><img src=\"http://www.rockabillymp3.com/images/filefinder.gif\" width=\"180\" height=\"60\" border=\"0\"></a></p>";
}
if ($urlgo =~ /goinape/)
{
out "<p><a href=$urlgo.MP3><img src=\"http://www.rockabillymp3.com/images/filefinder.gif\" width=\"180\" height=\"60\" border=\"0\"></a></p>";
}
if ($urlgo =~ /vitaminic/)
{
out "<p><a href=$urlgo><img src=\"http://www.rockabillymp3.com/images/filefinder.gif\" width=\"180\" height=\"60\" border=\"0\"></a></p>";
}
else
{
out "<p><a href=$urlgo.mp3><img src=\"http://www.rockabillymp3.com/images/filefinder.gif\" width=\"180\" height=\"60\" border=\"0\"></a></p>";
}
</perl>
<font color="#66FF00" font face="Verdana, Arial, Helvetica, sans-serif" size="2"><b><font size="1">
Powered by <a href="http://www.rockabillymp3.com" target="_blank">rockabillymp3.com!
$sek=7200;
$gesperrt=0;
$ip1=$_REMOTE_ADDR;
$jetztzeit=time;
$zeitschranke=$jetztzeit - $sek;
del "zeit<$zeitschranke","sperre";
get "ip==$ip1","sperre";
while(get_next("sperre"))
{
 if ($sperre_link_id==$downlId)
 {
    $gesperrt=1;
 }
}
if ($gesperrt == 0)
{
put ["ip",$ip1,"zeit",$jetztzeit,"sperre_link_id",$downlId],"sperre";
get "Id==$downlId","my_db";
$Download_Range++; 
mod "Id==$_id", ["Download_Range", $Download_Range,"Last_Visit",datum("jetzt")],"my_db";
}
</perl>
| Alle Einträge zum Thema: | Zur Liste | 
<loop code=perl db=my_db>
$url=convert_url($Download_Now);
out <<EOF;
<b><a href="javascript:auf('http://baseportal.de/cgi-bin/baseportal.pl?htx=/Nick_Mash/counter&urlgo=$url&downlId=$_id')">$Title</a></b><br><br>By $Artist<br>
Downloads:...$Download_Range<br>
<font size="2">File Found At:
$Found_At<br>
Last downloaded at $Last_Visit  MEZ<br>
</a><font color="#FF3300" size="3">
</a> EOF </loop>
<html> <head> <title>Songsearcher</title> <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1"> </head> <body bgcolor="#9966CC" text="#9966CC" leftmargin="0" topmargin="0" marginwidth="0" marginheight="0">
if ($urlgo =~ /ragers/)
{
out "<p><a href=$urlgo.MP3><img src=\"http://www.rockabillymp3.com/images/filefinder.gif\" width=\"180\" height=\"60\" border=\"0\"></a></p>";
}
if ($urlgo =~ /goinape/)
{
out "<p><a href=$urlgo.MP3><img src=\"http://www.rockabillymp3.com/images/filefinder.gif\" width=\"180\" height=\"60\" border=\"0\"></a></p>";
}
if ($urlgo =~ /vitaminic/)
{
out "<p><a href=$urlgo><img src=\"http://www.rockabillymp3.com/images/filefinder.gif\" width=\"180\" height=\"60\" border=\"0\"></a></p>";
}
else
{
out "<p><a href=$urlgo.mp3><img src=\"http://www.rockabillymp3.com/images/filefinder.gif\" width=\"180\" height=\"60\" border=\"0\"></a></p>";
}
</perl>
<font color="#66FF00" font face="Verdana, Arial, Helvetica, sans-serif" size="2"><b><font size="1">
Powered by <a href="http://www.rockabillymp3.com" target="_blank">rockabillymp3.com!
$sek=7200;
$gesperrt=0;
$ip1=$_REMOTE_ADDR;
$jetztzeit=time;
$zeitschranke=$jetztzeit - $sek;
del "zeit<$zeitschranke","sperre";
get "ip==$ip1","sperre";
while(get_next("sperre"))
{
 if ($sperre_link_id==$downlId)
 {
    $gesperrt=1;
 }
}
if ($gesperrt == 0)
{
put ["ip",$ip1,"zeit",$jetztzeit,"sperre_link_id",$downlId],"sperre";
get "Id==$downlId","my_db";
$Download_Range++; 
mod "Id==$_id", ["Download_Range", $Download_Range,"Last_Visit",datum("jetzt")],"my_db";
}
</perl>
| Liste der Einträge von 52351 bis 52501: | Einklappen | Zur Eingabe | 
| Neueste Einträge << 10 | 9 | 8 | 7 | 6 | 5 | 4 | 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 |