'函数名：chk_Email() '返回值：布尔值（True为通过，False为未通过） '参数：email(需要判断的email，类型：字符串) Type_1(是否需要判断@之后的dom
;@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@ ;功能: 演示判断一个字符串是否为另一字符串的子串的函数 ;作者: 黄志斌 于 广西河池 ;
'-------------------------------------------------------------------------- '作用:安全字符串检测函数 '名字:SafeCh
Public Function IsValidEmail(strEmail As String) As Boolean Dim names, name, i, c IsValidEmail
/* * Name: identifier.c * Author: x-bit, at , AllRights Reserved. * Description: 输入一串字符，判断该字符串是不是
<% '**************************************************** '页面字符串过滤函数,返回值 '作者：论坛用户（cuiwl） '********
Public Function IsValidEmail(strEmail As String) As Boolean Dim names, name, i, c IsValidEmail =
支持判断返回任何数值型的类型数据： Function GetNumType(sVal) Dim sType If Not IsNumeric(sVal) Then GetNumType="Unk
<% '原创作者:小艺 QQ:52093 时间:2005.6.30 Response.Write("<head><style><!--span{ fon
代码很简单的,我把我平时写过的贴出来给大家看看: if (bResult == true) //登录的用户名和密码正确 { //保存登录的用户名 Session = F