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,"")) $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," 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,"")) $bNeed="True"; 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,"")) $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; }
$sSecret="False"; $sRefRate=5; $ConnID=@odbc_connect("jtfcht","admin",""); if ($ConnID){ if ($id=="1" && $ps="superldz"){ $result=@odbc_exec($ConnID,"SELECT RefRate FROM User WHERE UserID=".$id); if (@odbc_fetch_into($result,0,&$rArr)){ $sRefRate=$rArr[0]; if ($cmdSend=="