ByteScout Screen Capturing SDK - VBScript and VB6 - Capture Screen Video with Time Stamp - ByteScout

ByteScout Screen Capturing SDK – VBScript and VB6 – Capture Screen Video with Time Stamp

  • Home
  • /
  • Articles
  • /
  • ByteScout Screen Capturing SDK – VBScript and VB6 – Capture Screen Video with Time Stamp

How to capture screen video with time stamp in VBScript and VB6 using ByteScout Screen Capturing SDK

How to code in VBScript and VB6 to capture screen video with time stamp with this step-by-step tutorial

With this source code sample you may quickly learn how to capture screen video with time stamp in VBScript and VB6. ByteScout Screen Capturing SDK 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 capture screen video with time stamp in VBScript and VB6.

You will save a lot of time on writing and testing code as you may just take the VBScript and VB6 code from ByteScout Screen Capturing SDK for capture screen video with time stamp below and use it in your application. In your VBScript and VB6 project or application you may simply copy & paste the code and then run your app! Test VBScript and VB6 sample code examples whether they respond your needs and requirements for the project.

ByteScout free trial version is available for download from our website. It includes all these programming tutorials along with source code samples.

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

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

CaptureScreenAddRedTimeStamp.vbs
      
' create video capturer activex object Set capturer = CreateObject("BytescoutScreenCapturing.Capturer") ' set output video file name to .WMV or .AVI file capturer.OutputFileName = "CaptureScreenAddRedTimeStamp.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"; capturer.OverlayingRedTextCaption = "Recording: {RUNNINGMIN}:{RUNNINGSEC}:{RUNNINGMSEC} on {CURRENTYEAR}-{CURRENTMONTH}-{CURRENTDAY} at {CURRENTHOUR}:{CURRENTMIN}:{CURRENTSEC}:{CURRENTMSEC}" ' uncomment to enable recording of semitransparent or layered windows (Warning: may cause mouse cursor flickering) ' capturer.CaptureTransparentControls = true MsgBox "SDK will now record 15 seconds with date time overlay text added on top of the video" ' 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 sec WScript.Sleep(15000) ' stop capturing capturer.Stop() ' destroy Capturer object so the video will be saved into the disk Set capturer = Nothing MsgBox "Done! Check CaptureScreenAddRedTimeStamp.wmv file"

ON-PREMISE OFFLINE SDK

60 Day Free Trial or Visit ByteScout Screen Capturing SDK Home Page

Explore ByteScout Screen Capturing SDK Documentation

Explore Samples

Sign Up for ByteScout Screen Capturing SDK Online Training

ON-DEMAND REST WEB API

Get Your API Key

Explore Web API Docs

Explore Web API Samples

VIDEO

ON-PREMISE OFFLINE SDK

60 Day Free Trial or Visit ByteScout Screen Capturing SDK Home Page

Explore ByteScout Screen Capturing SDK Documentation

Explore Samples

Sign Up for ByteScout Screen Capturing SDK Online Training

ON-DEMAND REST WEB API

Get Your API Key

Explore Web API Docs

Explore Web API Samples

Tutorials:

prev
next