ByteScout Screen Capturing SDK – VBScript and VB6 – Set Mouse Spot Size for Screen Video

Home
/
Articles
/
ByteScout Screen Capturing SDK – VBScript and VB6 – Set Mouse Spot Size for Screen Video

printable version:
ByteScout-Screen-Capturing-SDK-VBScript-and-VB6-Set-Mouse-Spot-Size-for-Screen-Video.pdf

How to set mouse spot size for screen video in VBScript and VB6 and ByteScout Screen Capturing SDK

The tutorial below will demonstrate how to set mouse spot size for screen video in VBScript and VB6

Learn how to set mouse spot size for screen video in VBScript and VB6 with this source code sample. What is ByteScout Screen Capturing SDK? It is the screen video recording SDK helps in quick implementation of screen video recording. WMV, AVI, WebM output options are available with adjustable quality, video size, framerate and video and audio codec. Includes special features like live multiple blacking out of selected areas, recording from web cam as main source and as overlay, optional watermarks for output video. It can help you to set mouse spot size for screen video in your VBScript and VB6 application.

The SDK samples like this one below explain how to quickly make your application do set mouse spot size for screen video in VBScript and VB6 with the help of ByteScout Screen Capturing SDK. Just copy and paste the code into your VBScript and VB6 application’s code and follow the instruction. Enjoy writing a code with ready-to-use sample codes in VBScript and VB6.

ByteScout Screen Capturing SDK free trial version is available on our website. VBScript and VB6 and other programming languages are supported.

On-demand (REST Web API) version:
Web API (on-demand version)

On-premise offline SDK for Windows:
60 Day Free Trial (on-premise)

SetMouseSpotSize.vbs

      ' create video capturer activex object
Set capturer = CreateObject("BytescoutScreenCapturing.Capturer")

' set output video file name to .WMV or .AVI file
capturer.OutputFileName = "Captured.wmv" 

' set capturing type to the caScreen =3 to capture the entire screen
capturer.CapturingType = 3

' output video width
capturer.OutputWidth = 640

' output video height
capturer.OutputHeight = 480


' uncomment to set Bytescout Lossless Video format output video compression method
' do not forget to set file to .avi format if you use Video Codec Name
' capturer.CurrentVideoCodecName = "Bytescout Lossless";             

' set mouse spot radius
capturer.MouseSpotRadius = 100

' uncomment to enable recording of semitransparent or layered windows (Warning: may cause mouse cursor flickering)
' capturer.CaptureTransparentControls = true

MsgBox "This script will record 640x480 video from entire screen for 15 seconds. Output video will go to EntireScreenCaptured.avi"

' run video capturing 
capturer.Run()

' IMPORTANT: if you want to check for some code if need to stop the recording then make sure you are 
' using Thread.Sleep(1) inside the checking loop, so you have the loop like
' Do 
' Thread.Sleep(1) 
' While StopButtonNotClicked

' wait for 15 seconds (15000 msec)
WScript.Sleep(15000)

' stop capturing
capturer.Stop()

' destroy Capturer object so the video will be saved into the disk
Set capturer = Nothing