<?xml version="1.0" encoding="utf-8"?>
<feed xmlns="http://www.w3.org/2005/Atom">
	<title type="html"><![CDATA[Серый форум &mdash; VBA: Убрать диалоговое окно "Преобразование источника данных"]]></title>
	<link rel="self" href="http://forum.script-coding.com/extern.php?action=feed&amp;tid=7759&amp;type=atom" />
	<updated>2012-11-05T09:16:35Z</updated>
	<generator>PunBB</generator>
	<id>http://forum.script-coding.com/viewtopic.php?id=7759</id>
		<entry>
			<title type="html"><![CDATA[VBA: Убрать диалоговое окно "Преобразование источника данных"]]></title>
			<link rel="alternate" href="http://forum.script-coding.com/viewtopic.php?pid=65408#p65408" />
			<content type="html"><![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>]]></content>
			<author>
				<name><![CDATA[gts]]></name>
				<uri>http://forum.script-coding.com/profile.php?id=28603</uri>
			</author>
			<updated>2012-11-05T09:16:35Z</updated>
			<id>http://forum.script-coding.com/viewtopic.php?pid=65408#p65408</id>
		</entry>
</feed>
