<html><head>
<title>Eingabe von Id Nummer und Passwort beim Automarkt</title>
</head><body bgcolor=ffffff font face="arial" size=2>
<center>
<img src="http://www.regio-stellenmarkt.de/portal/assets/images/automarkt.gif">
<perl>
if($einid ne "")
{
get "Id==$einid", "auto";
if ($einpasswort eq $Passwort)
{
if ($einchange eq "Ja")
{
mod "Id==$Id", ["Preis",$xPreis,
"Marke",$xMarke,
"Modell",$xModell,
"Hubraum",$xHubraum,
"Leistung",$xLeistung,
"Erstzulassung",$xErstzulassung,
"Kilometer",$xKilometer,
"Ausstattung",$xAusstattung,
"Name",$xName,
"Strasse_Nr",$xStrasse_Nr,
"PLZ_Ort_Land",$xPLZ_Ort_Land,
"Telefon_Fax",$xTelefon_Fax,], "auto";
out "<font face=arial size=2>Ihr Eintrag in der Gebrauchtwagendatenbank wurde geändert.</font>";
} else
{
out <<EOF3;
<h3><font face=arial> Bitte ändern Sie die Angaben soweit gewünscht. Bitte nicht vergessen die Änderungen am Schluss mit "Speichern" zu bestätigen.</h3><p>
<table>
<form action="http://regio-stellenmarkt.de/baseportal/auto_login"
methode="post" enctype="multipart/form-data">
<input type=hidden name="einid" value="$Id">
<input type=hidden name="einpasswort" value="$Passwort">
<input type=hidden name="einchange" value="Ja">
<tr><td>Preis:</td><td><input type="text" name="xPreis" value="$Preis"></td></tr>
<tr><td>Marke:</td><td><input type="text" name="xMarke" value="$Marke" size=50></td></tr>
<tr><td>Modell:</td><td><input type="text" name="xModell" value="$Modell" size=50></td></tr>
<tr><td>Hubraum:</td><td><input type="text" name="xHubraum" value="$Hubraum" size=50></td></tr>
<tr><td>Leistung:</td><td><input type="text" name="xLeistung" value="$Leistung" size=50></td></tr>
<tr><td>Erstzulassung:</td><td><input type="text" name="xErstzulassung" value="$Erstzulassung" size=50></td></tr>
<tr><td>Kilometer:</td><td><input type="text" name="xKilometer" value="$Kilometer" size=50></td></tr>
<tr><td>Ausstattung:</td><td><input type="text" name="xAusstattung" value="$Ausstattung" size=50></td></tr>
<tr><td>Name:</td><td><input type="text" name="xName" value="$Name" size=50></td></tr>
<tr><td>Strasse/Nr:</td><td><input type="text" name="xStrasse_Nr" value="$Strasse_Nr" size=50></td></tr>
<tr><td>PLZ/Ort/Land:</td><td><input type="text" name="xPLZ_Ort_Land" value="$PLZ_Ort_Land" size=50></td></tr>
<tr><td>Telefon_Fax:</td><td><input type="text" name="xTelefon_Fax" value="$Telefon_Fax"></td></tr>
<tr><td></td><td><input type="submit" value="Speichern"></td></tr>
</form>
</table>
EOF3
}
} else
{
out<<EOF2;
<font face=arial>
<h4>Leider sind Id Nummer oder Passwort falsch, bitte versuchen Sie es erneut</h4>
<h5>Eingabe von Id Nummer und Passwort</h5>
<form action="http://regio-stellenmarkt.de/baseportal/auto_login" methode="post" enctype="multipart/form-data">
<tr><td>Id-Nr.:</td><td><input type="text" name="einid"></td></tr>
<tr><td>Passwort:</td><td><input type="password" name="einpasswort"></td></tr>
<tr><td></td><td><input type="submit" value="Abschicken"></td></tr>
</form>
</table>
EOF2
}
} else
{
out<<EOF;
<br>
<br>
<font face=arial size=3>
Login in den Automarkt mit Id - Nummer + Passwort</font>
<font face=arial size=2><br>
Id Nummer oder Passwort vergessen ? <A HREF="mailto:ahv-gmbh@t-online.de">Passwort per Mail.</A>
<table>
<tr><td width="100"> <form action="http://regio-stellenmarkt.de/baseportal/auto_login" methode="post" enctype="multipart/form-data">
<tr><td>Id-Nr.:</td><td><input type="text" name="einid"></td></tr>
<tr><td>Passwort:</td><td><input type="password" name="einpasswort"></td></tr>
<tr><td></td><td><input type="submit" value="Abschicken"></td></tr>
</form>
</td></tr>
</table>
EOF
}
</perl>
</body></html>