Shopsystem ShopPilot

ShopPilot => SSP - Shop Server Pages => SSP Bibliothek => Thema gestartet von: dobra am September 06, 2007, 13:45:24

Titel: nach login auf Ausgangsseite zurück
Beitrag von: dobra am September 06, 2007, 13:45:24
Hallo,

Mit einem Tipp und Hilfe von ahe - DANKE - habe ich eine Lösung gebastelt, mit der man beim einloggen (egal auf welcher Seite) wieder auf diese Seite zurückkommt.

Folgende Schritte sind notwendig:

1.)  Die LoginOK-Seite
hier steht nichts außer
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
 <html>
<head>
__logcheck::seite__
</head>
</html>

2.)  der ssp-Code (ich habs in stdall.ipl geschrieben)
<!--spmacro:module(logcheck)
sub seite {
my $seite = ssp::get_var_form('seite');
my $dseite = ssp::get_var_form('dseite');
my $ifdseite = ssp::get_var_form('ifdseite');

if ($ifdseite == 3) { my $out = qq | <META HTTP-EQUIV="REFRESH" CONTENT="0; URL=http://__xxpath__?showd$seite!0,__xxsession__,$dseite"> |;
main::mprint $out;
return "noinc";
}
                        if (($ifdseite >= 11) && ($ifdseite <= 17)) { my $out = qq | <META HTTP-EQUIV="REFRESH" CONTENT="0; URL=http://__xxpath__?showwk,__xxsession__"> |;
                        main::mprint $out;
                        return "noinc";
                        }
else {my $out = qq | <META HTTP-EQUIV="REFRESH" CONTENT="0; URL=http://__xxpath__?show$seite,__xxsession__"> |;
main::mprint $out;
return "noinc";
}
}
-->

3.) das login - Formular ergänzen

<!--spmacro:module(login)
sub form{
        my $dseite = ssp::get_var_article('itemid',0);
my %pageinfo = ssp::getCurrentPageInfo();
my $ifdseite = $pageinfo{pagetype};

     $x = qq|
<form method="POST" action="__xlogin__">
<input type="hidden" name="seite" value="$ssp::pgid">
<input type="hidden" name="dseite" value="$dseite">
<input type="hidden" name="ifdseite" value="$ifdseite">
                        ....
        |,
  main::mprint($x);

}
-->

und  __xlogin__ mit __login::form__ auf der HTML-Seite ersetzen