<?xml version="1.0" encoding="utf-8"?>
<feed xmlns="http://www.w3.org/2005/Atom">
	<title type="html"><![CDATA[Серый форум &mdash; VBS: отключение проигрывания звука в браузере+ внесение в автозапуск]]></title>
	<link rel="self" href="https://forum.script-coding.com/extern.php?action=feed&amp;tid=10460&amp;type=atom" />
	<updated>2015-03-02T14:56:02Z</updated>
	<generator>PunBB</generator>
	<id>https://forum.script-coding.com/viewtopic.php?id=10460</id>
		<entry>
			<title type="html"><![CDATA[Re: VBS: отключение проигрывания звука в браузере+ внесение в автозапуск]]></title>
			<link rel="alternate" href="https://forum.script-coding.com/viewtopic.php?pid=92158#p92158" />
			<content type="html"><![CDATA[<p><strong>dokole</strong><br />А зачем при каждом входе писать в реестр уже существующее значение?<br />И где эти операционные системы? Как к ним осуществляется доступ?</p>]]></content>
			<author>
				<name><![CDATA[Flasher]]></name>
				<uri>https://forum.script-coding.com/profile.php?id=27593</uri>
			</author>
			<updated>2015-03-02T14:56:02Z</updated>
			<id>https://forum.script-coding.com/viewtopic.php?pid=92158#p92158</id>
		</entry>
		<entry>
			<title type="html"><![CDATA[Re: VBS: отключение проигрывания звука в браузере+ внесение в автозапуск]]></title>
			<link rel="alternate" href="https://forum.script-coding.com/viewtopic.php?pid=92128#p92128" />
			<content type="html"><![CDATA[<div class="quotebox"><cite>Flasher пишет:</cite><blockquote><p><strong>dokole</strong><br />Тогда просто пишем в реестр:<br /></p><div class="codebox"><pre><code>CreateObject(&quot;WScript.Shell&quot;).RegWrite &quot;HKCU\Software\Microsoft\Internet Explorer\Main\Play_Background_Sounds&quot;, &quot;no&quot;, &quot;REG_SZ&quot;</code></pre></div><div class="fancy_spoiler_switcher"><div class="fancy_spoiler_switcher_header" data-lang-open="открыть спойлер" data-lang-close="скрыть спойлер"><strong>+</strong>&nbsp;открыть спойлер</div><div class="fancy_spoiler"><p>Да, не обратил сразу внимания, что <a href="http://forum.script-coding.com/viewtopic.php?id=5421">заголовок по-прежнему не отражает суть задачи</a>. Исправляйтесь.</p></div></div></blockquote></div><p>Благодарю! Решение работает на WIN 8.1 , WIN 8 и WIN 7 .</p><p>Вопрос с внесением в автозагрузку до сих пор открыт ... <br />Появилась идея просто скопировать скрипт в папку &quot;автозагрузка&quot;.<br />Проблема в том, как прописать копирование для каждой операционной системы отдельно.</p>]]></content>
			<author>
				<name><![CDATA[dokole]]></name>
				<uri>https://forum.script-coding.com/profile.php?id=32904</uri>
			</author>
			<updated>2015-03-01T22:45:23Z</updated>
			<id>https://forum.script-coding.com/viewtopic.php?pid=92128#p92128</id>
		</entry>
		<entry>
			<title type="html"><![CDATA[Re: VBS: отключение проигрывания звука в браузере+ внесение в автозапуск]]></title>
			<link rel="alternate" href="https://forum.script-coding.com/viewtopic.php?pid=92116#p92116" />
			<content type="html"><![CDATA[<p><strong>dokole</strong><br />Тогда просто пишем в реестр:<br /></p><div class="codebox"><pre><code>CreateObject(&quot;WScript.Shell&quot;).RegWrite &quot;HKCU\Software\Microsoft\Internet Explorer\Main\Play_Background_Sounds&quot;, &quot;no&quot;, &quot;REG_SZ&quot;</code></pre></div><div class="fancy_spoiler_switcher"><div class="fancy_spoiler_switcher_header" data-lang-open="открыть спойлер" data-lang-close="скрыть спойлер"><strong>+</strong>&nbsp;открыть спойлер</div><div class="fancy_spoiler"><p>Да, не обратил сразу внимания, что <a href="http://forum.script-coding.com/viewtopic.php?id=5421">заголовок по-прежнему не отражает суть задачи</a>. Исправляйтесь.</p></div></div>]]></content>
			<author>
				<name><![CDATA[Flasher]]></name>
				<uri>https://forum.script-coding.com/profile.php?id=27593</uri>
			</author>
			<updated>2015-03-01T18:13:36Z</updated>
			<id>https://forum.script-coding.com/viewtopic.php?pid=92116#p92116</id>
		</entry>
		<entry>
			<title type="html"><![CDATA[Re: VBS: отключение проигрывания звука в браузере+ внесение в автозапуск]]></title>
			<link rel="alternate" href="https://forum.script-coding.com/viewtopic.php?pid=92110#p92110" />
			<content type="html"><![CDATA[<div class="quotebox"><cite>Flasher пишет:</cite><blockquote><p><strong>dokole</strong>, зачем тут скрипты? Вызываем <em>inetcpl.cpl</em>, на вкладке <em>Дополнительно</em> в блоке <em>Мультимедиа</em> снимаем галку с <em>Воспроизводить звуки на веб-страницах</em>.</p></blockquote></div><p>Это понятно, но тут задача в изменении параметра именно в автоматизированном режиме.</p>]]></content>
			<author>
				<name><![CDATA[dokole]]></name>
				<uri>https://forum.script-coding.com/profile.php?id=32904</uri>
			</author>
			<updated>2015-03-01T13:25:51Z</updated>
			<id>https://forum.script-coding.com/viewtopic.php?pid=92110#p92110</id>
		</entry>
		<entry>
			<title type="html"><![CDATA[Re: VBS: отключение проигрывания звука в браузере+ внесение в автозапуск]]></title>
			<link rel="alternate" href="https://forum.script-coding.com/viewtopic.php?pid=92107#p92107" />
			<content type="html"><![CDATA[<p><strong>dokole</strong>, зачем тут скрипты? Вызываем <em>inetcpl.cpl</em>, на вкладке <em>Дополнительно</em> в блоке <em>Мультимедиа</em> снимаем галку с <em>Воспроизводить звуки на веб-страницах</em>.</p>]]></content>
			<author>
				<name><![CDATA[Flasher]]></name>
				<uri>https://forum.script-coding.com/profile.php?id=27593</uri>
			</author>
			<updated>2015-03-01T13:06:14Z</updated>
			<id>https://forum.script-coding.com/viewtopic.php?pid=92107#p92107</id>
		</entry>
		<entry>
			<title type="html"><![CDATA[Re: VBS: отключение проигрывания звука в браузере+ внесение в автозапуск]]></title>
			<link rel="alternate" href="https://forum.script-coding.com/viewtopic.php?pid=92088#p92088" />
			<content type="html"><![CDATA[<p>Ознакомьтесь с <a href="http://forum.script-coding.com/viewtopic.php?id=10437">Обязательно прочитать перед созданием темы!</a>. </p><p><strong>Пока оформление не будет приведено в порядок, ответы будут удаляться. Если в течение трех суток тема не будет оформлена должным образом, то будет удалена.</strong></p>]]></content>
			<author>
				<name><![CDATA[JSmаn]]></name>
				<uri>https://forum.script-coding.com/profile.php?id=24434</uri>
			</author>
			<updated>2015-03-01T06:16:47Z</updated>
			<id>https://forum.script-coding.com/viewtopic.php?pid=92088#p92088</id>
		</entry>
		<entry>
			<title type="html"><![CDATA[Re: VBS: отключение проигрывания звука в браузере+ внесение в автозапуск]]></title>
			<link rel="alternate" href="https://forum.script-coding.com/viewtopic.php?pid=92084#p92084" />
			<content type="html"><![CDATA[<p>Отключение звука можно настроить в свойствах браузера, но необходимо сделать это с помощью команды ... Перерыл всё, что мог.. Способа так и не нашёл.</p>]]></content>
			<author>
				<name><![CDATA[dokole]]></name>
				<uri>https://forum.script-coding.com/profile.php?id=32904</uri>
			</author>
			<updated>2015-03-01T00:15:45Z</updated>
			<id>https://forum.script-coding.com/viewtopic.php?pid=92084#p92084</id>
		</entry>
		<entry>
			<title type="html"><![CDATA[VBS: отключение проигрывания звука в браузере+ внесение в автозапуск]]></title>
			<link rel="alternate" href="https://forum.script-coding.com/viewtopic.php?pid=92083#p92083" />
			<content type="html"><![CDATA[<p>Доброй ночи.<br />Надо доработать код, слабо представляю как это сделать...</p><p>Задачи:<br />1)отключить звук в браузере.<br />2)включить в автозапуск.</p><p>Пытался задать параметры для InternetExplorer.Application , видимо делал криво ..</p><p>Имеющийся код на данный момент:</p><br /><div class="codebox"><pre><code>
Const navOpenInBackgroundTab = &amp;H1000

Set ie = CreateObject(&quot;InternetExplorer.Application&quot;)

Links = Array(&quot;http://ya.ru/&quot;, &quot;http://ya.ru/&quot;)

ie.Visible = falce &#039;

first = True
For Each link In Links
If first Then
ie.Navigate2 link
first = False
Else
ie.Navigate2 link, navOpenInBackgroundTab
End If
Next


For Each Window In CreateObject(&quot;Shell.Application&quot;).Windows
With Window
If .Name = &quot;Windows Internet Explorer&quot; Then
For Each link In Links
If InStr(1, .LocationURL, Title, vbTextCompare) &lt;&gt; 0 Then
.Quit
Exit For
End If
Next
End If
End With
Next
</code></pre></div>]]></content>
			<author>
				<name><![CDATA[dokole]]></name>
				<uri>https://forum.script-coding.com/profile.php?id=32904</uri>
			</author>
			<updated>2015-02-28T23:34:53Z</updated>
			<id>https://forum.script-coding.com/viewtopic.php?pid=92083#p92083</id>
		</entry>
</feed>
