编程 PHP

用PHP和ACCESS写聊天室(十)

Posted in PHP onOctober 09, 2006

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),"¦",$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,"<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(">",">",str_replace("<","<",$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;
}
?>

【本文版权归作者与奥索网共同拥有，如需转载，请注明作者及出处】

用PHP和ACCESS写聊天室(十)

声明：登载此文出于传递更多信息之目的，并不意味着赞同其观点或证实其描述。

PHP 相关文章推荐

[FAQ]PHP中的一些常识：类篇

Oct 09 PHP

drupal 代码实现URL重写

May 04 PHP

比较时间段一与时间段二是否有交集的php函数

May 31 PHP

php遍历数组的方法分享

Mar 22 PHP

9段PHP实用功能的代码推荐

Oct 14 PHP

php防止站外远程提交表单的方法

Oct 20 PHP

PHP中Header使用的HTTP协议及常用方法小结

Nov 04 PHP

PHP采用get获取url汉字出现乱码的解决方法

Nov 13 PHP

PHP中的socket_read和socket_recv区别详解

Feb 09 PHP

PHP不使用内置函数实现字符串转整型的方法示例

Jul 03 PHP

PHP7扩展开发之hello word实现方法详解

Jan 15 PHP

PHP如何使用cURL实现Get和Post请求

Jul 11 PHP

php生成EXCEL的东东

Oct 09 #PHP

一个取得文件扩展名的函数

Oct 09 #PHP

PHP 如何向 MySQL 发送数据

Oct 09 #PHP

PHP安装攻略:常见问题解答（一）

Oct 09 #PHP

利用PHP实现与ASP Banner组件相似的类

Oct 09 #PHP

PHP聊天室技术

Oct 09 #PHP

在windows iis5下安装php4.0+mysql之我见

Oct 09 #PHP

You might like

PHP的一个基础知识表单提交

2011/07/04 PHP

php函数的常用方法及注意之处小结

2011/07/10 PHP

一个简单的PHP验证码实现代码

2014/05/10 PHP

详解PHP数组赋值方法

2015/11/07 PHP

Avengerls vs Newbee BO3 第一场2.18

2021/03/10 DOTA

永不消失的title提示代码

2007/02/15 Javascript

nicejforms——美化表单不用愁

2007/02/20 Javascript

XRegExp 0.2: Now With Named Capture

2007/11/30 Javascript

防止动态加载JavaScript引起的内存泄漏问题

2009/10/08 Javascript

StringTemplate遇见jQuery冲突的解决方法

2011/09/22 Javascript

javascript获取web应用根目录的方法

2014/02/12 Javascript

AngularJS中实现用户访问的身份认证和表单验证功能

2016/04/21 Javascript

js 动态生成json对象、时时更新json对象的方法

2016/12/02 Javascript

浅谈JavaScript的计时器对象

2016/12/26 Javascript

jQuery选择器_动力节点Java学院整理

2017/07/05 jQuery

Vue使用枚举类型实现HTML下拉框步骤详解

2018/02/05 Javascript

浅析Vue中method与computed的区别

2018/03/06 Javascript

修改Nodejs内置的npm默认配置路径方法

2018/05/13 NodeJs

layui.tree组件的使用以及搜索节点功能的实现

2019/09/26 Javascript

微信小程序swiper使用网络图片不显示问题解决

2019/12/13 Javascript

vue 防止页面加载时看到花括号的解决操作

2020/11/09 Javascript

python类继承与子类实例初始化用法分析

2015/04/17 Python

Python读取excel指定列生成指定sql脚本的方法

2018/11/28 Python

浅谈python标准库--functools.partial

2019/03/13 Python

Tensorflow安装问题: Could not find a version that satisfies the requirement tensorflow

2020/04/20 Python

SmartBuyGlasses丹麦：网上购买名牌太阳镜、眼镜和隐形眼镜

2016/10/01 全球购物

稀有和绝版书籍：Biblio.com

2017/02/02 全球购物

英国Office鞋店德国网站：在线购买鞋子、靴子和运动鞋

2018/12/19 全球购物

Lime Crime官网：美国一家主打梦幻精灵系的彩妆品牌

2019/03/22 全球购物

Flesh Beauty官网：露华浓集团旗下彩妆品牌

2021/02/15 全球购物

经典c++面试题五

2014/12/17 面试题

学校元旦晚会方案

2014/02/19 职场文书

班主任工作经验交流材料

2014/05/13 职场文书

2014年药品销售工作总结

2014/12/16 职场文书

会计出纳岗位职责

2015/03/31 职场文书

pycharm部署django项目到云服务器的详细流程

2021/06/29 Python