VBScript Reference Manual for InduSoft Web Studio - ICP DAS

InduSoft Web StudioVBScript Reference ManualRem Below is the VBScript codeDim objFSO‘ Declare variables and objectsDim objFilePointer, cur_fileSet objFSO = CreateObject(“Scripting.FileSystemObject”) ‘ Instantiate the COM objectSet objFilePointer = New FileSpec‘ Instantiate the Class ObjectobjFilePointer.FileName = “Myfile.mdb” ‘ Assigns “Myfile.mdb” as the file namecur_file = objFilePointer.FileName‘ Retrieves the current file name “Myfile.MDB”Set objFilePointer.FSO = objFSO‘ Assigns an Object to the PropertyobjFilePointer.Delete‘ Executes a Method to delete a fileSet objFilePointer = Nothing‘ Keyword Nothing releases the object memoryVBScript Class Objects automatically supports two type of Class Events; Class_Initialize andClass_Terminate Events. The code inside the Class_Initialize event executes once when an Objectbased on the Class is first instantiated. Any code put in this event is optional, and is typically used forinitialization. Code inside the Class_Terminate event executes once just before the Object based on theClass is destroyed (i.e. Set to Nothing, or the Object goes out of scope). Usage is as follows:Class FileSpecPrivate master_filePrivate master_FSO Private master_filePrivate Sub Class_Initialize‘ Class Object initialization code‘ code goes hereEnd SubPrivate Sub Class_Terminate‘ Class Object termination code‘ code goes hereEnd SubPublic Property Let FileName(strName) ‘ Define a Public Property to assign the file namemaster_file = strNameEnd PropertyPublic Property Get FileName ‘ Define a Public Property to retrieve a file nameFileName = master_fileEnd PropertyPublic Property Set FSO(m_FSO)‘ Define a Public Property for an objectSet master_FSO = m_FSOEnd PropertyEnd ClassInduSoft, Ltd. 27