社区（php&&mysql）一

function cook_cooloff（）{
    global $PHP_SELF,$aid,$pgno;
    setcookie（"OPEN_LIST",0,time（）+ 31536000）;
    Header（"Location:$PHP_SELF？aid=$aid&pgno=$pgno"）;
    exit;
}
//===============================================================
function cook_coolon（）{
    global $PHP_SELF,$aid,$pgno;
    setcookie（"OPEN_LIST",1,time（）+ 31536000）;
    Header（"Location:$PHP_SELF？aid=$aid&pgno=$pgno"）;
    exit;
}
function check_mail（$semail）
{
    $str=strchr（$semail,"@"）;
    if （$str==""） return false;
    $str=strchr（$semail,"."）;
    if （$str==""） return false;
    return true;
}
//================================================================
function addhitviews（$sid,$rid） {
    $DROOT=getenv（"DOCUMENT_ROOT"）;
    include（"sql.php3"）;
    $db=mysql_connect（$sql["host"], $sql["user"] , $sql["passwd"]）;
    if（$sid==$rid）     $qsql="SELECT * from bbs_subj where id="$rid"";
    else $qsql="SELECT * from bbs_docs where id="$rid"";
    $rs=mysql_db_query（$sql["db"],$qsql）;
    $row=mysql_fetch_array（$rs）;
    $views=$row["views"];
    $views++;
    if（$sid==$rid）     $qsql="UPDATE bbs_subj SET views="$views" where id="$rid"";
    else $qsql="UPDATE bbs_docs SET views="$views" where id="$rid"";

    mysql_db_query（$sql["db"],$qsql）;
}

//===============================================================
function mail_list（）{
    global $PHP_SELF,$HTTP_HOST,$email;
    global $aid,$sid,$rid;
    global $way1,$way2;

    if（check_mail（$email）） {
    $mailtype=0; //璹綷
    if（strlen（$way2）） $mailtype=1;//

    $DROOT=getenv（"DOCUMENT_ROOT"）;
    include（"sql.php3"）;
    $db=mysql_connect（$sql["host"], $sql["user"] , $sql["passwd"]）;
    if（$mailtype==0） { //璹綷
        $qsql="SELECT * from bbs_sml where sid="$sid" AND email="$email"";
        $rs=mysql_db_query（$sql["db"],$qsql）;
        if（mysql_num_rows（$rs）==0） { //临⊿
          $qsql="INSERT INTO  bbs_sml （sid,email） values（"$sid","$email"）";
          $rs=mysql_db_query（$sql["db"],$qsql）;
        } else {
          echo "
          <script language=javascript>
          alert（"竒,ぃ惠狡"）;
          </script>
         ";
        }
    } else { //璹綷
        $qsql="SELECT * from bbs_sml where sid="$sid" AND email="$email"";
        $rs=mysql_db_query（$sql["db"],$qsql）;
        if（mysql_num_rows（$rs） > 0） { //虫
          $qsql="DELETE FROM  bbs_sml where sid="$sid" AND email="$email"";
          $rs=mysql_db_query（$sql["db"],$qsql）;
        } else {
          echo "
          <script language=javascript>
            alert（"﹟ゼ虫ず！"）;
          </script>
         ";

        }

    }

    } else {
        echo "
          <script language=javascript>
              alert（"E-mailΑ岿粇"）;
          </script>
         ";
    }
    echo "
          <script language=javascript>
          document.location="$PHP_SELF？proc=view&aid=$aid&sid=$sid&rid=$rid"
          </script>
         ";
}

//===============================================================
function Send_the_doc_to_mail_list（$aid,$sid,$rid）{
    global $PHP_SELF,$HTTP_HOST;
    $DROOT=getenv（"DOCUMENT_ROOT"）;
    include（"sql.php3"）;
    $db=mysql_connect（$sql["host"], $sql["user"] , $sql["passwd"]）;
    if（$sid==$rid）     $qsql="SELECT * from bbs_subj where id="$sid"";
    else $qsql="SELECT * from bbs_docs where id="$rid"";

    $rs=mysql_db_query（$sql["db"],$qsql）;
    $row=mysql_fetch_array（$rs）;
    $poster=$row["poster"];
    $banner=$row["banner"];
    $body=$row["body"];

    $subj=$c_poster."ㄓ璹綷ゅ彻";
    $message=":$poster ";
    $message.="ゅ彻夹肈:$banner ";
    $message.="ゅ彻ず甧:$body ";
    $message.=" ㄤ闽ゅ彻叫 http://$HTTP_HOST$PHP_SELF？proc=view&aid=$aid&sid=$sid&rid=$rid ";
    $message.="<<舧>> ";
    $mailfrom="From:Magic Jerry";

    $qsql="SELECT * from bbs_sml where sid="$sid"";
    $rs=mysql_db_query（$sql["db"],$qsql）;
    while（$row=mysql_fetch_array（$rs）） { //mail_list
        $email=$row["email"];
        mail（$email,$subj,$message,$mailfrom）;
        echo $email;
    }
    //盚倒恨瞶
    $qsql="SELECT * from bbs_area where id="$aid"";
    $rs=mysql_db_query（$sql["db"],$qsql）;
    $row=mysql_fetch_array（$rs）;
    $email=$row["email"];
    $banner=$row["banner"];

    mail（$email,"$banner 穝秈ゅ彻",$message,$mailfrom）;

}
//===============================================================
function mail_friend（）{
    global $PHP_SELF,$HTTP_HOST,$c_email,$c_poster,$frmail;
    global $aid,$sid,$rid;
    if（check_mail（$frmail）） {
    $DROOT=getenv（"DOCUMENT_ROOT"）;
    include（"sql.php3"）;
    $db=mysql_connect（$sql["host"], $sql["user"] , $sql["passwd"]）;
    if（$sid==$rid） {
        $qsql="SELECT * from bbs_subj where id="$rid" ";
    } else {
        $qsql="SELECT * from bbs_docs where id="$rid" ";
    }
    $rs=mysql_db_query（$sql["db"],$qsql）;
    $row=mysql_fetch_array（$rs）;

    $banner=$row["banner"];
    $body=$row["body"];

    $subj=$c_poster."ざ残ゅ彻";
    $message="狟ね: $c_poster ざ残硂ゅ彻 ";
    $message.="ゅ彻夹肈:$banner ";
    $message.="ゅ彻ず甧:$body ";
    $message.=" ㄤ闽ゅ彻叫 http://$HTTP_HOST$PHP_SELF？proc=view&sid=$sid&aid=$aid&rid=$rid ";
    $message.="<<舧>> ";
    $mailfrom="From:".$c_email;

    mail（$frmail,$subj,$message,$mailfrom）;
    }else {
        echo "
          <script language=javascript>
              alert（"E-mailΑ岿粇"）;
          </script>
         ";
    }
    //echo "rid=$rid a=$aid s=$sid p=$pgno";

    echo "
          <script language=javascript>
          document.location="$PHP_SELF？proc=view&aid=$aid&sid=$sid&rid=$rid"
          </script>
         ";
}

待续......