<?xml version="1.0" encoding="utf-8"?>
<rss version="2.0" xmlns:atom="http://www.w3.org/2005/Atom">
	<channel>
		<title><![CDATA[Серый форум &mdash; VBA: Убрать диалоговое окно "Преобразование источника данных"]]></title>
		<link>https://forum.script-coding.com/viewtopic.php?id=7759</link>
		<atom:link href="https://forum.script-coding.com/extern.php?action=feed&amp;tid=7759&amp;type=rss" rel="self" type="application/rss+xml" />
		<description><![CDATA[Недавние сообщения в теме «VBA: Убрать диалоговое окно "Преобразование источника данных"».]]></description>
		<lastBuildDate>Mon, 05 Nov 2012 09:16:35 +0000</lastBuildDate>
		<generator>PunBB</generator>
		<item>
			<title><![CDATA[VBA: Убрать диалоговое окно "Преобразование источника данных"]]></title>
			<link>https://forum.script-coding.com/viewtopic.php?pid=65408#p65408</link>
			<description><![CDATA[<p>Подскажите, пожалуйста, как избавиться от диалогового окна &quot;Преобразование источника данных&quot; при открытии в Word документа-источника данных, например, dbf-файла, для слияния с шаблоном. Сообщение появляется при выполнении оператора типа<br /></p><div class="codebox"><pre><code> 
ActiveDocument.MailMerge.OpenDataSource Name:=&lt;имя_файла_источника_данных&gt;, _
    ConfirmConversions:=False, ReadOnly:=False, LinkToSource:=False, _
    AddToRecentFiles:=False, PasswordDocument:=&quot;&quot;, PasswordTemplate:=&quot;&quot;, _
    WritePasswordDocument:=&quot;&quot;, WritePasswordTemplate:=&quot;&quot;, Revert:=False, _
    Format:=wdOpenFormatAuto, _
    Connection:=&quot;Provider=Microsoft.Jet.OLEDB.4.0;&quot; &amp; _
      &quot;Data Source=&quot; &amp; &lt;путь_к_файлу_источнику_данных&gt; &amp; &quot;;Mode=Read;&quot; &amp; _
      &quot;Jet OLEDB:System database=&quot;&quot;&quot;&quot;&quot; &amp; _
      &quot;Jet OLEDB:Registry Path=&quot;&quot;&quot;&quot;;&quot; &amp; _
      &quot;Jet OLEDB:Engine Type=18;Jet OLEDB:Database Loc&quot;, _
    SQLStatement:=&quot;SELECT * FROM &#039;&quot; &amp; &lt;имя_файла_источника_данных&gt; &amp; &quot;&#039;&quot; &amp; &quot;;&quot;, SQLStatement1:=&quot;&quot;</code></pre></div><p>Все отображаемые для выбора драйверы описаны в реестре Windows, причем, если установлено более 1 версии Office, то драйверов больше. Вышеуказанный пример приведен для Office-2003, при использовании Office-97 окно выбора не возникает (аргументы оператора другие). Можно ли как-то программно задать предпочтительный ODBC или отменить в системном реестре использование лишних для данного случая, не убирая их совсем?</p>]]></description>
			<author><![CDATA[null@example.com (gts)]]></author>
			<pubDate>Mon, 05 Nov 2012 09:16:35 +0000</pubDate>
			<guid>https://forum.script-coding.com/viewtopic.php?pid=65408#p65408</guid>
		</item>
	</channel>
</rss>
