PHP8.1.21版本已发布
vue8.1.21版本已发布
jquery8.1.21版本已发布

access connections 用PHP和ACCESS写聊天室十

原创
2016-07-29 08:34:29 756浏览

func.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 = instr($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,"")) $bNeed="True";
if ($bNeed!="True" || !strstr($sOther," if ($bNeed!="True" || !strstr($sOther,"")) $bNeed="True";
if ($bNeed!="True" || !strstr($sOther," if ($bNeed!="True" || !strstr($sOther,"")) $bNeed="True";
if ($bNeed!="True" || !strstr($sOther," if ($bNeed!="True" || !strstr($sOther,"")) $bNeed="True";
if ($bNeed!="True" || !strstr($sOther,"
if ($bNeed!="True" || !strstr($sOther,"
")) $bNeed="True";
if ($bNeed!="True" || !strstr($sOther," if ($bNeed!="True" || !strstr($sOther,"")) $bNeed="True";
if ($bNeed!="True" || !strstr($sOther,"")) $bNeed="True";
if ($bNeed!="True" || !strstr($sOther,"")) $bNeed="True";
if ($bNeed!="True" || !strstr($sOther," if ($bNeed!="True" || !strstr($sOther,"")) $bNeed="True";
if ($bNeed!="True" || !strstr($sOther," if ($bNeed!="True" || !strstr($sOther,"")) $bNeed="True";
if ($bNeed!="True" || !strstr($sOther," if ($bNeed!="True" || !strstr($sOther,"")) $bNeed="True";
if ($bNeed!="True" || !strstr($sOther," if ($bNeed!="True" || !strstr($sOther,"")) $bNeed="True";
if ($bNeed!="True" || !strstr($sOther," if ($bNeed!="True" || !strstr($sOther,"")) $bNeed="True";
if ($bNeed!="True" || !strstr($sOther,"")) $bNeed="True";
if ($bNeed!="True" || !strstr($sOther,"")) $bNeed="True";
if ($bNeed!="True" || !strstr($sOther," if ($bNeed!="True" || !strstr($sOther,"FONT-SIZE:")) $bNeed="True";
if ($bNeed=="True")
return str_replace(">",">",str_replace(" else
return $sStr;
}
function AddLost($sStr){
$ret=$sStr;
$ret.=StrDupl(">", (StrOccurs(strtoupper($ret), "")));
$ret.=StrDupl("", (StrOccurs(strtoupper($ret), "")));
$ret.=StrDupl("", (StrOccurs(strtoupper($ret), "")));
$ret.=StrDupl("", (StrOccurs(strtoupper($ret), "")));
$ret.=StrDupl("", (StrOccurs(strtoupper($ret), "")));
$ret.=StrDupl("", (StrOccurs(strtoupper($ret), "")));
$ret.=StrDupl("", (StrOccurs(strtoupper($ret), "")));
$ret.=StrDupl("", (StrOccurs(strtoupper($ret), "")));
$ret.=StrDupl("", (StrOccurs(strtoupper($ret), "")));
$ret.=StrDupl("", (StrOccurs(strtoupper($ret), "")));
$ret.=StrDupl("", (StrOccurs(strtoupper($ret), "")));
$ret.=StrDupl("", (StrOccurs(strtoupper($ret), "")));
$ret.=StrDupl("", (StrOccurs(strtoupper($ret), "")));
$ret.=StrDupl("", (StrOccurs(strtoupper($ret), "")));
$ret.=StrDupl("", (StrOccurs(strtoupper($ret), "")));
$ret.=StrDupl("", (StrOccurs(strtoupper($ret), "")));
$ret.=StrDupl("", (StrOccurs(strtoupper($ret), "")));
$ret.=StrDupl("", (StrOccurs(strtoupper($ret), "")));
$ret.=StrDupl("", (StrOccurs(strtoupper($ret), "")));
$ret.=StrDupl("", (StrOccurs(strtoupper($ret), "

")));
$ret.=StrDupl("", (StrOccurs(strtoupper($ret), "

")));
$ret.=StrDupl("", (StrOccurs(strtoupper($ret), "

")));
$ret.=StrDupl("", (StrOccurs(strtoupper($ret), "

")));
$ret.=StrDupl("", (StrOccurs(strtoupper($ret), "

")));
$ret.=StrDupl("", (StrOccurs(strtoupper($ret), "
")));
$ret.=StrDupl("", (StrOccurs(strtoupper($ret), "")));
return $ret;
}
?>
【本文版权归作者与奥索网共同拥有,如需转载,请注明作者及出处】

以上就介绍了access connections 用PHP和ACCESS写聊天室十,包括了access connections方面的内容,希望对PHP教程有兴趣的朋友有所帮助。

声明:本文内容由网友自发贡献,版权归原作者所有,本站不承担相应法律责任。如您发现有涉嫌抄袭侵权的内容,请联系admin@php.cn核实处理。