php调用dll的实例操作动画与代码分享

2015-01-24信息快讯网

这是我录制的一个gif操作动画,图片比较大,如果大家在线看图感觉不流畅的话可以把图片保存到本机再看

php调用dll的实例操作动画与代码分享_信息快讯网

动画中的原代码如下:

 
VERSION 1.0 CLASS 
BEGIN 
MultiUse = -1 'True 
Persistable = 0 'NotPersistable 
DataBindingBehavior = 0 'vbNone 
DataSourceBehavior = 0 'vbNone 
MTSTransactionMode = 0 'NotAnMTSObject 
END 
Attribute VB_Name = "tw" 
Attribute VB_GlobalNameSpace = False 
Attribute VB_Creatable = True 
Attribute VB_PredeclaredId = False 
Attribute VB_Exposed = True 
Option Explicit 
Private MyScriptingContext As ScriptingContext 
Private MyApplication As Application 
Private MyRequest As Request 
Private MyResponse As Response 
Private MyServer As Server 
Private MySession As Session 
Public Sub OnStartPage(PassedScriptingContext As ScriptingContext) 
Set MyScriptingContext = PassedScriptingContext 
Set MyApplication = MyScriptingContext.Application 
Set MyRequest = MyScriptingContext.Request 
Set MyResponse = MyScriptingContext.Response 
Set MyServer = MyScriptingContext.Server 
Set MySession = MyScriptingContext.Session 
End Sub 

Public Sub OnEndPage() 
Set MyScriptingContext = Nothing 
Set MyApplication = Nothing 
Set MyRequest = Nothing 
Set MyResponse = Nothing 
Set MyServer = Nothing 
Set MySession = Nothing 
End Sub 

Public Function UserOut(User) As Variant 
UserOut = User 
End Function 
©2014-2024 dbsqp.com