ASP常用函数:LastDay()

2015-08-12 16:01:58来源:作者:人点击

 程序代码

<%
'功能:判断一个值是否存在于数组
'来源:http://www.cncms.com/asp.asp

Function InArray( sValue, aArray )
  Dim x
  InArray = False
  For Each x In aArray
  If x = sValue Then
  InArray = True
  Exit For
  End If
  Next
End Function
%>


 程序代码
<%
'功能:判断一个值是否存在于数组
'来源:http://www.cncms.com/asp.asp

Function InArray( sValue, aArray )
  Dim i
  InArray = False
  For i = 0 To UBound( aArray )
  If aArray(i) = sValue Then
  InArray = True
  Exit For
  End If
  Next
End Function
%>

最新文章

123

最新摄影

微信扫一扫

第七城市微信公众平台