They say you learn something new every day.

This script runs in the background and stays there until “My Shared Folder” is opened, and then it pops up and says it’s opened. “My Shared Folder” doesn’t have to be  the active window, it just needs to be open.

Set oShell = CreateObject(“WScript.Shell”)

DO UNTIL Done = “Yes”
  If oShell.AppActivate(“My Shared Folder”) Then
    Done = “Yes”
    Wscript.echo “My Shared Folder is Open”
    wscript.sleep 300
  End If
LOOP

Leave a comment