Недавние сообщения

Страницы: 1 ... 8 9 [10]
91
UDF - Пользовательские функции / Re: Библиотека для работы с FireFox
« Последний ответ от Коршун Отправлен Июнь 07, 2019, 18:15:54 »


Добавлено: Май 09, 2019, 01:05:16
используйте функцию _Encoding_UTF8ToANSI() из библиотеки Encoding.au3 (нужно устанавливать дополнительно, в комплекте её нет)

Спасибо, помогло!
А как перейти по ссылке или кликнуть по объекту внутри фрейма?!
Код: AutoIt [Выделить]
_FFFrameEnter(0)
_FFClick("href", "elements", 1)


Выдает ошибку: No match: $sElement: href
92
Стол заказов / [Автоматизация] Поиск файлов рекурсивно по данному списку
« Последний ответ от Tosyk Отправлен Июнь 07, 2019, 02:16:24 »
Версия AutoIt: 3.5.4

Описание: есть 2 типа списков с именами файлов, выглядят вот так:
первый
Material B7E671143D244B
====================================
TEXT 2F3139D816C34D 1
TEXT B6A968EF2505A2 1
TEXT 35206697A04F91 1
TEXT EB485AF490D83D 1
TEXT 0DAB42294BD9B3 1
TEXT 3D6525BEE360E1 0

Material D6906B886B06E3
====================================
TEXT 0CCECCCCFB62AE 1
TEXT 1E14CB29AB43F0 1
TEXT FB7F0DCE9B5950 1

Material 431831490FD5C9
====================================
TEXT 9D77B6474696D8 1
TEXT D04DEE5DF130A4 1
TEXT B6A968EF2505A2 1
TEXT 8C37245A4F0F81 1
TEXT A39FAFFC5ABC06 1
TEXT D24199644F2EE6 1

второй
============================================================
ant-plastic-storage-bin-c_tmp0
============================================================
cit-storage-bins-01-color
cit-storage-bins-01-normal_dx10
cit-storage-bins-01-roughness_dx10
missingtexture_dx10

это обычные текстовые файлы.

нужно создать EXE, на который мы перетаскиваем один из этих списков (или оба, в цикл) в эксплорере и запускается процесс поиска этих файлов по имени в данной структуре каталогов, расширение может быть любым. после завершения поиска файлы нужно скопировать в папку к исходному файлу.
ищем в данной структуре по пути заданномe в INI файле, который лежит рядом с EXE

Примечания: я тут нашёл, кое-что интересное вот тут: https://www.autoitscript.com/forum/topic/186400-recursive-file-search/

Код: AutoIt [Выделить]
#include <Array.au3>
#include <File.au3>

Global $hFilePath = 'C:\Drivers'

Global $aSearch = _FileListToArrayRec ($hFilePath, "*.inf", 1, 1, 1, 1)

