meine frage bezieht sich auf dem befehl self_url()
und zwar möchte ich eine login abfrage auf einer bestimmten seite einrichten, wenn der richtige login eingegeben wurde soll die seite erneut geladen werden damit die links zum editieren des inhalts angezeigt werden.
use CGI qw(param self_url);if($openjob eq "showlinksangebotnachfrage"){
$url=self_url();
$rowcounter=0;
$rowcounter=1;
$wurm='';
$DSN = "ihkboerse";
$DataBase = new Win32::ODBC($DSN);
$DataBase1 = new Win32::ODBC($DSN);
$login=param('login');
$passwort=param('passwort');
if(!$DataBase->Sql("SELECTid,ueberschrift,text from infos where boerse=$id and typ LIKE '$typ' order by ueberschrift")) {@FieldNames = $DataBase->FieldNames();
while($DataBase->FetchRow()){undef %Data;%Data = $DataBase->DataHash();$rowcounter++;
$wurm="$wurm<tr><td class=mittetext><br><b>$Data{$FieldNames[1]}</b></td></tr>
<tr><td class=mittetext><br>$Data{$FieldNames[2]}</td></tr>
<tr><td class=mittetext><br><a class=menulinks1 href=/cgi-bin/ihkhome.pl?session=&sprache=&job=linkinfozeigen&openjob=inseratantworten&mrechts=11&id=$Data{$FieldNames[0]}&open1=2&typ=a&kategorie=Angebote>Antworten</a></td></tr>";
if (! $DataBase1->Sql("SELECT id,name,password from zugang where id=22")) {@FieldNames1 = $DataBase1->FieldNames();
while($DataBase1->FetchRow()){undef %Data1;%Data1 = $DataBase1->DataHash();$rowcounter1++;
if($login eq $Data1{$FieldNames1[1]} and $passwort eq $Data1{$FieldNames1[2]}){
$wurm="$wurm<tr><td class=mittetext>Edit</td><td>Löschen</td></tr>";
}
}}
}}
$html_imitte="
<table class=menurechts>
<tr><td width=640 class=>$kategorie</td></tr>
</table>
<table>
$wurm
</table>
";
$html_mrechts3="
<FORM name=passform method=POST action=$url>
<table class=menurechts width=$breite_a>
<tr><td><input name=login headline size=15 type=password value=></td></tr>
<tr><td><input name=passwort headline size=15 type=password value=></td></tr>
<tr><td><input name=login headline size=15 type=submit value=Login></td></tr>
</table>
</FORM> ";
}
problem ist allerdings das dann wenn ich self_url() benutze die sonderzeichen in der url in ";" umgewandelt werden
...pl?session=&sprache=&job=linkinfozeigen&openjob=showlinksangebotnachfrage&mrechts=11&id=2&open1=2&typ=a&kategorie=Angebote
.pl?session=;sprache=;job=linkinfozeigen;openjob=showlinksangebotnachfrage;mrechts=11;id=2;open1=2;typ=a;kategorie=Angebote
hat jemand eine ahnung woran das liegt bzw wie man das problem lösen kann
danke im vorraus
mfg
andreas
Datum: 10.01.2007-13:44
self_url( )
