 |
|
Оптимизация скрипта
Доброго всем деня,
Скрипт:
При включении компьютера или выходе из спещяего режима включает интернет, вот сам скрипт:
пронумеровал строки...
Код:
1. sNameOfConnection = "beeline"
2. sUser = "user"
3. sPassword = "pass"
4. Set WshShell = WScript.CreateObject("WScript.Shell")
5. Set WshExec = WshShell.Exec("rasdial "&sNameOfConnection&" "&sUser&" "&sPassword)
6. Set FileSys = CreateObject("Scripting.FileSystemObject")
7. Set colMonitoredEvents = GetObject("winmgmts:")._
8. ExecNotificationQuery("Select * from Win32_PowerManagementEvent")
9. Do
10. Set objLatestEvent = colMonitoredEvents.NextEvent
11. If objLatestEvent.EventType = 7 Then
12. Set WshExec = WshShell.Exec("rasdial "&sNameOfConnection&" "&sUser&" "&sPassword)
13. End If
14. Loop
При добавлении в автозагрузку, всё в принципе работает прелестно, НО при загрузке компа (не вывода из сна) вылезает 2 окна, интернет то подрубается, но 2 окна меня смущают, как убрать?
Если удалить 5 строчку, то (наверное) не будет запускаться после простой загрузки, а по другому я не знаю, что сделать? |
| lohi1234567 |
22-09-2010 15:58 1501757 |
цель создать скрипт который это будет делать или просто подключитя к интернету автоматом?
|
Время: 21:20.
© OSzone.net 2001-