用ＰＨＰ和ＡＣＣＥＳＳ写聊天室(三)

cinput.php3
如下:









function suiji($max){
    srand((double)microtime()*1000000);
    $x=rand();
    $y=getrandmax();
    $r=$x/$y*($max-1);
    $r=round($r++);
    return $r;
}

function StrOccurs($sStr, $sFind){
    $sTemp=$sStr;
    $iLen=strlen($sFind);
    $iCount=0;
    while (true){
        if (strstr($sTemp, $sFind))
            break;
        else{
            $sTemp = substr($sTemp,strpos($sTemp,$sFind)+$iLen);
            $iCount++;
        }
    }
    return $iCount;
}

function StrDupl($sStr, $iCnt){
    $ret="";
    for($i=1;$i        $ret.=$sStr;
    return $ret;
}

function DelQuot($sStr){
    $s=str_replace(chr(124),"¦",$sStr);
    $s=str_replace(chr(39),"´",$s);
    $s=str_replace(chr(34),""",$s);
    return $s;
}

function DelTag($sStr){
    $bNeed="False";
    $sOther=strtoupper($sStr);
    if ($bNeed!="True" || !strstr($sOther,"    if ($bNeed!="True" || !strstr($sOther,"")) $bNeed="True";
    if ($bNeed!="True" || !strstr($sOther,"<script></script>    if ($bNeed!="True" || !strstr($sOther,"")) $bNeed="True";
    if ($bNeed!="True" || !strstr($sOther,"    if ($bNeed!="True" || !strstr($sOther,"")) $bNeed="True";
    if ($bNeed!="True" || !strstr($sOther,"