the software that grows
with you
|
V32ActiveX() |
|||||||||
| Fires any ActiveX control which either has its own display container or is a non-rectangular one. | |||||||||
|
Syntax |
|||||||||
| V32ActiveX( cClassId, acScript ) | |||||||||
|
Arguments |
|||||||||
|
|||||||||
|
Returns |
|||||||||
| NIL | |||||||||
|
Description |
|||||||||
| A powerful function to exploit any
activex object. Please note that the object being fired must be a
non-rectangular, i.e., it must not need external container to display its
properties, or has its own container.
Vouch32 provides v32Ole1 to v32Ole54, fifty four in all, variables to hold properties or user defined values to be exploited with the object. Variable named v32Ole holds the reference to ActiveX object and must be used to retrieve object properties and to execute methods only AND must not be assigned any value. This function eliminates the need to provide more functionality with Vouch32.lib's other functions firing active-x controls, like, V32ExcelScript(), V32Word(), etc. Now you are the master of your own commands. |
|||||||||
|
Usage |
|||||||||
| local cClassId, a_ cClassId := 'Excel.Application' a_:={} aadd( a_, 'v32Ole:DisplayAlerts := .f.' ) aadd( a_, 'v32Ole:WorkBooks():Add()' ) aadd( a_, 'v32Ole1 := rgb( 200,200,200 )' ) aadd( a_, 'v32ole3 := "Bill Gates - A Great Person"' ) aadd( a_, 'v32Ole2 := v32Ole:ActiveSheet()' ) aadd( a_, 'v32Ole2:cell( 1,1 ):set( "HorizontalAlignment", "7" )' ) aadd( a_, 'v32ole2:cells(1,1):value := v32ole3' ) aadd( a_, 'v32ole2:Columns( 1 ):Autofit()' ) aadd( a_, 'V32Ole2:cells( 1,1 ):Interior:color := v32Ole1' ) aadd( a_, 'v32Ole:visible := .t.' ) aadd( a_, 'v32Ole:sheets:Add()' ) aadd( a_, 'v32Ole:ActiveSheet():Name := "Vouch32"' ) aadd( a_, 'v32Ole:sheets( "Sheet3" ):delete()' ) aadd( a_, 'v32Ole:sheets( "Sheet2" ):Select()' ) aadd( a_, 'v32Ole:sheets( "Vouch32" ):Select()' ) aadd( a_, 'v32Ole7 := {}' ) aadd( a_, 'aadd( v32Ole7, v32Ole2:cells( 1,1 ):value )' ) aadd( a_, 'memowrit( "d:\abc.txt", v32Ole7[ 1 ] )' ) V32ActiveX( cClassId, a_ ) |
|||||||||
|
Tips |
|||||||||