ShIvADeSt Moderator Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Вопросы, задачи и их решения по VBScript.   Мануал (english, 600 Кб). | Зеркало MS Scripting 5.6 (700 КБ), включает последнюю версию VBS. Владельцам XP/2000(?) должен быть не нужен. | Зеркало Немного на wikiпедии. Предыдущие части: 1   Смежные темы: Сценарии Windows Командная строка, батники\сценарии (bat, cmd) Скрипты KiXtart Всего записей: 3956 | Зарегистр. 29-07-2003 | Отправлено: 04:12 12-07-2011 | Исправлено: Smitis, 23:28 26-02-2018

sundraw Advanced Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Rush Скрипт работает, большое спасибо! Всего записей: 849 | Зарегистр. 15-05-2011 | Отправлено: 16:38 21-10-2018

zhudionis Junior Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Никак не могу найти нормальное описание работы MSXML2.DomDocument в VBS   Если не трудно, покажите пример создания например такого XML в VBS     Код: <?xml version="1.0" encoding="UTF-8"?> <InterfaceSSHConfig xmlns:g="urn:1"> <CHANNEL ChannelNum="3" ChannelName="БМИУ">  <RTU RTUName="Инвертор 1" RTUNum="1">   <STATUSES StaDesc="Инвертор1">    <STATUS StatusPoint="1" StatusName="Связь с инвертором" StatusClass="12"  StatusInvert="+ (да)" StatusImp="2 (сигнал)"/>    <STATUS StatusPoint="2" StatusName="Повреждение изоляции"  StatusInvert="+ (да)"/>   <ANALOGS AnaDesc="Инвертор1">    <ANALOG AnalogPoint="1" AnalogName="Генерация за текущие сутки" AnalogUnits="Мвт*ч"/>    <ANALOG AnalogPoint="2" AnalogName="Генерация полная" AnalogUnits="МВт*ч"/>   </ANALOGS>  </RTU>  <RTU RTUName="Инвертор2" RTUNum="2">   <STATUSES StaDesc="Инвертор2">    <STATUS StatusPoint="1" StatusName="Связь с инвертором"  StatusRetro="-  (нет)" StatusSignal="+ (аварийно-предупредительный)" StatusImp="0 (не записывать)"/>    <STATUS StatusPoint="2" StatusName="Повреждение изоляции"  StatusRetro="-  (нет)" StatusSignal="+ (аварийно-предупредительный)" StatusImp="0 (не записывать)"/>   </STATUSES>   <ANALOGS AnaDesc="Инвертор2">    <ANALOG AnalogPoint="1" AnalogName="Генерация за текущие сутки" AnalogUnits="МВт*ч"/>    <ANALOG AnalogPoint="2" AnalogName="Генерация полная" AnalogUnits="МВт*ч"/>   </ANALOGS>  </RTU> </CHANNEL> </InterfaceSSHConfig> Всего записей: 117 | Зарегистр. 25-05-2009 | Отправлено: 10:35 22-11-2018 | Исправлено: zhudionis, 11:30 22-11-2018

zhudionis Junior Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Alex_Piggy я Вам благодарен, буду изучать. Получается все в одну строку, уфффф...... Нужно все из Excel забрать, а там по 20000 строк!!! Буду текстовыми функциями пользоваться. Всего записей: 117 | Зарегистр. 25-05-2009 | Отправлено: 04:24 23-11-2018 | Исправлено: zhudionis, 04:34 23-11-2018

zhudionis Junior Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Proshaa Можно и на VBA, но там не простой экспорт, а признаки наличия атрибутов, пример таблицы Ссылка В принципе сделал скрипт через текстовые функции с записью в файл через ADODB.Stream, но подумал, что правильнее будет работать с файлом XML напрямую. В будущем хочу сделать и обратную выгрузку. P.S. я начинающий, просто пытаюсь автоматизировать рутину Мой скрипт Подробнее... Всего записей: 117 | Зарегистр. 25-05-2009 | Отправлено: 07:14 23-11-2018 | Исправлено: zhudionis, 07:25 23-11-2018

