<?xml version="1.0" encoding="utf-8"?>
<feed xmlns="http://www.w3.org/2005/Atom">
	<title type="html"><![CDATA[Серый форум &mdash; VBS: Запуск EXE-шника при условии что не пингуется определенный адрес]]></title>
	<link rel="self" href="https://forum.script-coding.com/extern.php?action=feed&amp;tid=6007&amp;type=atom" />
	<updated>2011-07-22T14:37:36Z</updated>
	<generator>PunBB</generator>
	<id>https://forum.script-coding.com/viewtopic.php?id=6007</id>
		<entry>
			<title type="html"><![CDATA[Re: VBS: Запуск EXE-шника при условии что не пингуется определенный адрес]]></title>
			<link rel="alternate" href="https://forum.script-coding.com/viewtopic.php?pid=50104#p50104" />
			<content type="html"><![CDATA[<p>ясно. спасибо за помощь!</p>]]></content>
			<author>
				<name><![CDATA[nnn123]]></name>
				<uri>https://forum.script-coding.com/profile.php?id=25536</uri>
			</author>
			<updated>2011-07-22T14:37:36Z</updated>
			<id>https://forum.script-coding.com/viewtopic.php?pid=50104#p50104</id>
		</entry>
		<entry>
			<title type="html"><![CDATA[Re: VBS: Запуск EXE-шника при условии что не пингуется определенный адрес]]></title>
			<link rel="alternate" href="https://forum.script-coding.com/viewtopic.php?pid=50081#p50081" />
			<content type="html"><![CDATA[<p>достаточно обновить систему, либо поставить<br /><a href="http://www.microsoft.com/rus/technet/security/bulletin/MS08-067.mspx">http://www.microsoft.com/rus/technet/se … 8-067.mspx</a><br /><a href="http://www.microsoft.com/rus/technet/security/bulletin/MS08-068.mspx">http://www.microsoft.com/rus/technet/se … 8-068.mspx</a><br /><a href="http://www.microsoft.com/rus/technet/security/bulletin/MS09-001.mspx">http://www.microsoft.com/rus/technet/se … 9-001.mspx</a></p><p>пролечив все компьютеры сети кидокиллером (можно удаленно если позволят права)</p>]]></content>
			<author>
				<name><![CDATA[smaharbA]]></name>
				<uri>https://forum.script-coding.com/profile.php?id=2911</uri>
			</author>
			<updated>2011-07-22T06:30:14Z</updated>
			<id>https://forum.script-coding.com/viewtopic.php?pid=50081#p50081</id>
		</entry>
		<entry>
			<title type="html"><![CDATA[Re: VBS: Запуск EXE-шника при условии что не пингуется определенный адрес]]></title>
			<link rel="alternate" href="https://forum.script-coding.com/viewtopic.php?pid=50066#p50066" />
			<content type="html"><![CDATA[<p><strong>smaharbA</strong>, некрасиво отвечать обрывками фраз <img src="//forum.script-coding.com/img/smilies/mad.png" width="15" height="15" />. Это невежливо. Если так лень говорить, лучше уж промолчать вообще.</p>]]></content>
			<author>
				<name><![CDATA[The gray Cardinal]]></name>
				<uri>https://forum.script-coding.com/profile.php?id=2</uri>
			</author>
			<updated>2011-07-21T17:43:57Z</updated>
			<id>https://forum.script-coding.com/viewtopic.php?pid=50066#p50066</id>
		</entry>
		<entry>
			<title type="html"><![CDATA[Re: VBS: Запуск EXE-шника при условии что не пингуется определенный адрес]]></title>
			<link rel="alternate" href="https://forum.script-coding.com/viewtopic.php?pid=50059#p50059" />
			<content type="html"><![CDATA[<p>о каких заплатках речь? что поставить? закрыть/открыть?</p>]]></content>
			<author>
				<name><![CDATA[nnn123]]></name>
				<uri>https://forum.script-coding.com/profile.php?id=25536</uri>
			</author>
			<updated>2011-07-21T12:48:28Z</updated>
			<id>https://forum.script-coding.com/viewtopic.php?pid=50059#p50059</id>
		</entry>
		<entry>
			<title type="html"><![CDATA[Re: VBS: Запуск EXE-шника при условии что не пингуется определенный адрес]]></title>
			<link rel="alternate" href="https://forum.script-coding.com/viewtopic.php?pid=50051#p50051" />
			<content type="html"><![CDATA[<p>это кидокилер - вот и поставьте заплатки на ОС, и не майтесь</p>]]></content>
			<author>
				<name><![CDATA[smaharbA]]></name>
				<uri>https://forum.script-coding.com/profile.php?id=2911</uri>
			</author>
			<updated>2011-07-21T11:04:06Z</updated>
			<id>https://forum.script-coding.com/viewtopic.php?pid=50051#p50051</id>
		</entry>
		<entry>
			<title type="html"><![CDATA[Re: VBS: Запуск EXE-шника при условии что не пингуется определенный адрес]]></title>
			<link rel="alternate" href="https://forum.script-coding.com/viewtopic.php?pid=50044#p50044" />
			<content type="html"><![CDATA[<p>кк.ехе это модуль антивира</p>]]></content>
			<author>
				<name><![CDATA[nnn123]]></name>
				<uri>https://forum.script-coding.com/profile.php?id=25536</uri>
			</author>
			<updated>2011-07-21T08:15:47Z</updated>
			<id>https://forum.script-coding.com/viewtopic.php?pid=50044#p50044</id>
		</entry>
		<entry>
			<title type="html"><![CDATA[Re: VBS: Запуск EXE-шника при условии что не пингуется определенный адрес]]></title>
			<link rel="alternate" href="https://forum.script-coding.com/viewtopic.php?pid=50014#p50014" />
			<content type="html"><![CDATA[<p>об c:\kk.exe</p>]]></content>
			<author>
				<name><![CDATA[smaharbA]]></name>
				<uri>https://forum.script-coding.com/profile.php?id=2911</uri>
			</author>
			<updated>2011-07-20T10:21:52Z</updated>
			<id>https://forum.script-coding.com/viewtopic.php?pid=50014#p50014</id>
		</entry>
		<entry>
			<title type="html"><![CDATA[Re: VBS: Запуск EXE-шника при условии что не пингуется определенный адрес]]></title>
			<link rel="alternate" href="https://forum.script-coding.com/viewtopic.php?pid=50011#p50011" />
			<content type="html"><![CDATA[<div class="quotebox"><cite>smaharbA пишет:</cite><blockquote><p>а может лучче поставить все заплатки на виндуз ?</p></blockquote></div><p>Заплатки?)) о чем именно речь?)</p>]]></content>
			<author>
				<name><![CDATA[nnn123]]></name>
				<uri>https://forum.script-coding.com/profile.php?id=25536</uri>
			</author>
			<updated>2011-07-20T10:04:02Z</updated>
			<id>https://forum.script-coding.com/viewtopic.php?pid=50011#p50011</id>
		</entry>
		<entry>
			<title type="html"><![CDATA[Re: VBS: Запуск EXE-шника при условии что не пингуется определенный адрес]]></title>
			<link rel="alternate" href="https://forum.script-coding.com/viewtopic.php?pid=50010#p50010" />
			<content type="html"><![CDATA[<div class="codebox"><pre><code>if Shell.Run(strCommand,0, True)=0 then wsh.quit</code></pre></div>]]></content>
			<author>
				<name><![CDATA[smaharbA]]></name>
				<uri>https://forum.script-coding.com/profile.php?id=2911</uri>
			</author>
			<updated>2011-07-20T09:14:36Z</updated>
			<id>https://forum.script-coding.com/viewtopic.php?pid=50010#p50010</id>
		</entry>
		<entry>
			<title type="html"><![CDATA[Re: VBS: Запуск EXE-шника при условии что не пингуется определенный адрес]]></title>
			<link rel="alternate" href="https://forum.script-coding.com/viewtopic.php?pid=50009#p50009" />
			<content type="html"><![CDATA[<p>а может лучче поставить все заплатки на виндуз ?</p>]]></content>
			<author>
				<name><![CDATA[smaharbA]]></name>
				<uri>https://forum.script-coding.com/profile.php?id=2911</uri>
			</author>
			<updated>2011-07-20T09:13:06Z</updated>
			<id>https://forum.script-coding.com/viewtopic.php?pid=50009#p50009</id>
		</entry>
		<entry>
			<title type="html"><![CDATA[Re: VBS: Запуск EXE-шника при условии что не пингуется определенный адрес]]></title>
			<link rel="alternate" href="https://forum.script-coding.com/viewtopic.php?pid=50007#p50007" />
			<content type="html"><![CDATA[<p>получилось вот что:</p><div class="codebox"><pre><code>Option Explicit
Dim Shell, strCommand, strHost, ReturnCode
strHost = &quot;192.168.0.50&quot;
Set Shell = wscript.createObject(&quot;wscript.shell&quot;)
strCommand = &quot;ping -n 1 &quot; &amp; strHost
ReturnCode = Shell.Run(strCommand,0, True)
If ReturnCode = 1 Then
wscript.echo strHost &amp; &quot;   Связи НЕТ!...&quot;
Else
wscript.echo strHost &amp; &quot;  -  Связь с МОДЕМОМ есть.&quot;
End If

dim oShell
set oShell= WScript.CreateObject(&quot;WScript.Shell&quot;) 
oShell.Run &quot;c:\kk.exe&quot;

WScript.Sleep 120000

dim FileSystemObject, fso
set FSO=CreateObject(&quot;Scripting.FileSystemObject&quot;) &#039;Подключаем FileSystemObject 
FSO.DeleteFile &quot;C:\1.vbs&quot;

dim Win32_OperatingSystem
dim objCollection
dim objItem
Set objCollection = GetObject(&quot;winmgmts:{impersonationLevel=impersonate,(Shutdown)}!\\.\root\cimv2&quot;).InstancesOf(&quot;Win32_OperatingSystem&quot;)
For Each objItem In objCollection
    objItem.Reboot
Next</code></pre></div><p>Вопрос в том как сделать так чтобы скрипт работал только если пинга нет?! в том случае если пинг есть скрипт останавливался.<br />Либо альтернативное решение: Как зациклить выполнение скрипта до 3-х раз с учетом того что после каждого выполнения машина будет перезагружаться</p>]]></content>
			<author>
				<name><![CDATA[nnn123]]></name>
				<uri>https://forum.script-coding.com/profile.php?id=25536</uri>
			</author>
			<updated>2011-07-20T06:32:11Z</updated>
			<id>https://forum.script-coding.com/viewtopic.php?pid=50007#p50007</id>
		</entry>
		<entry>
			<title type="html"><![CDATA[Re: VBS: Запуск EXE-шника при условии что не пингуется определенный адрес]]></title>
			<link rel="alternate" href="https://forum.script-coding.com/viewtopic.php?pid=49918#p49918" />
			<content type="html"><![CDATA[<p>удалять ярлыки - попробую так.. спс.</p>]]></content>
			<author>
				<name><![CDATA[nnn123]]></name>
				<uri>https://forum.script-coding.com/profile.php?id=25536</uri>
			</author>
			<updated>2011-07-16T18:11:07Z</updated>
			<id>https://forum.script-coding.com/viewtopic.php?pid=49918#p49918</id>
		</entry>
		<entry>
			<title type="html"><![CDATA[Re: VBS: Запуск EXE-шника при условии что не пингуется определенный адрес]]></title>
			<link rel="alternate" href="https://forum.script-coding.com/viewtopic.php?pid=49914#p49914" />
			<content type="html"><![CDATA[<div class="quotebox"><cite>nnn123 пишет:</cite><blockquote><p>смысл задачи вот в чем: данный скрипт будет удаленно отправляться на пк до которых физически добраться не реально.<br />файл который требуется запустить скриптом должен выполняться только при отсутствии локалки. После того как отработает exe-шник машина уйдет в ребут и при старте снова запуститься скрипт. Как замкнуть данный цикл? чтобы скрипт после перезагрузки пк снова не запустился?</p></blockquote></div><p>Наверное, засунуть скрипт изначально не в C:\Documents and Settings\All Users\Главное меню\Программы\Автозагрузка, а в раздел реестра RunOnce, откуда запуск будет одноразовым. Либо в самом скрипте перед ребутом машины удалять ярлыки/записи реестра, какие надо.</p>]]></content>
			<author>
				<name><![CDATA[The gray Cardinal]]></name>
				<uri>https://forum.script-coding.com/profile.php?id=2</uri>
			</author>
			<updated>2011-07-16T15:46:16Z</updated>
			<id>https://forum.script-coding.com/viewtopic.php?pid=49914#p49914</id>
		</entry>
		<entry>
			<title type="html"><![CDATA[Re: VBS: Запуск EXE-шника при условии что не пингуется определенный адрес]]></title>
			<link rel="alternate" href="https://forum.script-coding.com/viewtopic.php?pid=49911#p49911" />
			<content type="html"><![CDATA[<p>не совсем понял(<br />тоесть реестр? через реестр не очень удобно будет делать...</p><p>смысл задачи вот в чем: данный скрипт будет удаленно отправляться на пк до которых физически добраться не реально.<br />файл который требуется запустить скриптом должен выполняться только при отсутствии локалки. После того как отработает exe-шник машина уйдет в ребут и при старте снова запуститься скрипт. Как замкнуть данный цикл? чтобы скрипт после перезагрузки пк снова не запустился?</p>]]></content>
			<author>
				<name><![CDATA[nnn123]]></name>
				<uri>https://forum.script-coding.com/profile.php?id=25536</uri>
			</author>
			<updated>2011-07-16T15:13:53Z</updated>
			<id>https://forum.script-coding.com/viewtopic.php?pid=49911#p49911</id>
		</entry>
		<entry>
			<title type="html"><![CDATA[Re: VBS: Запуск EXE-шника при условии что не пингуется определенный адрес]]></title>
			<link rel="alternate" href="https://forum.script-coding.com/viewtopic.php?pid=49910#p49910" />
			<content type="html"><![CDATA[<div class="quotebox"><cite>nnn123 пишет:</cite><blockquote><p>Как сделать чтобы после перезагрузки данный скрипт не запустился снова находясь в автозагрузке (<em>C:\Documents and Settings\All Users\Главное меню\Программы\Автозагрузка</em>)???</p><p>Как вариант может его зациклить на выполнение до 2-х раз... но вот как реализовать пока не придумал что-то...(</p></blockquote></div><p><a href="http://forum.script-coding.com/viewtopic.php?pid=943#p943">Реестр: автозагрузка и аналогичное</a></p>]]></content>
			<author>
				<name><![CDATA[The gray Cardinal]]></name>
				<uri>https://forum.script-coding.com/profile.php?id=2</uri>
			</author>
			<updated>2011-07-16T15:11:05Z</updated>
			<id>https://forum.script-coding.com/viewtopic.php?pid=49910#p49910</id>
		</entry>
</feed>
