<?xml version="1.0" encoding="utf-8"?>
<rss version="2.0" xmlns:atom="http://www.w3.org/2005/Atom">
	<channel>
		<title><![CDATA[Серый форум &mdash; VBS: Запуск EXE-шника при условии что не пингуется определенный адрес]]></title>
		<link>https://forum.script-coding.com/viewtopic.php?id=6007</link>
		<atom:link href="https://forum.script-coding.com/extern.php?action=feed&amp;tid=6007&amp;type=rss" rel="self" type="application/rss+xml" />
		<description><![CDATA[Недавние сообщения в теме «VBS: Запуск EXE-шника при условии что не пингуется определенный адрес».]]></description>
		<lastBuildDate>Fri, 22 Jul 2011 14:37:36 +0000</lastBuildDate>
		<generator>PunBB</generator>
		<item>
			<title><![CDATA[Re: VBS: Запуск EXE-шника при условии что не пингуется определенный адрес]]></title>
			<link>https://forum.script-coding.com/viewtopic.php?pid=50104#p50104</link>
			<description><![CDATA[<p>ясно. спасибо за помощь!</p>]]></description>
			<author><![CDATA[null@example.com (nnn123)]]></author>
			<pubDate>Fri, 22 Jul 2011 14:37:36 +0000</pubDate>
			<guid>https://forum.script-coding.com/viewtopic.php?pid=50104#p50104</guid>
		</item>
		<item>
			<title><![CDATA[Re: VBS: Запуск EXE-шника при условии что не пингуется определенный адрес]]></title>
			<link>https://forum.script-coding.com/viewtopic.php?pid=50081#p50081</link>
			<description><![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>]]></description>
			<author><![CDATA[null@example.com (smaharbA)]]></author>
			<pubDate>Fri, 22 Jul 2011 06:30:14 +0000</pubDate>
			<guid>https://forum.script-coding.com/viewtopic.php?pid=50081#p50081</guid>
		</item>
		<item>
			<title><![CDATA[Re: VBS: Запуск EXE-шника при условии что не пингуется определенный адрес]]></title>
			<link>https://forum.script-coding.com/viewtopic.php?pid=50066#p50066</link>
			<description><![CDATA[<p><strong>smaharbA</strong>, некрасиво отвечать обрывками фраз <img src="//forum.script-coding.com/img/smilies/mad.png" width="15" height="15" />. Это невежливо. Если так лень говорить, лучше уж промолчать вообще.</p>]]></description>
			<author><![CDATA[null@example.com (The gray Cardinal)]]></author>
			<pubDate>Thu, 21 Jul 2011 17:43:57 +0000</pubDate>
			<guid>https://forum.script-coding.com/viewtopic.php?pid=50066#p50066</guid>
		</item>
		<item>
			<title><![CDATA[Re: VBS: Запуск EXE-шника при условии что не пингуется определенный адрес]]></title>
			<link>https://forum.script-coding.com/viewtopic.php?pid=50059#p50059</link>
			<description><![CDATA[<p>о каких заплатках речь? что поставить? закрыть/открыть?</p>]]></description>
			<author><![CDATA[null@example.com (nnn123)]]></author>
			<pubDate>Thu, 21 Jul 2011 12:48:28 +0000</pubDate>
			<guid>https://forum.script-coding.com/viewtopic.php?pid=50059#p50059</guid>
		</item>
		<item>
			<title><![CDATA[Re: VBS: Запуск EXE-шника при условии что не пингуется определенный адрес]]></title>
			<link>https://forum.script-coding.com/viewtopic.php?pid=50051#p50051</link>
			<description><![CDATA[<p>это кидокилер - вот и поставьте заплатки на ОС, и не майтесь</p>]]></description>
			<author><![CDATA[null@example.com (smaharbA)]]></author>
			<pubDate>Thu, 21 Jul 2011 11:04:06 +0000</pubDate>
			<guid>https://forum.script-coding.com/viewtopic.php?pid=50051#p50051</guid>
		</item>
		<item>
			<title><![CDATA[Re: VBS: Запуск EXE-шника при условии что не пингуется определенный адрес]]></title>
			<link>https://forum.script-coding.com/viewtopic.php?pid=50044#p50044</link>
			<description><![CDATA[<p>кк.ехе это модуль антивира</p>]]></description>
			<author><![CDATA[null@example.com (nnn123)]]></author>
			<pubDate>Thu, 21 Jul 2011 08:15:47 +0000</pubDate>
			<guid>https://forum.script-coding.com/viewtopic.php?pid=50044#p50044</guid>
		</item>
		<item>
			<title><![CDATA[Re: VBS: Запуск EXE-шника при условии что не пингуется определенный адрес]]></title>
			<link>https://forum.script-coding.com/viewtopic.php?pid=50014#p50014</link>
			<description><![CDATA[<p>об c:\kk.exe</p>]]></description>
			<author><![CDATA[null@example.com (smaharbA)]]></author>
			<pubDate>Wed, 20 Jul 2011 10:21:52 +0000</pubDate>
			<guid>https://forum.script-coding.com/viewtopic.php?pid=50014#p50014</guid>
		</item>
		<item>
			<title><![CDATA[Re: VBS: Запуск EXE-шника при условии что не пингуется определенный адрес]]></title>
			<link>https://forum.script-coding.com/viewtopic.php?pid=50011#p50011</link>
			<description><![CDATA[<div class="quotebox"><cite>smaharbA пишет:</cite><blockquote><p>а может лучче поставить все заплатки на виндуз ?</p></blockquote></div><p>Заплатки?)) о чем именно речь?)</p>]]></description>
			<author><![CDATA[null@example.com (nnn123)]]></author>
			<pubDate>Wed, 20 Jul 2011 10:04:02 +0000</pubDate>
			<guid>https://forum.script-coding.com/viewtopic.php?pid=50011#p50011</guid>
		</item>
		<item>
			<title><![CDATA[Re: VBS: Запуск EXE-шника при условии что не пингуется определенный адрес]]></title>
			<link>https://forum.script-coding.com/viewtopic.php?pid=50010#p50010</link>
			<description><![CDATA[<div class="codebox"><pre><code>if Shell.Run(strCommand,0, True)=0 then wsh.quit</code></pre></div>]]></description>
			<author><![CDATA[null@example.com (smaharbA)]]></author>
			<pubDate>Wed, 20 Jul 2011 09:14:36 +0000</pubDate>
			<guid>https://forum.script-coding.com/viewtopic.php?pid=50010#p50010</guid>
		</item>
		<item>
			<title><![CDATA[Re: VBS: Запуск EXE-шника при условии что не пингуется определенный адрес]]></title>
			<link>https://forum.script-coding.com/viewtopic.php?pid=50009#p50009</link>
			<description><![CDATA[<p>а может лучче поставить все заплатки на виндуз ?</p>]]></description>
			<author><![CDATA[null@example.com (smaharbA)]]></author>
			<pubDate>Wed, 20 Jul 2011 09:13:06 +0000</pubDate>
			<guid>https://forum.script-coding.com/viewtopic.php?pid=50009#p50009</guid>
		</item>
		<item>
			<title><![CDATA[Re: VBS: Запуск EXE-шника при условии что не пингуется определенный адрес]]></title>
			<link>https://forum.script-coding.com/viewtopic.php?pid=50007#p50007</link>
			<description><![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>]]></description>
			<author><![CDATA[null@example.com (nnn123)]]></author>
			<pubDate>Wed, 20 Jul 2011 06:32:11 +0000</pubDate>
			<guid>https://forum.script-coding.com/viewtopic.php?pid=50007#p50007</guid>
		</item>
		<item>
			<title><![CDATA[Re: VBS: Запуск EXE-шника при условии что не пингуется определенный адрес]]></title>
			<link>https://forum.script-coding.com/viewtopic.php?pid=49918#p49918</link>
			<description><![CDATA[<p>удалять ярлыки - попробую так.. спс.</p>]]></description>
			<author><![CDATA[null@example.com (nnn123)]]></author>
			<pubDate>Sat, 16 Jul 2011 18:11:07 +0000</pubDate>
			<guid>https://forum.script-coding.com/viewtopic.php?pid=49918#p49918</guid>
		</item>
		<item>
			<title><![CDATA[Re: VBS: Запуск EXE-шника при условии что не пингуется определенный адрес]]></title>
			<link>https://forum.script-coding.com/viewtopic.php?pid=49914#p49914</link>
			<description><![CDATA[<div class="quotebox"><cite>nnn123 пишет:</cite><blockquote><p>смысл задачи вот в чем: данный скрипт будет удаленно отправляться на пк до которых физически добраться не реально.<br />файл который требуется запустить скриптом должен выполняться только при отсутствии локалки. После того как отработает exe-шник машина уйдет в ребут и при старте снова запуститься скрипт. Как замкнуть данный цикл? чтобы скрипт после перезагрузки пк снова не запустился?</p></blockquote></div><p>Наверное, засунуть скрипт изначально не в C:\Documents and Settings\All Users\Главное меню\Программы\Автозагрузка, а в раздел реестра RunOnce, откуда запуск будет одноразовым. Либо в самом скрипте перед ребутом машины удалять ярлыки/записи реестра, какие надо.</p>]]></description>
			<author><![CDATA[null@example.com (The gray Cardinal)]]></author>
			<pubDate>Sat, 16 Jul 2011 15:46:16 +0000</pubDate>
			<guid>https://forum.script-coding.com/viewtopic.php?pid=49914#p49914</guid>
		</item>
		<item>
			<title><![CDATA[Re: VBS: Запуск EXE-шника при условии что не пингуется определенный адрес]]></title>
			<link>https://forum.script-coding.com/viewtopic.php?pid=49911#p49911</link>
			<description><![CDATA[<p>не совсем понял(<br />тоесть реестр? через реестр не очень удобно будет делать...</p><p>смысл задачи вот в чем: данный скрипт будет удаленно отправляться на пк до которых физически добраться не реально.<br />файл который требуется запустить скриптом должен выполняться только при отсутствии локалки. После того как отработает exe-шник машина уйдет в ребут и при старте снова запуститься скрипт. Как замкнуть данный цикл? чтобы скрипт после перезагрузки пк снова не запустился?</p>]]></description>
			<author><![CDATA[null@example.com (nnn123)]]></author>
			<pubDate>Sat, 16 Jul 2011 15:13:53 +0000</pubDate>
			<guid>https://forum.script-coding.com/viewtopic.php?pid=49911#p49911</guid>
		</item>
		<item>
			<title><![CDATA[Re: VBS: Запуск EXE-шника при условии что не пингуется определенный адрес]]></title>
			<link>https://forum.script-coding.com/viewtopic.php?pid=49910#p49910</link>
			<description><![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>]]></description>
			<author><![CDATA[null@example.com (The gray Cardinal)]]></author>
			<pubDate>Sat, 16 Jul 2011 15:11:05 +0000</pubDate>
			<guid>https://forum.script-coding.com/viewtopic.php?pid=49910#p49910</guid>
		</item>
	</channel>
</rss>