zhudionis Junior Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Цитата: 1. Переводы строк не важны   мне важны, не так же просто я их забацал)), этот файл в такой форме принимается программой   за подсказки спасибо - разбираюсь   Добавлено: Alex_Piggy Set oRange = Range("A2:T2")    а как обращаться к Excel? Всего записей: 117 | Зарегистр. 25-05-2009 | Отправлено: 11:08 23-11-2018

5peciali5t Advanced Member Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору добрый день!   выше рассмотрели пример формирования xml файла из vbs   тоже предстоит подобная задачка, но опыта почти ноль   собираю оболочку, конфигурирующую установку редакций офиса на основе установщика click 2 run пока это в основном только наброски внешнего вида, будет много чекбоксов и в зависимости от того что активировано/деактивировано должен будет формироваться xml файл конфигурации установки   пример xml файла   внешний вид   оболочка   Вопросы: 1. можно ли привести фрагмент кода который при установленном чекбоксе "ru-RU" запишет в xml файл строку       <Language ID="ru-RU" /> а при деактивированном (не отмеченном) чекбоксе OneDrive запишет       <ExcludeApp ID="OneDrive" /> 2. если xml файл нужно сложить по кирпичикам из совокупности отмеченных/деактивированных чекбоксов, как организовать вывод в файл, чтобы каждая новая строка дописывалась, а не перезаписывала файл 3. как организовать раскрывающийся список, который при выборе в нем элемента будет менять состав выводимых в поле опций, например, выбрали редакцию proplus под ней отобразились входящие в ее состав приложения, выбрали standard - отобразились входящие в нее (чтобы убрать из интерфейса множество по сути отвлекающих и дублирующихся опций)? 4. можно ли что-то добавить в код скрипта к определенным командам (как якорь в html), чтобы скомпилированному exe файлу можно было передавать параметры установки, конфигурируя ее из командной строки, например exe /proplus /ru-RU /excludeonedrive /silent прописало бы в формируемый xml файл соответственно       <Product ID="Proplus2019Volume">       <Language ID="ru-RU" />       <ExcludeApp ID="OneDrive" /> .. <Display Level="None" AcceptEULA="TRUE" />   заранее благодарю за ответы! Всего записей: 1472 | Зарегистр. 17-07-2009 | Отправлено: 10:34 24-11-2018

zhudionis Junior Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Alex_Piggy Спасибо! Опыта у Вас.... Короче, круто! Не могу понять, куда  PrettyXML  в коде добавить. Всего записей: 117 | Зарегистр. 25-05-2009 | Отправлено: 04:43 26-11-2018 | Исправлено: zhudionis, 07:14 26-11-2018

zhudionis Junior Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Alex_Piggy Кстати без него тоже работает, но лично под собственные нужды нужно в читабельном виде. Иногда правлю этот самый файл в Notepad++.   Всего записей: 117 | Зарегистр. 25-05-2009 | Отправлено: 09:03 26-11-2018

Страницы: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67

Компьютерный форум Ru.Board » Компьютеры » Прикладное программирование » Программирование "удобняшек" на VBScript (Часть 2)

Переход по форумам  Закладки   » Компьютеры Цифровое изображение Программы Microsoft Windows UNIX Другие OS Hardware В помощь сисадмину Прикладное программирование Игры Форумные игры   » Интернет Web-программирование В помощь вебмастеру Графика Хостинг Зацените-ка!   » Тематические Ikonboard v.2 Ikonboard v.3 Invision Board Другие форумы PHP-Nuke и другие порталы Мобила   » Общие Спорт Флейм Темы по региональным встречам Музыка и Кино Юмор Литература и Живопись   » Ru.Board Новости Помощь по форуму   » Андеграунд eBookz Варезник Раздачи и акции Мобильный варезник Андеграунд Игры и фильмы   » Специальные Тестирование