Global $aArray[UBound($aSearch)][3]
For $x = 1 To $aSearch[0]
    $aArray[$x][0] = $hFilePath & '\' & $aSearch[$x]
    $aArray[$x][1] = StringLeft($aSearch[$x], StringInStr($aSearch[$x], '\') - 1)
    $aArray[$x][2] = IniRead($aSearch[$x], 'Version', 'Class', 'Misc')
Next
$aArray[0][0] = UBound($aArray) - 1
_ArrayDisplay($aArray, ".inf Files")

Global $sFileText = @ScriptDir & "\Examples.csv"
Global $hFileText = FileOpen($sFileText, 2)
If $hFileText = -1 Then
    ConsoleWrite('Error opening: ' & $sFileText & @CRLF)
    Exit
EndIf

_FileWriteFromArray($hFileText, $aArray, 1, Default, ',')

FileClose($hFileText)


но моя проблема в этих непонятных [ 0 ]. я уже много чего знаю и эти массивы одна из моих бед - поэтому я прошу помощи у вас
93
Стол заказов / Re: [Автоматизация] Объединить 2 файла в новый
« Последний ответ от Tosyk Отправлен Июнь 07, 2019, 01:14:35 »
94
Дни рождения / С днём рождения gunter123, AllaGlotova, saniakig, tnahcxza!
« Последний ответ от Представитель Сообщества Отправлен Июнь 07, 2019, 01:00:29 »
От имени всего Русского сообщества AutoIt поздравляем Вас gunter123, AllaGlotova, saniakig, tnahcxza с днём рождения!


Нажмите для отображения изображения в оригинальном размере.

Цитировать
Пусть все мечты исполнятся,
Пусть все желанья сбудутся,
Пусть радости запомнятся,
А горести забудутся.

Здоровье будет крепкое,
В делах всегда согласие,
Любовь навеки верная —
Без ссор и разногласия.

Зарплата только вовремя,
Стабильная, высокая.
Работа будет лёгкая
И не совсем далёкая.

Пусть жизнь Вам дарит самые
Прекрасные мгновения.
Желаем только радости
И счастья, с днем рождения!
95
Стол заказов / Re: [Автоматизация] Объединить 2 файла в новый
« Последний ответ от ra4o Отправлен Июнь 06, 2019, 21:23:04 »
Примеры файлов можете прикрепить ?
96
Стол заказов / Re: [Автоматизация] Объединить 2 файла в новый
« Последний ответ от Tosyk Отправлен Июнь 06, 2019, 18:41:21 »
может кто-то помочь расширить скрипт?
97
Общение / Изменение тембра \ пола в голосовом движке яндекса
« Последний ответ от saraconor Отправлен Июнь 06, 2019, 12:23:07 »
Код: AutoIt [Выделить]
$STR = _UnicodeURLEncode('тестирование голосового движка яндекса')
$STR2 = 'This is a voice emulator script test'
$LANG = 'ru_RU'
$LANG2 = 'en_GB'

InetGet("http://tts.voicetech.yandex.net/tts?format=mp3&quality=hi&platform=web&application=translate&text="&$STR&"&lang="&$LANG, @TempDir & "\voicetechyandex.mp3")
SoundPlay(@TempDir & "\voicetechyandex.mp3", 1)

InetGet("http://tts.voicetech.yandex.net/tts?format=mp3&quality=hi&platform=web&application=translate&text="&$STR2&"&lang="&$LANG2, @TempDir & "\voicetechyandex2.mp3")
SoundPlay(@TempDir & "\voicetechyandex2.mp3", 1)

Func _UnicodeURLEncode($UnicodeURL)
    $UnicodeBinary = StringToBinary ($UnicodeURL, 4)
    $UnicodeBinary2 = StringReplace($UnicodeBinary, '0x', '', 1)
    $UnicodeBinaryLength = StringLen($UnicodeBinary2)
    Local $EncodedString
    For $i = 1 To $UnicodeBinaryLength Step 2
        $UnicodeBinaryChar = StringMid($UnicodeBinary2, $i, 2)
        If StringInStr("$-_.+!*'(),;/?:@=&abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ1234567890", BinaryToString ('0x' & $UnicodeBinaryChar, 4)) Then
            $EncodedString &= BinaryToString ('0x' & $UnicodeBinaryChar)
        Else
            $EncodedString &= '%' & $UnicodeBinaryChar
        EndIf
    Next
    Return $EncodedString
EndFunc


Как в этом примере можно поменять тип \ тембр голоса, или пол озвучивающего?
98
Дни рождения / С днём рождения Andreassux, DazongitlY, qkiyvcjz!
« Последний ответ от Представитель Сообщества Отправлен Июнь 06, 2019, 01:03:04 »
От имени всего Русского сообщества AutoIt поздравляем Вас Andreassux, DazongitlY, qkiyvcjz с днём рождения!


Нажмите для отображения изображения в оригинальном размере.

Цитировать
Пусть все мечты исполнятся,
Пусть все желанья сбудутся,
Пусть радости запомнятся,
А горести забудутся.

Здоровье будет крепкое,
В делах всегда согласие,
Любовь навеки верная —
Без ссор и разногласия.

Зарплата только вовремя,
Стабильная, высокая.
Работа будет лёгкая
И не совсем далёкая.

Пусть жизнь Вам дарит самые
Прекрасные мгновения.
Желаем только радости
И счастья, с днем рождения!
99
Стол заказов / Re: [Сеть, интернет] Загрузка файла на FTP
« Последний ответ от ra4o Отправлен Июнь 05, 2019, 20:04:47 »
Понятно, что Вас интересует копирование, но определитесь с алгоритмом действий
-Копировать файл на FTP сервер
-Переименовать файл на FTP сервере

или

-Подготавливаете файл у себя (даёте нужное название итп)
-копируете файл на FTP сервер

Вот по первому варианту, раз вы уже освоили копирование файла на сервер я Вам подсказал , ка можно его переименовать уже на FTP сервере.
По второму варианту тоже ответил ранее , как переименовать файл
100
Стол заказов / Re: [Сеть, интернет] Загрузка файла на FTP
« Последний ответ от yokselmoksel Отправлен Июнь 05, 2019, 14:27:53 »
Нет, меня интересует именно копирование файлов на  фтп
Страницы: 1 ... 8 9 [10]