<?
 / / ※ CheckMoney ($ C_Money) 检查 数据 是否 是 99.999,99 格式
 / / ※ CheckEmailAddr ($ C_mailaddr) 判断 是否 为 有效 邮件 地址
 / / ※ CheckWebAddr ($ C_weburl) 判断 是否 为 有效 网址
 / / ※ CheckEmpty ($ C_char) 判断 字符串 是否 为 空
 / / ※ CheckLengthBetween ($ C_char, I_len1 $, $ I_len2 = 100) 判断 是否 为 指定 长度 内 字符串
 / / ※ CheckUser ($ C_user) 判断 是否 为 合法 用户 名
 / / ※ checkpassword ($ C_passwd) 判断 是否 为 合法 用户 密码
 / / ※ CheckTelephone ($ C_telephone) 判断 是否 为 合法 电话 号码
 / / ※ CheckValueBetween ($ N_var, N_val1 $, $ N_val2) 判断 是否 是 某一 范围 内 的 合法 值
 / / ※ Kontrollpunkt ($ C_post) 判断 是否 为 合法 邮编 (固定 长度)
 / / ※ CheckExtendName ($ C_filename, $ A_extend) 判断 上传 文件 的 扩展 名
 / / ※ CheckImageSize ($ ImageFileName, $ LimitSize) 检验 上传 图片 的 大小
 / / ※ AlertExit ($ C_alert, I_goback $ = 0) 非法 操作 警告 并 退出
 / / ※ Alert ($ C_alert, I_goback $ = 0) 非法 操作 警告
 / / ※ ReplaceSpacialChar ($ C_char) 特殊 字符 替换 函数
 / / ※ ExchangeMoney ($ N_money) 资金 转换 函数
 / / ※ WindowLocation ($ C_url, $ C_get ="",$ C_getOther = "") PHP 中 的 window.location 函数

 //------------------------------------------------ -----------------------
 / / 函数 名: CheckMoney ($ C_Money)
 / / 作 用: 检查 数据 是否 是 99.999,99 格式
 / / 参 数: $ C_Money (待 检测 的 数字)
 / / 返回 值: 布尔 值
 / / 备 注: 无
 //------------------------------------------------ -----------------------
 Funktion CheckMoney ($ C_Money) (
  if (! ereg ("^ [0-9 ][.][ 0-9] $", $ C_Money)) return false;
  return true;
 )

 //------------------------------------------------ -----------------------
 / / 函数 名: CheckEmailAddr ($ C_mailaddr)
 / / 作 用: 判断 是否 为 有效 邮件 地址
 / / 参 数: $ C_mailaddr (待 检测 的 邮件 地址)
 / / 返回 值: 布尔 值
 / / 备 注: 无
 //------------------------------------------------ -----------------------
 Funktion CheckEmailAddr ($ C_mailaddr) (

  if (! eregi ("^[_ a-z0-9-]+(.[_ a-z0-9-]+)*@[ a-z0-9-]+(.[ a-z0-9-] + )*$",$ C_mailaddr)) (
  return false;
  )
  return true;
 )

 //------------------------------------------------ -----------------------
 / / 函数 名: CheckWebAddr ($ C_weburl)
 / / 作 用: 判断 是否 为 有效 网址
 / / 参 数: $ C_weburl (待 检测 的 网址)
 / / 返回 值: 布尔 值
 / / 备 注: 无
 //------------------------------------------------ -----------------------
 Funktion CheckWebAddr ($ C_weburl) (
  if (! ereg ("^ http:// [_a-zA-Z0-9-]+(.[_ a-zA-Z0-9-]+)*$", C_weburl $)) (
  return false;
  )
  return true;
 )

 //------------------------------------------------ -----------------------
 / / 函数 名: CheckEmpty ($ C_char)
 / / 作 用: 判断 字符串 是否 为 空
 / / 参 数: $ C_char (待 检测 的 字符串)
 / / 返回 值: 布尔 值
 / / 备 注: 无
 //------------------------------------------------ -----------------------
 Funktion CheckEmptyString ($ C_char) (
  if (! is_string ($ C_char)) return false; / / 是否 是 字符串 类型
  if (emptyempty ($ C_char)) return false; / / 是否 已 设定
  if ($ C_char =='') return false; / / 是否 为 空
  return true;
 )

 //------------------------------------------------ -----------------------
 / / 函数 名: CheckLengthBetween ($ C_char, I_len1 $, $ I_len2 = 100)
 / / 作 用: 判断 是否 为 指定 长度 内 字符串
 / / 参 数: $ C_char (待 检测 的 字符串)
 / / $ I_len1 (目标 字符串 长度 的 下限)
 / / $ I_len2 (目标 字符串 长度 的 上限)
 / / 返回 值: 布尔 值
 / / 备 注: 无
 //------------------------------------------------ -----------------------
 Funktion CheckLengthBetween ($ C_cahr, I_len1 $, $ I_len2 = 100) (
  $ C_cahr = trim ($ C_cahr);
  if (strlen ($ C_cahr) <$ I_len1) return false;
  if (strlen ($ C_cahr)> $ I_len2) return false;
  return true;
 )

 //------------------------------------------------ -----------------------
 / / 函数 名: CheckUser ($ C_user)
 / / 作 用: 判断 是否 为 合法 用户 名
 / / 参 数: $ C_user (待 检测 的 用户 名)
 / / 返回 值: 布尔 值
 / / 备 注: 无
 //------------------------------------------------ -----------------------
 Funktion CheckUser ($ C_user) (
  if (! CheckLengthBetween ($ C_user, 4, 20)) return false; / / 宽度 检验
  if (! ereg ("^[_ a-zA-Z0-9 ]*$", C_user $)) return false; / / 特殊 字符 检验
  return true;
 )

 //------------------------------------------------ -----------------------
 / / 函数 名: checkpassword ($ C_passwd)
 / / 作 用: 判断 是否 为 合法 用户 密码
 / / 参 数: $ C_passwd (待 检测 的 密码)
 / / 返回 值: 布尔 值
 / / 备 注: 无
 //------------------------------------------------ -----------------------
 Funktion checkpassword ($ C_passwd) (
  if (! CheckLengthBetween ($ C_passwd, 4, 20)) return false; / / 宽度 检测
  if (! ereg ("^[_ a-zA-Z0-9 ]*$", C_passwd $)) return false; / / 特殊 字符 检测
  return true;
 )

 ?>