asp 实现检测字符串是否为纯字母和数字组合的函

函数CheckString检测字符串内容

由阿里西西编写于2007年7月13日

描述：此函数用于检测字符串是否仅包含纯字母和数字组合。

示例用法：`<%=CheckString(strng)%>`

函数实现：

```vbscript

Function CheckString(strng)

CheckString = true

Dim regEx, Match

Set regEx = New RegExp

regEx.Pattern = "^[A-Za-z0-9]+$" ' 仅包含字母和数字的正则表达式

regEx.IgnoreCase = True

Set Match = regEx.Execute(strng)

If Match.Count > 0 Then ' 如果匹配到非字母数字字符，则设置CheckString为false

CheckString = false

End If

End Function

```

检测字符串是否为中文字符的函数CheckChinese

同样由阿里西西编写于2007年7月13日

描述：此函数用于检测字符串是否包含中文字符，若包含中文则返回true，否则返回false。

示例用法：`<%=CheckChinese(strng)%>`

函数实现细节：

```vbscript

Function CheckChinese(strng)

CheckChinese = true ' 默认设置为包含中文，直到证明不包含为止

Dim regEx, Match

Set regEx = New RegExp

regEx.Pattern = "\||&|?|@|%|\||/|\.|,|;|:|'|:|_|-|+|^|""|=|<|>| " ' 检测非中文字符的正则表达式模式

regEx.IgnoreCase = True

Set Match = regEx.Execute(strng)

If Match.Count > 0 Then ' 如果匹配到非中文字符，则设置CheckChinese为false

CheckChinese = false

End If

End Function

```

在页面主体部分使用Cambrian框架进行渲染：`cambrian.render('body')`。确保页面的主体内容按照Cambrian框架的规范进行布局和渲染。这段代码可能出现在某个Web应用的模板中，用于动态生成和展示网页内容。