<?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=10436&amp;type=atom" />
	<updated>2015-02-20T23:11:36Z</updated>
	<generator>PunBB</generator>
	<id>https://forum.script-coding.com/viewtopic.php?id=10436</id>
		<entry>
			<title type="html"><![CDATA[VBS: не могу добавить файлы в диалог]]></title>
			<link rel="alternate" href="https://forum.script-coding.com/viewtopic.php?pid=91749#p91749" />
			<content type="html"><![CDATA[<p>подскажите, как вставить файлы в диалог (&quot;d:\file01.ext&quot; &quot;d:\file.ext...&quot; ) и нажать на кнопку открыть.<br />и после загрузки файлов скопировать ссылку</p><div class="codebox"><pre><code>Dim URL 
Dim IE 
Set IE = CreateObject(&quot;internetexplorer.application&quot;)
URL = &quot;http://dropmefiles.com&quot; 
IE.Visible = True
IE.Navigate URL

Do While IE.Busy
WScript.Sleep 100
Loop

IE.Document.getElementById(&quot;browse_btn_x&quot;).Click</code></pre></div><p>В идеале скрипт должен добавлять (файл (файлы)) на dropmefiles.com и копировать от туда ссылку.</p>]]></content>
			<author>
				<name><![CDATA[929151]]></name>
				<uri>https://forum.script-coding.com/profile.php?id=29475</uri>
			</author>
			<updated>2015-02-20T23:11:36Z</updated>
			<id>https://forum.script-coding.com/viewtopic.php?pid=91749#p91749</id>
		</entry>
</feed>
