六月婷婷综合激情-六月婷婷综合-六月婷婷在线观看-六月婷婷在线-亚洲黄色在线网站-亚洲黄色在线观看网站

明輝手游網中心:是一個免費提供流行視頻軟件教程、在線學習分享的學習平臺!

用PHP與ACCESS寫聊天室(10)

[摘要]func.php3 代碼如下: <?php function suiji(max) srand((double)microtime()*1000000); x=rand(); y=getrandmax(); r=x/y*(ma...
func.php3
代碼如下:
<?php
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 = instr($sTemp,strpos($sTemp,$sFind)+$iLen);
                        $iCount++;
                }
        }
        return $iCount;
}

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

function DelQuot($sStr){
        $s=str_replace(chr(124),"&brvbar;",$sStr);
        $s=str_replace(chr(39),"&acute;",$s);
        $s=str_replace(chr(34),"&quot;",$s);
        return s;
}

function DelTag($sStr){
        $bNeed="False";
        $sOther=strtoupper($sStr);
        if ($bNeed!="True" !strstr($sOther,"<TABLE")) $bNeed="True";
        if ($bNeed!="True" !strstr($sOther,"</TABLE")) $bNeed="True";
        if ($bNeed!="True" !strstr($sOther,"<SCRIPT")) $bNeed="True";
        if ($bNeed!="True" !strstr($sOther,"</SCRIPT")) $bNeed="True";
        if ($bNeed!="True" !strstr($sOther,"<BODY")) $bNeed="True";
        if ($bNeed!="True" !strstr($sOther,"</BODY")) $bNeed="True";
        if ($bNeed!="True" !strstr($sOther,"<HTML")) $bNeed="True";
        if ($bNeed!="True" !strstr($sOther,"</HTML")) $bNeed="True";
        if ($bNeed!="True" !strstr($sOther,"<HEAD")) $bNeed="True";
        if ($bNeed!="True" !strstr($sOther,"</HEAD")) $bNeed="True";
        if ($bNeed!="True" !strstr($sOther,"<FORM")) $bNeed="True";
        if ($bNeed!="True" !strstr($sOther,"</FORM")) $bNeed="True";
        if ($bNeed!="True" !strstr($sOther,"<INPUT")) $bNeed="True";
        if ($bNeed!="True" !strstr($sOther,"</INPUT")) $bNeed="True";
        if ($bNeed!="True" !strstr($sOther,"<OPTION")) $bNeed="True";
        if ($bNeed!="True" !strstr($sOther,"</OPTION")) $bNeed="True";
        if ($bNeed!="True" !strstr($sOther,"<SELECT")) $bNeed="True";
        if ($bNeed!="True" !strstr($sOther,"</SELECT")) $bNeed="True";
        if ($bNeed!="True" !strstr($sOther,"<APPLET")) $bNeed="True";
        if ($bNeed!="True" !strstr($sOther,"</APPLET")) $bNeed="True";
        if ($bNeed!="True" !strstr($sOther,"<OBJECT")) $bNeed="True";
        if ($bNeed!="True" !strstr($sOther,"</OBJECT")) $bNeed="True";
        if ($bNeed!="True" !strstr($sOther,"<MENU")) $bNeed="True";
        if ($bNeed!="True" !strstr($sOther,"</MENU")) $bNeed="True";
        if ($bNeed!="True" !strstr($sOther,"<FRAMESET")) $bNeed="True";
        if ($bNeed!="True" !strstr($sOther,"</FRAMESET")) $bNeed="True";
        if ($bNeed!="True" !strstr($sOther,"<FRAME")) $bNeed="True";
        if ($bNeed!="True" !strstr($sOther,"</FRAME")) $bNeed="True";
        if ($bNeed!="True" !strstr($sOther,"<IFRAME")) $bNeed="True";
        if ($bNeed!="True" !strstr($sOther,"</IFRAME")) $bNeed="True";
        if ($bNeed!="True" !strstr($sOther,"<STYLE")) $bNeed="True";
        if ($bNeed!="True" !strstr($sOther,"</STYLE")) $bNeed="True";
        if ($bNeed!="True" !strstr($sOther,"<BASE")) $bNeed="True";
        if ($bNeed!="True" !strstr($sOther,"FONT-SIZE:")) $bNeed="True";
        if ($bNeed=="True")
                return str_replace(">","&gt;",str_replace("<","&lt;",$sStr));
        else
                return $sStr;
}

