Announcements
@@copilotGeneratedAction: 'True' Scripting.RunVBScript.RunVBScript VBScriptCode: $'''\' This code has been generated by AI. Original prompt: \' Vbscript to convert system cureent data and time to CST Dim objShell, objWMIService, colTimeZones, objTimeZone, localDateTime, cstDateTime \' Create shell object Set objShell = CreateObject(\"WScript.Shell\") \' Get the current system date and time localDateTime = Now \' Get WMI service Set objWMIService = GetObject(\"winmgmts:\\\\.\\root\\cimv2\") \' Get the time zone information Set colTimeZones = objWMIService.ExecQuery(\"SELECT * FROM Win32_TimeZone\") \' Loop through the time zones to find the current time zone bias For Each objTimeZone in colTimeZones \' Calculate the CST time by subtracting the bias (in minutes) from the local time \' CST is UTC-6, so we need to add 6 hours (360 minutes) to the bias cstDateTime = DateAdd(\"n\", objTimeZone.Bias + 360, localDateTime) Exit For Next \' Output the CST date and time WScript.Echo cstDateTime''' ScriptOutput=> CSTDateandTime ScriptError=> ScriptError Text.SplitText.Split Text: CSTDateandTime StandardDelimiter: Text.StandardDelimiter.Space DelimiterTimes: 1 Result=> CST_Time SET Time TO CST_Time[1] LOOP WHILE (True) = (True) IF Time > $'''10:30:00''' THEN EXIT LOOP END @@copilotGeneratedAction: 'True' Scripting.RunVBScript.RunVBScript VBScriptCode: $'''\' This code has been generated by AI. Original prompt: \' Vbscript to convert system cureent data and time to CST Dim objShell, objWMIService, colTimeZones, objTimeZone, localDateTime, cstDateTime \' Create shell object Set objShell = CreateObject(\"WScript.Shell\") \' Get the current system date and time localDateTime = Now \' Get WMI service Set objWMIService = GetObject(\"winmgmts:\\\\.\\root\\cimv2\") \' Get the time zone information Set colTimeZones = objWMIService.ExecQuery(\"SELECT * FROM Win32_TimeZone\") \' Loop through the time zones to find the current time zone bias For Each objTimeZone in colTimeZones \' Calculate the CST time by subtracting the bias (in minutes) from the local time \' CST is UTC-6, so we need to add 6 hours (360 minutes) to the bias cstDateTime = DateAdd(\"n\", objTimeZone.Bias + 360, localDateTime) Exit For Next \' Output the CST date and time WScript.Echo cstDateTime''' ScriptOutput=> CSTDateandTime ScriptError=> ScriptError Text.SplitText.Split Text: CSTDateandTime StandardDelimiter: Text.StandardDelimiter.Space DelimiterTimes: 1 Result=> CST_Time SET Time TO CST_Time[1] END Outlook.Launch Instance=> OutlookInstance Outlook.SendEmailThroughOutlook.SendEmail Instance: OutlookInstance Account: $'''Varikutivishnu@acme.com''' SendTo: $'''jnarsin@tcs.com''' Subject: $'''Test''' Body: $'''Hi, Test, Regards, RPA''' IsBodyHtml: False IsDraft: False
Under review
Thank you for your reply! To ensure a great experience for everyone, your content is awaiting approval by our Community Managers. Please check back later.
Congratulations to our community stars!
Expanding mentorship, skilling, and AI innovation
These are the community rock stars!
Stay up to date on forum activity by subscribing.
11manish 227 Super User 2026 Season 2
David_MA 213 Super User 2026 Season 2
Mohsin Ali 151
