以下是代码片段:
<%
'==========StrComp函数说明开始==========================
'' StrComp:比较两个字符串是否相等.
'' 格 式: StrComp(String1,String2,[Para])
'' String1、String2:两上相互比较的字符串.
'' [Para] :有两种参数:
'' vbBinaryCompare: 默认,二进制比较,Ascii值比较,区分大小写 代表数值:0
'' vbTextCompare: 文本比较,不区分大小写 代表数值:1
'' 函数返回值:
'' 0 : 两个字符串相等
'' -1 : String1小于String2
'' 1 : String1大于String2
'' Null: String1或String2其中有一项为空
'' Err : 如果两个字符串都为空的话会出现不合理的错误!
'==========StrComp函数说明结束============================
Dim CompareStr
CompareStr = StrComp("abc","ABC",0)
Response.write "返回值:"&CompareStr&"<br>"
If CompareStr = 0 Then
Response.write("两个字符串相等")
Else
Response.write("两个字符串不等")
End If
%>
|