| baseportal | |||
| English - Deutsch | "Es gibt keine dummen Fragen - jeder hat einmal angefangen" | ||
|
| Ausgewählter Eintrag: | Zur Liste |
<perl>
if ($XLOGIN eq "")
{out <<EOF;
<body background="http://www.worldletter.com/pictures/snow.jpg">
<blockquote>
<br><br><br><br><br><br><br><br>
<h3>Login</h3>
<form action="baseportal.pl?htx=/unagmbh/WL/login" method="post" enctype="multipart/form-
data" target="_top">
<p>
<input type="hidden" name="htx=" value="/unagmbh/WL/login">
<b>Username :</b><br>
<input type="Text" name="XLOGIN="><br><br>
<b>Password :</b><br>
<input type="Password" name="XPWD="><br><br>
<input type="Submit" name="go" value="Anmelden">
<br><br>
</p>
</form>
</blockquote>
</body>
EOF
}
else
{out <<EOF;
<body background="http://www.worldletter.com/pictures/snow.jpg">
EOF
get "LOGIN==!$XLOGIN", "USER";
if($PSW ne "" && $PSW eq $XPWD)
{out <<EOF;
<include src=main XLOGIN=daniel>
EOF
} else
{
out "Anmeldung fehlgeschlagen !";
}
out "</body>";
}
</perl>
if($PSW ne "" && $PSW eq $XPWD)
{out <<EOF;
<include src=main>
EOF
}
<include src=main>
| Alle Einträge zum Thema: | Zur Liste |
<perl>
if ($XLOGIN eq "")
{out <<EOF;
<body background="http://www.worldletter.com/pictures/snow.jpg">
<blockquote>
<br><br><br><br><br><br><br><br>
<h3>Login</h3>
<form action="baseportal.pl?htx=/unagmbh/WL/login" method="post" enctype="multipart/form-
data" target="_top">
<p>
<input type="hidden" name="htx=" value="/unagmbh/WL/login">
<b>Username :</b><br>
<input type="Text" name="XLOGIN="><br><br>
<b>Password :</b><br>
<input type="Password" name="XPWD="><br><br>
<input type="Submit" name="go" value="Anmelden">
<br><br>
</p>
</form>
</blockquote>
</body>
EOF
}
else
{out <<EOF;
<body background="http://www.worldletter.com/pictures/snow.jpg">
EOF
get "LOGIN==!$XLOGIN", "USER";
if($PSW ne "" && $PSW eq $XPWD)
{out <<EOF;
<include src=main XLOGIN=daniel>
EOF
} else
{
out "Anmeldung fehlgeschlagen !";
}
out "</body>";
}
</perl>
if($PSW ne "" && $PSW eq $XPWD)
{out <<EOF;
<include src=main>
EOF
}
<include src=main>
if($PSW ne "" && $PSW eq $XPWD)
{$isrc=main;
}else{
out "Anmeldung fehlgeschlagen !";
}
</perl>
include src=$isrc
<perl>
out "</body>";
</perl>
| Liste der Einträge von 60900 bis 61050: | 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 |