home *** CD-ROM | disk | FTP | other *** search
/ Chip 2011 March / Chip_2011.03_CD.iso / Tools / modules / drvsign / autoallow.vbs next >
Encoding:
Text File  |  2010-12-14  |  479 b   |  17 lines
  1. Set shell = WScript.CreateObject("WScript.Shell")
  2. title = WScript.Arguments.Item(0)
  3. title2 = WScript.Arguments.Item(1)
  4. title3 = WScript.Arguments.Item(2)
  5. titleVista = WScript.Arguments.Item(3)
  6.  
  7. Do
  8.     If shell.AppActivate(title) OR shell.AppActivate(title2) OR shell.AppActivate(title3) Then
  9.         shell.SendKeys "{TAB 2}{ENTER}"
  10.     End If
  11.     If shell.AppActivate(titleVista) Then
  12.         shell.SendKeys "{TAB}{ENTER}"
  13.     End If
  14.     WScript.Sleep 1000
  15. Loop
  16.  
  17.