logout.pl

来自「使用perl和C写的基于Web的管理数据库表的程序」· PL 代码 · 共 15 行

sub PreCreateForm ()
{
   if(&SessionIdGetState("ActualLogin"))
   {
      &SessionIdDelState('ActualLogin');

   }

   &Redirect("0000000000000000", "WWWdb:Index");
}


1;