Viscom Software Screen2Video ActiveX Control

Description:   

Initialize the control if you will use the activex without UI.

Usage:   

Screen2Video1.InitControlWithNoUI 

Return Value:

No Return value.

Parameter:

No Parameter. 

Example:   

VB Script sample.

Set obj=CreateObject("SCREEN2VIDEO.Screen2VideoCtrl.1")
obj.InitControlWithNoUI

obj.OutputType= 0
obj.FileName = "c:\output.avi"
obj.FPS =15
obj.UseAudioCompressor=true
obj.UseVideoCompressor=true
obj.CaptureArea 0, 0, 100, 100

iVideoIndex=obj.VideoCompressors.FindVideoCompressor("Microsoft Video 1")
obj.VideoCompressor=iVideoIndex

iAudioIndex=obj.AudioCompressors.FindAudioCompressor("PCM")

obj.AudioCompressor=iAudioIndex
obj.CaptureCursor = true
obj.AudioDevice = 0
obj.Start

MsgBox "Press Ok button to stop screen capturing, it will save to c:\output.avi"