asp 验证用户名是否包含有非常字符的函数_应用技巧

<%
'******************************
'函数：IsValidUserName(byVal UserName)
'参数：UserName,用户名称
'作者：阿里西西
'日期：2007/7/15
'描述：验证用户名是否包含有非法字符，不含非法字符返回：true
'示例：IsValidUserName(byVal UserName)
'******************************
Function IsValidUserName(byVal UserName)
 Dim i,c
 IsValidUserName = True
 For i = 1 To Len(UserName)
  c = Lcase(Mid(UserName, i, 1))
  If InStr("$!<>?#^%@~`&*();:+='""  ", c) > 0 Then
    IsValidUserName = False
    Exit Function
  End IF
 Next
End Function
%>

时间： 2024-07-29 20:18:54

asp 验证用户名是否包含有非常字符的函数_应用技巧的相关文章

MS SQL 实现验证字符串是否包含有大小写字母的功能_实用技巧

MS SQL 实现验证字符串是否包含有大小写字母的功能 昨晚有实现一个小功能,就是在MS SQL Server中,检查字符串是否包含有大小写字母.通常应用在字符串的复杂度. DECLARE @s NVARCHAR(40) = N'SDFfgGRYJhhTYUJ' IF LOWER(@s) COLLATE Latin1_General_CS_AS <> @s AND UPPER(@s) COLLATE Latin1_General_CS_AS <> @s PRINT 'T' ELSE

ASP 非法字符过滤函数_应用技巧

复制代码 代码如下: <% '==============================================================检查提交数据合法性 Function CheckInput()  '--------定义部份------------------  Dim Fy_Post,Fy_Get,Fy_In,Fy_Inf,Fy_Xh,Fy_db,Fy_dbstr,Kill_IP,WriteSql  '自定义需要过滤的字串,用 "|" 分隔  Fy_In 

asp从字符串里截取N个带HTML的字符的函数_应用技巧

'函数名:getHTMLContent'参数:NO-->要取得的字符数, txtContent-->要处理的字符串  '功能: 从字符串里截取N个带HTML的字符,现在的实现方法还不完善,过程是:从字符串里找各种控件的开始,然后依些分开,放到数组里,然后一个一个数组的加上来看看字符是否大于给定的字符如果是,那么,返回这个数组. '作者:柳永法 '时间:2007-6-1 20:03 :)Function getHTMLContent(NO, txtContent) If Len(txtConte

ASP UTF-8编码下字符串截取和获取长度函数_应用技巧

复制代码 代码如下: '************************************ '截取文字长度函数,支持UTF-8 '输入参数: ' 1.文字内容 ' 2.文字最大长度 '************************************ Public Function Cut_Title(Title,TLen) Dim k,i,d,c Dim iStr Dim ForTotal If CDbl(TLen) > 0 Then k=0 d=StrLen(Title) iSt

asp.net(c#)获取内容第一张图片地址的函数_实用技巧

首先找到内容里面第一个<img标签的位置,然后找到从这个起的第一个>的位置,得到第一张图片的完整标签. 然后通过分隔空格得到图片的各个属性和属性值,提取src的值就是图片的地址 代码如下: 复制代码 代码如下: /// <summary> /// 获取文中图片地址 /// </summary> /// <param name="content">内容</param> /// <returns>地址字符串</r

asp.net 字符串、二进制、编码数组转换函数_实用技巧

1.字符串转二进制数组 string content="这是做个测试!"; System.Text.UnicodeEncoding converter = new System.Text.UnicodeEncoding(); byte[] byteArr = converter.GetBytes(content); 2.二进制数组转为字符串 复制代码 代码如下: System.Text.UnicodeEncoding converter = new System.Text.Unicod

asp.net(vb)实现金额转换成大写的函数_实用技巧

复制代码 代码如下: ''' <summary> ''' 将数据转换为Double数字 ''' </summary> ''' <param name="Obj"></param> ''' <returns></returns> ''' <remarks></remarks> Public Shared Function todbl(ByVal Obj As Object) As Double

asp实现计算两个时间内的工作日的函数_应用技巧

<% '****************************** '函数:workdays(date_begin , date_end) '参数:date_begin,开始日期:date_end,结束日期 '作者:阿里西西 '日期:2007/7/15 '描述:计算两个时间内的工作日 '示例:workdays("2007-05-18" , "2007-05-21") '****************************** function workd

asp 生成任意英文+数字位数长度的随机码函数_应用技巧

<% '****************************** '函数:Generator(Length) '参数:Length,任意长度的数值,随机码位数 '作者:阿里西西 '日期:2007/7/15 '描述:生成任意英文+数字位数长度的随机码函数 '示例:Generator(80) '****************************** Function Generator(Length)  Dim i, tempS  tempS = "abcdefghijklmnopq