<?xml version="1.0" encoding="utf-8"?>
<feed xmlns="http://www.w3.org/2005/Atom">
	<title type="html"><![CDATA[Серый форум &mdash; HTA+VBS: Выбор файла обработать событие]]></title>
	<link rel="self" href="https://forum.script-coding.com/extern.php?action=feed&amp;tid=10175&amp;type=atom" />
	<updated>2014-12-04T07:32:10Z</updated>
	<generator>PunBB</generator>
	<id>https://forum.script-coding.com/viewtopic.php?id=10175</id>
		<entry>
			<title type="html"><![CDATA[Re: HTA+VBS: Выбор файла обработать событие]]></title>
			<link rel="alternate" href="https://forum.script-coding.com/viewtopic.php?pid=88842#p88842" />
			<content type="html"><![CDATA[<p><strong>wildwolf007</strong>, прошу прощения, но Ваши вопросы вводят в ступор. <img src="//forum.script-coding.com/img/smilies/neutral.png" width="15" height="15" /></p><p>Как отвечать на такой вопрос ?</p><div class="quotebox"><blockquote><p>а возможно сделать кнопочку с названием &quot;Выбрать файл&quot; и что б при нажатии этой кнопочки запускалась меню выбора файла?</p></blockquote></div><p>Мой ответ - Конечно возможно. </p><p>Встречный вопрос - Что Вам мешает это сделать ???</p><div class="quotebox"><blockquote><p>Вся проблема в том, что после выбора файла путь не отображается в таблице.</p></blockquote></div><p>Ну так надо код написать, чтобы он отображался. <img src="//forum.script-coding.com/img/smilies/neutral.png" width="15" height="15" /></p><p>К тому же зачем Вы используете VBScript и JavaScript одновременно ?</p><p>Банальный пример:<br /></p><div class="codebox"><pre><code>
&lt;html&gt;
    &lt;head&gt;
        &lt;title&gt;Моё HTA-приложение&lt;/title&gt;
        &lt;hta:application
            id = &quot;oHTA&quot;
            ApplicationName = &quot;MyTestApplication&quot;
            Border = &quot;Dialog&quot;
            BorderStyle = &quot;Complex&quot;
            Icon = &quot;C:\Program Files\Windows NT\hypertrm.exe&quot;
            InnerBorder = &quot;No&quot;
            MaximizeButton = &quot;No&quot;
            MinimizeButton = &quot;No&quot;
            Scroll = &quot;No&quot;
            Selection = &quot;No&quot;
            ShowInTaskBar = &quot;No&quot;
            SingleInstance = &quot;Yes&quot;
            Version = &quot;1.3&quot;
        /&gt;
        &lt;script language=&quot;JavaScript&quot;&gt;
            var WINDOW_WIDTH = 800;
            var WINDOW_HEIGHT = 600;
            window.resizeTo(WINDOW_WIDTH, WINDOW_HEIGHT);
            window.moveTo((window.screen.width - WINDOW_WIDTH) / 2, (window.screen.height - WINDOW_HEIGHT) / 2);
            
            function test(){
                var sFileName =    showOpenFileDialog();
                if (sFileName != &#039;&#039;) {
                    // Создаём элемент для добавления элемента списка
                    var oOption = document.createElement(&quot;option&quot;);
                    // Задаём текст и значение элемента
                    oOption.text = sFileName;
                    oOption.value = sFileName;
                    // Добавляем элемент в список
                    oSelect.add(oOption);
                } else {
                    alert(&#039;Файл не выбран !&#039;);
                }
            }
            
            // Функция выбора файла
            function showOpenFileDialog(){
                // динамически создаём поле ввода
                var oInput = document.createElement(&quot;input&quot;);
                // Указываем его тип (текстовое поле / выбор файла / т.п...)
                oInput.type = &#039;file&#039;;
                // Добавляем его в документ
                document.appendChild(oInput);
                // Скрываем элемент
                oInput.style.display = &quot;none&quot;;
                // Эмулируем событие нажатия на поле ввода
                oInput.click();
                // Получаем значение из поля
                var sValue = oInput.value;
                // Удаляем поле из документа
                document.removeChild(oInput);
                // Возвращаем из функции
                return sValue;
            }
        &lt;/script&gt;
    &lt;/head&gt;
    &lt;body&gt;
        &lt;table&gt;
            &lt;tr&gt;
                &lt;td&gt;&lt;select id=&quot;oSelect&quot; size=&quot;15&quot; multiple&gt;&lt;/select&gt;&lt;br&gt;&lt;/td&gt;
            &lt;/tr&gt;
            &lt;tr&gt;
                &lt;td&gt;&lt;button type=&quot;file&quot; onclick=&quot;test()&quot;&gt;Выбор файла&lt;/button&gt;&lt;/td&gt;
            &lt;/tr&gt;
        &lt;/table&gt;
    &lt;/body&gt;
&lt;/html&gt;
</code></pre></div>]]></content>
			<author>
				<name><![CDATA[Xameleon]]></name>
				<uri>https://forum.script-coding.com/profile.php?id=8836</uri>
			</author>
			<updated>2014-12-04T07:32:10Z</updated>
			<id>https://forum.script-coding.com/viewtopic.php?pid=88842#p88842</id>
		</entry>
		<entry>
			<title type="html"><![CDATA[Re: HTA+VBS: Выбор файла обработать событие]]></title>
			<link rel="alternate" href="https://forum.script-coding.com/viewtopic.php?pid=88789#p88789" />
			<content type="html"><![CDATA[<p>Вся проблема в том, что после выбора файла путь не отображается в таблице.</p>]]></content>
			<author>
				<name><![CDATA[wildwolf007]]></name>
				<uri>https://forum.script-coding.com/profile.php?id=30994</uri>
			</author>
			<updated>2014-11-30T17:17:14Z</updated>
			<id>https://forum.script-coding.com/viewtopic.php?pid=88789#p88789</id>
		</entry>
		<entry>
			<title type="html"><![CDATA[Re: HTA+VBS: Выбор файла обработать событие]]></title>
			<link rel="alternate" href="https://forum.script-coding.com/viewtopic.php?pid=88788#p88788" />
			<content type="html"><![CDATA[<p><strong>Xameleon</strong> <br />Вы использовали при запуске окна, а возможно сделать кнопочку с названием &quot;Выбрать файл&quot; и что б при нажатии этой кнопочки запускалась меню выбора файла? (Форматы можно все)</p><p><strong>alexii</strong><br />Вот код:<br /></p><div class="codebox"><pre><code>&lt;html&gt;
    &lt;head&gt;
        &lt;title&gt;Моё HTA-приложение&lt;/title&gt;
            &lt;hta:application
                id = &quot;oHTA&quot;
                ApplicationName = &quot;MyTestApplication&quot;
                Border = &quot;Dialog&quot;
                BorderStyle = &quot;Complex&quot;
                Icon = &quot;C:\Program Files\Windows NT\hypertrm.exe&quot;
                InnerBorder = &quot;No&quot;
                MaximizeButton = &quot;No&quot;
                MinimizeButton = &quot;No&quot;
                Scroll = &quot;No&quot;
                Selection = &quot;No&quot;
                ShowInTaskBar = &quot;No&quot;
                SingleInstance = &quot;Yes&quot;
                Version = &quot;1.3&quot;
            /&gt;
            
        &lt;script language=&quot;javascript&quot;&gt;
            var WINDOW_WIDTH = 800
            var WINDOW_HEIGHT = 600
            window.resizeTo(WINDOW_WIDTH, WINDOW_HEIGHT);
            window.moveTo((window.screen.width - WINDOW_WIDTH) / 2, (window.screen.height - WINDOW_HEIGHT) / 2);
        &lt;/script&gt;
        
        &lt;script language=&quot;VBScript&quot;&gt;
            
            Sub ChoosePut_onclick()
                
                MsgBox document.getElementByID(&quot;ChoosePut&quot;).value
                
                
                
                
                Dim objHTMLOptionElement
                Set objHTMLOptionElement = window.document.createElement(&quot;OPTION&quot;)
                objHTMLOptionElement.Text  = document.getElementByID(&quot;ChoosePut&quot;).value 
                objHTMLOptionElement.Value = &quot; &quot;
                MenuTextAccessRun.Add objHTMLOptionElement
            
            End Sub
            
        &lt;/script&gt;
    &lt;/head&gt;
    &lt;body&gt;
        &lt;div class=&quot;unvisible&quot; id=&quot;TextAccess&quot;&gt;
            &lt;select multiple id=&quot;MenuTextAccessRun&quot; size=&quot;15&quot; style=&quot;width:560px&quot;&gt;&lt;/select&gt;
        &lt;/div&gt;
        
        &lt;p&gt;Выберите ошибочный файл:&lt;/p&gt;
        &lt;input type=&quot;file&quot; SIZE=-1 name=&quot;txt1&quot; id=&quot;ChoosePut&quot; &gt;
        
        
    &lt;/body&gt;
&lt;/html&gt;</code></pre></div>]]></content>
			<author>
				<name><![CDATA[wildwolf007]]></name>
				<uri>https://forum.script-coding.com/profile.php?id=30994</uri>
			</author>
			<updated>2014-11-30T17:12:40Z</updated>
			<id>https://forum.script-coding.com/viewtopic.php?pid=88788#p88788</id>
		</entry>
		<entry>
			<title type="html"><![CDATA[Re: HTA+VBS: Выбор файла обработать событие]]></title>
			<link rel="alternate" href="https://forum.script-coding.com/viewtopic.php?pid=88553#p88553" />
			<content type="html"><![CDATA[<p><strong>wildwolf007</strong>, уже обсуждали это с Вами <a href="http://forum.script-coding.com/viewtopic.php?pid=87090#p87090">в этой теме</a> ? Что-то не получилось ?</p><p><a href="http://forum.script-coding.com/viewtopic.php?pid=51790#p51790">Тут</a> примеры на VBS.</p><p>Вот самый простой пример:<br /></p><div class="codebox"><pre><code>&lt;!doctype html&gt;
&lt;html&gt;
    &lt;object id=oDlg classid=&#039;clsid:3050F4E1-98B5-11CF-BB82-00AA00BDCE0B&#039;&gt;&lt;/object&gt;
    &lt;head&gt;
    &lt;/head&gt;
    &lt;body&gt;
        &lt;script language=&quot;vbscript&quot;&gt;
            Option Explicit
            Sub window_onload()
                Dim sPathName
                Dim sInitFile
                Dim sInitDir
                Dim sFilter
                Dim sTitle
                
                sInitFile = &quot;&quot;
                sInitDir = &quot;&quot;
                sFilter = &quot;Картинки (*.jpg;*.gif;*.png;*.bmp)|*.jpg;*.gif;*.png;*.bmp|Все файлы (*.*)|*.*&quot;
                sTitle = &quot;Выберите картинку...&quot;
                
                sPathName = oDlg.openfiledlg(CStr(sInitFile), CStr(sInitDir), CStr(sFilter), CStr(sTitle))
                
                MsgBox sPathName
            End Sub
        &lt;/script&gt;
    &lt;/body&gt;
&lt;/html&gt;</code></pre></div>]]></content>
			<author>
				<name><![CDATA[Xameleon]]></name>
				<uri>https://forum.script-coding.com/profile.php?id=8836</uri>
			</author>
			<updated>2014-11-21T19:05:51Z</updated>
			<id>https://forum.script-coding.com/viewtopic.php?pid=88553#p88553</id>
		</entry>
		<entry>
			<title type="html"><![CDATA[Re: HTA+VBS: Выбор файла обработать событие]]></title>
			<link rel="alternate" href="https://forum.script-coding.com/viewtopic.php?pid=88551#p88551" />
			<content type="html"><![CDATA[<p>Покажите Ваш код.</p>]]></content>
			<author>
				<name><![CDATA[alexii]]></name>
				<uri>https://forum.script-coding.com/profile.php?id=1844</uri>
			</author>
			<updated>2014-11-21T17:35:38Z</updated>
			<id>https://forum.script-coding.com/viewtopic.php?pid=88551#p88551</id>
		</entry>
		<entry>
			<title type="html"><![CDATA[Re: HTA+VBS: Выбор файла обработать событие]]></title>
			<link rel="alternate" href="https://forum.script-coding.com/viewtopic.php?pid=88550#p88550" />
			<content type="html"><![CDATA[<p>Формируют hta в hta присутствует данный код. <br />1) Отображается текстовое окошко и кнопка обзор. <br />2) При нажатии на кнопку обзор появляется окно выбора файла.<br />3) Выбираю файл нажимаю кнопку ок<br />4) имя файла и путь его размещения отображается в текстовом окне, которое располагается рядом с кнопкой обзор.<br />Так все работает. <br />Так вот, мне нужно что б например после нажатии кнопки ок (после выбора файла) ну например выводился MsgBox.</p>]]></content>
			<author>
				<name><![CDATA[wildwolf007]]></name>
				<uri>https://forum.script-coding.com/profile.php?id=30994</uri>
			</author>
			<updated>2014-11-21T17:08:50Z</updated>
			<id>https://forum.script-coding.com/viewtopic.php?pid=88550#p88550</id>
		</entry>
		<entry>
			<title type="html"><![CDATA[Re: HTA+VBS: Выбор файла обработать событие]]></title>
			<link rel="alternate" href="https://forum.script-coding.com/viewtopic.php?pid=88522#p88522" />
			<content type="html"><![CDATA[<p>Ничего не понятно.</p>]]></content>
			<author>
				<name><![CDATA[alexii]]></name>
				<uri>https://forum.script-coding.com/profile.php?id=1844</uri>
			</author>
			<updated>2014-11-20T21:02:05Z</updated>
			<id>https://forum.script-coding.com/viewtopic.php?pid=88522#p88522</id>
		</entry>
		<entry>
			<title type="html"><![CDATA[HTA+VBS: Выбор файла обработать событие]]></title>
			<link rel="alternate" href="https://forum.script-coding.com/viewtopic.php?pid=88518#p88518" />
			<content type="html"><![CDATA[<p>Выбираю файл и после выбора при нажатии на кнопку &quot;ок&quot; нужно что б сработал обработчик события использую следующий код:<br /></p><div class="codebox"><pre><code>&quot;&lt;input type=&quot;file&quot; SIZE=65 name=&quot;txt1&quot; id=&quot;ChoosePut&quot; &gt;&quot; </code></pre></div><p>В интернете пересмотрел целую кучу решений, но все сводятся к накладывание картинки. А нельзя ли заменить обычной кнопкой input ну или текстом типа выбрать файл. Или разработчики закрыли все возможные лазейки с точки зрения безопасности данного механизма ?</p>]]></content>
			<author>
				<name><![CDATA[wildwolf007]]></name>
				<uri>https://forum.script-coding.com/profile.php?id=30994</uri>
			</author>
			<updated>2014-11-20T20:27:43Z</updated>
			<id>https://forum.script-coding.com/viewtopic.php?pid=88518#p88518</id>
		</entry>
</feed>
