Of the 200 engineers in our firm, some choose to leave their computers running at night and over the weekends for no apparent reason. Some leave Microstation running as well. This habit affects backup schedules and causes other software and hardware related issues because of extended computer up-time. To remedy the situation I added the following macro to one of our MVBA files. It allows us to manage the MS_IDLETIMEOUT variable and set it as desired. The chosen MVBA should be auto-loaded by Microstation:
Sub OnProjectLoad() Dim sysTime ' get system time sysTime = Time ' set idle timeout If (sysTime > TimeValue("07:00:00") And sysTime < TimeValue("17:00:00")) Then ActiveWorkspace.AddConfigurationVariable "MS_IDLETIMEOUT", "180" Else ActiveWorkspace.AddConfigurationVariable "MS_IDLETIMEOUT", "60" End If End Sub