function AddLost($sStr){
        $ret=$sStr;
        $ret.=StrDupl(">", (StrOccurs(strtoupper($ret), "<") - StrOccurs(strtoupper($ret), ">")));
        $ret.=StrDupl("</FONT>", (StrOccurs(strtoupper($ret), "<FONT") - StrOccurs(strtoupper($ret), "</FONT>")));
        $ret.=StrDupl("</B>", (StrOccurs(strtoupper($ret), "<B") - StrOccurs(strtoupper($ret), "</B>")));
        $ret.=StrDupl("</I>", (StrOccurs(strtoupper($ret), "<I") - StrOccurs(strtoupper($ret), "</I>")));
        $ret.=StrDupl("</U>", (StrOccurs(strtoupper($ret), "<U") - StrOccurs(strtoupper($ret), "</U>")));
        $ret.=StrDupl("</S>", (StrOccurs(strtoupper($ret), "<S") - StrOccurs(strtoupper($ret), "</S>")));
        $ret.=StrDupl("</STRIKE>", (StrOccurs(strtoupper($ret), "<STRIKE") - StrOccurs(strtoupper($ret), "</STRIKE>")));
        $ret.=StrDupl("</STRONG>", (StrOccurs(strtoupper($ret), "<STRONG") - StrOccurs(strtoupper($ret), "</STRONG>")));
        $ret.=StrDupl("</SMALL>", (StrOccurs(strtoupper($ret), "<SMALL") - StrOccurs(strtoupper($ret), "</SMALL>")));
        $ret.=StrDupl("</CITE>", (StrOccurs(strtoupper($ret), "<CITE") - StrOccurs(strtoupper($ret), "</CITE>")));
        $ret.=StrDupl("</EM>", (StrOccurs(strtoupper($ret), "<EM") - StrOccurs(strtoupper($ret), "</EM>")));
        $ret.=StrDupl("</CODE>", (StrOccurs(strtoupper($ret), "<CODE") - StrOccurs(strtoupper($ret), "</CODE>")));
        $ret.=StrDupl("</SAMP>", (StrOccurs(strtoupper($ret), "<SAMP") - StrOccurs(strtoupper($ret), "</SAMP>")));
        $ret.=StrDupl("</KBD>", (StrOccurs(strtoupper($ret), "<KBD") - StrOccurs(strtoupper($ret), "</KBD>")));
        $ret.=StrDupl("</VAR>", (StrOccurs(strtoupper($ret), "<VAR") - StrOccurs(strtoupper($ret), "</VAR>")));
        $ret.=StrDupl("</DFN>", (StrOccurs(strtoupper($ret), "<DFN") - StrOccurs(strtoupper($ret), "</DFN>")));
        $ret.=StrDupl("</BIG>", (StrOccurs(strtoupper($ret), "<BIG") - StrOccurs(strtoupper($ret), "</BIG>")));
        $ret.=StrDupl("</SUP>", (StrOccurs(strtoupper($ret), "<SUP") - StrOccurs(strtoupper($ret), "</SUP>")));
        $ret.=StrDupl("</SUB>", (StrOccurs(strtoupper($ret), "<SUB") - StrOccurs(strtoupper($ret), "</SUB>")));
        $ret.=StrDupl("</H1>", (StrOccurs(strtoupper($ret), "<H1") - StrOccurs(strtoupper($ret), "</H1>")));
        $ret.=StrDupl("</H2>", (StrOccurs(strtoupper($ret), "<H2") - StrOccurs(strtoupper($ret), "</H2>")));
        $ret.=StrDupl("</H3>", (StrOccurs(strtoupper($ret), "<H3") - StrOccurs(strtoupper($ret), "</H3>")));
        $ret.=StrDupl("</H4>", (StrOccurs(strtoupper($ret), "<H4") - StrOccurs(strtoupper($ret), "</H4>")));
        $ret.=StrDupl("</H5>", (StrOccurs(strtoupper($ret), "<H5") - StrOccurs(strtoupper($ret), "</H5>")));
        $ret.=StrDupl("</H6>", (StrOccurs(strtoupper($ret), "<H6") - StrOccurs(strtoupper($ret), "</H6>")));
        $ret.=StrDupl("</H7>", (StrOccurs(strtoupper($ret), "<H7") - StrOccurs(strtoupper($ret), "</H7>")));
        return $ret;
}
?>


【本文版權歸作者與奧索網共同擁有,如需轉載,請注明作者及出處】    





主站蜘蛛池模板: 五月激情综合丁香色婷婷 | 五福影院凹凸一区二区 | 亚洲成人www | 性导航app精品视频 性荡视频在线播放视频 | 亚洲乱码国产一区网址 | 日韩精品亚洲一级在线观看 | 日韩爱| 日本国产一区在线观看 | 日本五级床片全都免费播放 | 视频二区 素人 欧美 日韩 | 在线观看视频一区二区三区 | 亚洲日本网站 | 日本a天堂| 青青草视频国产 | 视频日韩 | 日本卡一卡2卡3卡4精品卡网站 | 中国国产成人精品久久 | 亚洲综合第一区 | 亚洲黄色网页 | 亚洲中字在线 | 色婷婷在线观看视频 | 日本男女动态图 | 日韩精品久久久毛片一区二区 | 日韩高清免费在线观看 | 中文成人在线视频 | 亚洲国产中文在线 | 青草91视频免费观看 | 欧洲三级在线观看 | 综合自拍 | 天天色踪合合 | 日日爽夜夜 | 亚洲狠狠婷婷综合久久久久图片 | 小草福利| 日日插夜夜爽 | 欧美视频日韩专区午夜 | 欧美中文字幕在线看 | 天天摸夜夜添久久精品麻豆 | 伊人久久综合影院首页 | 日韩福利视频精品专区 | 五月婷婷社区 | 鸥美性生交xxxxx久久久 |