nach login auf Ausgangsseite zurück

dobra · 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

Code [Auswählen]

<!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)

Code [Auswählen]

<!--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

Code [Auswählen]

	
<!--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

nach login auf Ausgangsseite zurück

dobra