Что нового
Автор:
Фильтры

Как достать капчу из ie11

E

eropov

Jury
Сообщения
195
Репутация
25
Здравствуйте. Как вытащить капчу из IE
Выглядит так:
Код: 
<img src="data:image/jpeg;base64,R0lGODlhyAA8APUAAAEBAQwMDBQUFBsbGyMjIysrKzQ0NDw8PERERExMTFRUVFxcXGRkZGxsbHR0dHt7e/8AAP8VFf8kJP8qKv82Nv88PP9CQv9OTv9WVv9aWv9mZoODg4yMjJSUlJycnKSkpKurq7S0tLu7u/+Njf+QkP+lpf+ysv+8vMTExMvLy9PT09vb2//Dw//Ly+Pj4+zs7P/q6vT09P/x8f///wAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACH5BAAAAAAALAAAAADIADwAAAb+wJlwSCwaj8ikcslsOp/QqHRKrVqv2Kz2WaJAIK2teEwum6OliAkGYZ3f8Lh8KhnNZO25fs+H491/Ti8xSS6EfYiJcXgnd20uAIYAKjMhAJcuMx4AASkzACgqAioxCgECmYqqq1sTGo4sK5ExkzMgBZAukCkPB58oCwszGwYzKKzIyVQnEBkkj5EvtR4GsiseBJUBnx4BmQYcyuLjTiYQGNAFBrUcCrIuDgIMCQDSBA1CACHk/P1FGBb+yAohohaDB5BWNDDgoSGtBAVi0BLhryK5FmD+5KJFqQCKdxsKENEnwMOnDhZTJqtwAVYuaSpSREyIQt8QUA8GlIqosmf+InNhNEabJODSJQQzGgAQIBJUDAEcVgxYus+n1SmHxIwSAqLYjBUpshKJkWIFuUMS06YdIlbtVSZq2z5pkCpFOItrz0gcG0dsFBcb0EJxq3fvlryFUqAg5IEDhw2QHzw4FHiI4w4fQghO4ldIZ84zPsdIBUUXh6wvHjRw8GADkbKkkcStkkLFiyKfrYxeoeLDhgZZGShQQEj48OEcOhwSIOIQBwbQF6RqMJw0ihSDzKgwTrF0kQUeBkCHnnXBcUINHnD4wFbLgQQKEiRAIIwzWom3kYjYIFkyawQO0JUKCiBUpcIKLrygYBEFfICaCzEZMsMHqt2moAPxwbcYESj+XEdKaIS94AJvKYQAQn4zpGAAA40tAEJuuLUnBAfgeGbYDCJ84IFrMzBgHj6hxadAeuuJgOITA2wAQmMPOPCCSUcwgNQM8yGQQBIHQOfABhx4wEADi2UHV1YDvPiEiAQ2BoByRFhZXVLyyZdJA/AN92V+MSTgACUTFmDWEjAKEFYTMbyAoBAqbOCAj8EsUIAnUQzQ3RAvDPBnEQM8MKNjdx1BQAgKpsWAknJltRYha5Xp142hJcGQWAVwgEJzxnxgq2aVgFCgCCpIOMMLBKjwYaV8LvHAh6/NQphnSpgKYUGXPiEAroYNUFURBhxjxGcEgFDEqNdKoSqhbhHyKlv+BkwqxQuPDhssoA9IZ4QH9Q3WqhEh6CRFAOoKMe0RK4QrxAr9CmGtWAtsgOsQATsoRAPmBaPAAneOS0QHmNGqRAEewLowiCDbeC9bBNSGaskwzvAAAsUSEUAABhiAwMTppYzbWhRPwa8ROxshJhEFCGywwApw0K8D9K1g1gcF8tffZNYaUYDEl9q5gQch9NqgqQUU/EQMBITiGQEab+vAARsakQIIOnbwmGRHGvEA1rYVwdwUABTccxEEdGYApEXYRETR/SawQQq6jHXqDHfbDYKw1oHQwQbzIGBAAA575pFYic8worCzhhDbDGQXK2luMRidGwKXphWqzweusGj+AgcYUAB9DNSDd8F5HwHKtp+lPQQCHYyOAJRMMOdXB9p2FgNYIoQg+lgeFVG7WQscgICbpxPxKbIHb+tgygAMGiMRL6DgwQPsifi5Y00yQMXvgXvdexHYOXFAx9jyz0QA2sKfzZAALMCFhgAfMMQLUsDA2kSNCNYCn9BSlwCbBaBlQwCMZ1DAAQc4gAPmU1znpEC/kQTQhDw7oRIMwB5stRBVzILhDAB4hNvAKDfEGkvJkBA2sZSpWNNqCwcS4DVTASBaQ3DQC0SwqA+i4GcDfEIJb6LCfFRxikP4mwulNqpFxWd7CDiA9hBAiPIhYT0hKIsMleACS41lABgcggD+hEc6EFzqX2zxAAK8hpsAIFEILwiBcBzgARRkIgBRlMIDDDiEDvwRi7/wnQpthUEfrYZLXfKArWylSY4gwQELSIABCCAAAhxgSBvoQAjo+BVUoE8AfxSCA0bXrWIFIFwfSJdfHLCtSBThBR+ID/tsQ4gNTKkMowsNdMr2CUZG0giQ1CL6dKGgQbDKMxckoPt4Q6DJQQwBZiSCChBJBBcIIG4yKucHLnU/HH0KNw4wAKti4I0MDtFwdryRAFo4hyNSpwMoCudInNlMaBJUNkSwxtcKJSJZYLAmYlEBAHLTKbb4kYpCQIEAvDWWeIYlG9tSwQMMUDRDskoasczCZxD+ScFFEkJQBvUdI18AUynQggAp3RZuasGWEIB0CDWRTQDiRotU0PMYKdgnbojhiaKiTwQMGEACPICda+JoomZoADoZGBoUQMwDmYijQEdSSQ7E8VfuG9GIEISgcRI0QWv0GSyLsAKOegYEAyBgPcs5ADx5QEEG4BFbaEQrYHnGBSBIwAAUIIIVoIosRoDOGXh6Ps89QAEPYGY+4uhJtoCCs17cXu1iFjMxGiCOL1hAAwKDmTTGDq5SyalnPHClI7hgr54xQLhQ5avZ6lYs6XsAATJFTCJ8DJtC2wJlM6g4JjIAhGJZLjZbdlQkSsQDS2IaQTokglkhtTMiWFIM5lH+gFLKTLWScaPi0NckJJgzNuy6Vgy0ui0RMIQtKaCtABCQQGuiDwm6K0NnvTe6QnUAOtANzWl9Fy16lmUsHMDTXjqzgouO5UhpcUGJdkQdBhzpBQ4wYAw8gBKADSA2bQygLICDm/yGRgUgaAABCuBS0RzAeV4xwxGhedavcEC1ILxNMmnR4PI1eAPoNPHoXJAAPClOLXFTQdiM0GMV9DWhcDzECgrwolXV9QEFmBpFThVCz5FzD0TeaSzHrAIONGC1IOgtNhvcCdkqQSpLJuMUUkAAFCOPyn1OKE5TsURTgeUDSFtRnCViJkRhdQj5Es0bdjwWSgcOTyroQIDmZtL+mxT5UGyhSxOkQtQeA8qnhhas2gpwpBR4IzaFUoEIPNAAKzngcf6dgQFQZGVTSbYImUiyFpwauFgOFdi+aRKnV/ACBXw4aLCehGAei+UkJ3Is1KjsEZJ6JHgUajcooFCjOJBGxx4hK0k11QPzCAdiezaZM6hoDFOQbNaY9UAoEgEqHlspYY9sBefEDbLYghgjrKBouEnuwBxwH0KsQH3x+yB2i9uEgrBFFkTNsRnc7RlL/xI3bBoNgR7zZvWAIBQqWACGAfCB5sSAbZy061cIEDcXdK1X11YBfTOoAP/J5gUqCPfkPNgazHxECAe9a1Z0TgQQ/JRSAGi3LwP3GXn+VXp0QA/vjgKUnhBkprtKcwBBhDAc+cyMgRKRqCEeuwIDJCAYDHfBatHIp297BsMhmIwIH26ixjzGg1w6uWNRFW4+AvLY51YAL4uAgm28gRZEXVM5BzF1i/aKRM0rFPRAwAHVNMBHW7pVZrq0ygPVZra2LRHbQoOhRmmKWTcrFEU+l4LofWDon/fgegypwLGsgACvTwJNMexZZ65M6kRNgPw80yjcYpNi42EAb9qzFwgpxkRu/ryPvvQ0TpHeVrrSlYlEQH7vEmxJjhFBAxUzK/KbSEduDgajVJvKliuN2RIZFIYlm7IXnPl5r7F4b8RPGxdgk5dBbsMlnfEYyYH+XWnkTDHAcASnILoQdOH1ASQ3HgECfdHRKPIHfRSzGv7BdW/2efInglzSAQ7YIb0yCC5QUWQxTxxwAD8jVCjSGAwDImuRC8gHKD54LzikLAW3BGnFGzGhGOQXPdKzhGwTfkvYXVDYXaRgd0mQAgaIBCjwTnCBeJogEkoQAgJwbVQgDUSFGFEEQ4sDSALgMw8nBAnYJEQnGYNhVbCXUBxgV9M2BFL2WJvxK3pyhhOVFu1QBESCXSIQDHEgDWJIBaNBC4qyAGBUJ0HSKNvXKLryASICOrbnNp7nGauFNR+hEGOhAvSSLkzQaxBGKRvQZE4QAwYAJE9BgC/wZtGhAKbs2G61RQQLsCUdUCDXgSChkhUVaIFswyQedIwqkAAiWHQOiHQIkiCDYE1GiB9rFXQo8H5QMl8+UnbrYEpD8maKZ2oJFQDopyiQ8FcrwAEIUEVKgALqYADi0RYSMSJIuIhj+EtNYoJlB0Zi5AtC4CYTA32fN5CtYTTAOAfPE3Re1xCS03nq8URO4AIkFYLH4gHqoD0KpwR2cYf2qAcZBhbX9346gjyaxDQgQH4MhCBxsSojAxfnxhetSIecwUAHAo0zIGtH9xY6KWAd2W49uQo/uZNRIJNCWZRGeZRImZRKuZRM2ZRO+ZRQGZVKEAQAOw==" id="capimg">

Пробовал из кеша, в кэше не нашел картинки, если присмотреться на src, то похожа на base64, но если декодировать, то ни чего не получается, как быть?
 
inververs

inververs

AutoIT Гуру
Сообщения
2,135
Репутация
465
На капче написано шеелит, капча от яндекса. Все получается.
 
inververs

inververs

AutoIT Гуру
Сообщения
2,135
Репутация
465
вставь data:image/jpeg;base64,R0lGODlhy..длинный код..ZVKEAQAOw== в строку браузера хром или фаерфокс, увидишь картинку.
 
Автор
E

eropov

Jury
Сообщения
195
Репутация
25
inververs сказал(а):
вставь data:image/jpeg;base64,R0lGODlhy..длинный код..ZVKEAQAOw== в строку браузера хром или фаерфокс, увидишь картинку.
Нажмите, чтобы раскрыть...
Про это я знаю. Как сохранить эту картинку на жесткий диск?
 
madmasles

madmasles

Модератор
Глобальный модератор
Сообщения
7,790
Репутация
2,322
eropov [?]
Как сохранить эту картинку на жесткий диск?
Нажмите, чтобы раскрыть...
Код: 
#include <Encoding.au3>;см. мою подпись

$sB64 = FileRead(@ScriptDir & '\1.txt')
$sB64 = StringRegExpReplace($sB64, '(?s).*base64,(.+)".*', '$1')
ConsoleWrite(@extended & @LF)
$sData = _Encoding_Base64Decode($sB64)

$hFile = FileOpen(@ScriptDir & '\1.jpg', 2)
FileWrite($hFile, $sData)
FileClose($hFile)
 
alex33

alex33

Скриптер
Сообщения
1,457
Репутация
186
madmasles
Результат:
Код: 
Изображение «1.jpg» не может быть показано, так как содержит ошибки.

В консоле:
Код: 
0
+>15:57:46 AutoIt3.exe ended.rc:0
+>15:57:46 AutoIt3Wrapper Finished.
>Exit code: 0    Time: 0.424

Как выяснилось, файл 1.jpg записывается некорректно.
Файл 1.txt в порядке, содержит код ниже (UTF-8 (без BOM)).
Код: 
data:image/jpeg;base64,R0lGODlhyAA8APUAAAEBAQwMDBQUFBsbGyMjIysrKzQ0NDw8PERERExMTFRUVFxcXGRkZGxsbHR0dHt7e/8AAP8VFf8kJP8qKv82Nv88PP9CQv9OTv9WVv9aWv9mZoODg4yMjJSUlJycnKSkpKurq7S0tLu7u/+Njf+QkP+lpf+ysv+8vMTExMvLy9PT09vb2//Dw//Ly+Pj4+zs7P/q6vT09P/x8f///wAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACH5BAAAAAAALAAAAADIADwAAAb+wJlwSCwaj8ikcslsOp/QqHRKrVqv2Kz2WaJAIK2teEwum6OliAkGYZ3f8Lh8KhnNZO25fs+H491/Ti8xSS6EfYiJcXgnd20uAIYAKjMhAJcuMx4AASkzACgqAioxCgECmYqqq1sTGo4sK5ExkzMgBZAukCkPB58oCwszGwYzKKzIyVQnEBkkj5EvtR4GsiseBJUBnx4BmQYcyuLjTiYQGNAFBrUcCrIuDgIMCQDSBA1CACHk/P1FGBb+yAohohaDB5BWNDDgoSGtBAVi0BLhryK5FmD+5KJFqQCKdxsKENEnwMOnDhZTJqtwAVYuaSpSREyIQt8QUA8GlIqosmf+InNhNEabJODSJQQzGgAQIBJUDAEcVgxYus+n1SmHxIwSAqLYjBUpshKJkWIFuUMS06YdIlbtVSZq2z5pkCpFOItrz0gcG0dsFBcb0EJxq3fvlryFUqAg5IEDhw2QHzw4FHiI4w4fQghO4ldIZ84zPsdIBUUXh6wvHjRw8GADkbKkkcStkkLFiyKfrYxeoeLDhgZZGShQQEj48OEcOhwSIOIQBwbQF6RqMJw0ihSDzKgwTrF0kQUeBkCHnnXBcUINHnD4wFbLgQQKEiRAIIwzWom3kYjYIFkyawQO0JUKCiBUpcIKLrygYBEFfICaCzEZMsMHqt2moAPxwbcYESj+XEdKaIS94AJvKYQAQn4zpGAAA40tAEJuuLUnBAfgeGbYDCJ84IFrMzBgHj6hxadAeuuJgOITA2wAQmMPOPCCSUcwgNQM8yGQQBIHQOfABhx4wEADi2UHV1YDvPiEiAQ2BoByRFhZXVLyyZdJA/AN92V+MSTgACUTFmDWEjAKEFYTMbyAoBAqbOCAj8EsUIAnUQzQ3RAvDPBnEQM8MKNjdx1BQAgKpsWAknJltRYha5Xp142hJcGQWAVwgEJzxnxgq2aVgFCgCCpIOMMLBKjwYaV8LvHAh6/NQphnSpgKYUGXPiEAroYNUFURBhxjxGcEgFDEqNdKoSqhbhHyKlv+BkwqxQuPDhssoA9IZ4QH9Q3WqhEh6CRFAOoKMe0RK4QrxAr9CmGtWAtsgOsQATsoRAPmBaPAAneOS0QHmNGqRAEewLowiCDbeC9bBNSGaskwzvAAAsUSEUAABhiAwMTppYzbWhRPwa8ROxshJhEFCGywwApw0K8D9K1g1gcF8tffZNYaUYDEl9q5gQch9NqgqQUU/EQMBITiGQEab+vAARsakQIIOnbwmGRHGvEA1rYVwdwUABTccxEEdGYApEXYRETR/SawQQq6jHXqDHfbDYKw1oHQwQbzIGBAAA575pFYic8worCzhhDbDGQXK2luMRidGwKXphWqzweusGj+AgcYUAB9DNSDd8F5HwHKtp+lPQQCHYyOAJRMMOdXB9p2FgNYIoQg+lgeFVG7WQscgICbpxPxKbIHb+tgygAMGiMRL6DgwQPsifi5Y00yQMXvgXvdexHYOXFAx9jyz0QA2sKfzZAALMCFhgAfMMQLUsDA2kSNCNYCn9BSlwCbBaBlQwCMZ1DAAQc4gAPmU1znpEC/kQTQhDw7oRIMwB5stRBVzILhDAB4hNvAKDfEGkvJkBA2sZSpWNNqCwcS4DVTASBaQ3DQC0SwqA+i4GcDfEIJb6LCfFRxikP4mwulNqpFxWd7CDiA9hBAiPIhYT0hKIsMleACS41lABgcggD+hEc6EFzqX2zxAAK8hpsAIFEILwiBcBzgARRkIgBRlMIDDDiEDvwRi7/wnQpthUEfrYZLXfKArWylSY4gwQELSIABCCAAAhxgSBvoQAjo+BVUoE8AfxSCA0bXrWIFIFwfSJdfHLCtSBThBR+ID/tsQ4gNTKkMowsNdMr2CUZG0giQ1CL6dKGgQbDKMxckoPt4Q6DJQQwBZiSCChBJBBcIIG4yKucHLnU/HH0KNw4wAKti4I0MDtFwdryRAFo4hyNSpwMoCudInNlMaBJUNkSwxtcKJSJZYLAmYlEBAHLTKbb4kYpCQIEAvDWWeIYlG9tSwQMMUDRDskoasczCZxD+ScFFEkJQBvUdI18AUynQggAp3RZuasGWEIB0CDWRTQDiRotU0PMYKdgnbojhiaKiTwQMGEACPICda+JoomZoADoZGBoUQMwDmYijQEdSSQ7E8VfuG9GIEISgcRI0QWv0GSyLsAKOegYEAyBgPcs5ADx5QEEG4BFbaEQrYHnGBSBIwAAUIIIVoIosRoDOGXh6Ps89QAEPYGY+4uhJtoCCs17cXu1iFjMxGiCOL1hAAwKDmTTGDq5SyalnPHClI7hgr54xQLhQ5avZ6lYs6XsAATJFTCJ8DJtC2wJlM6g4JjIAhGJZLjZbdlQkSsQDS2IaQTokglkhtTMiWFIM5lH+gFLKTLWScaPi0NckJJgzNuy6Vgy0ui0RMIQtKaCtABCQQGuiDwm6K0NnvTe6QnUAOtANzWl9Fy16lmUsHMDTXjqzgouO5UhpcUGJdkQdBhzpBQ4wYAw8gBKADSA2bQygLICDm/yGRgUgaAABCuBS0RzAeV4xwxGhedavcEC1ILxNMmnR4PI1eAPoNPHoXJAAPClOLXFTQdiM0GMV9DWhcDzECgrwolXV9QEFmBpFThVCz5FzD0TeaSzHrAIONGC1IOgtNhvcCdkqQSpLJuMUUkAAFCOPyn1OKE5TsURTgeUDSFtRnCViJkRhdQj5Es0bdjwWSgcOTyroQIDmZtL+mxT5UGyhSxOkQtQeA8qnhhas2gpwpBR4IzaFUoEIPNAAKzngcf6dgQFQZGVTSbYImUiyFpwauFgOFdi+aRKnV/ACBXw4aLCehGAei+UkJ3Is1KjsEZJ6JHgUajcooFCjOJBGxx4hK0k11QPzCAdiezaZM6hoDFOQbNaY9UAoEgEqHlspYY9sBefEDbLYghgjrKBouEnuwBxwH0KsQH3x+yB2i9uEgrBFFkTNsRnc7RlL/xI3bBoNgR7zZvWAIBQqWACGAfCB5sSAbZy061cIEDcXdK1X11YBfTOoAP/J5gUqCPfkPNgazHxECAe9a1Z0TgQQ/JRSAGi3LwP3GXn+VXp0QA/vjgKUnhBkprtKcwBBhDAc+cyMgRKRqCEeuwIDJCAYDHfBatHIp297BsMhmIwIH26ixjzGg1w6uWNRFW4+AvLY51YAL4uAgm28gRZEXVM5BzF1i/aKRM0rFPRAwAHVNMBHW7pVZrq0ygPVZra2LRHbQoOhRmmKWTcrFEU+l4LofWDon/fgegypwLGsgACvTwJNMexZZ65M6kRNgPw80yjcYpNi42EAb9qzFwgpxkRu/ryPvvQ0TpHeVrrSlYlEQH7vEmxJjhFBAxUzK/KbSEduDgajVJvKliuN2RIZFIYlm7IXnPl5r7F4b8RPGxdgk5dBbsMlnfEYyYH+XWnkTDHAcASnILoQdOH1ASQ3HgECfdHRKPIHfRSzGv7BdW/2efInglzSAQ7YIb0yCC5QUWQxTxxwAD8jVCjSGAwDImuRC8gHKD54LzikLAW3BGnFGzGhGOQXPdKzhGwTfkvYXVDYXaRgd0mQAgaIBCjwTnCBeJogEkoQAgJwbVQgDUSFGFEEQ4sDSALgMw8nBAnYJEQnGYNhVbCXUBxgV9M2BFL2WJvxK3pyhhOVFu1QBESCXSIQDHEgDWJIBaNBC4qyAGBUJ0HSKNvXKLryASICOrbnNp7nGauFNR+hEGOhAvSSLkzQaxBGKRvQZE4QAwYAJE9BgC/wZtGhAKbs2G61RQQLsCUdUCDXgSChkhUVaIFswyQedIwqkAAiWHQOiHQIkiCDYE1GiB9rFXQo8H5QMl8+UnbrYEpD8maKZ2oJFQDopyiQ8FcrwAEIUEVKgALqYADi0RYSMSJIuIhj+EtNYoJlB0Zi5AtC4CYTA32fN5CtYTTAOAfPE3Re1xCS03nq8URO4AIkFYLH4gHqoD0KpwR2cYf2qAcZBhbX9346gjyaxDQgQH4MhCBxsSojAxfnxhetSIecwUAHAo0zIGtH9xY6KWAd2W49uQo/uZNRIJNCWZRGeZRImZRKuZRM2ZRO+ZRQGZVKEAQAOw==
 
madmasles

madmasles

Модератор
Глобальный модератор
Сообщения
7,790
Репутация
2,322
alex33,
А так?
Код: 
$sB64 = FileRead(@ScriptDir & '\1.txt')
$sB64 = StringRegExpReplace($sB64, '(?s).*base64,(.+)".*', '$1')
ConsoleWrite(@extended & @LF)
$bData = _Encoding_Base64DecodeEx($sB64, 1)

$hFile = FileOpen(@ScriptDir & '\1.jpg', 18)
FileWrite($hFile, $bData)
FileClose($hFile)

Func _Encoding_Base64DecodeEx($sData, $iBin = 0)
	Local $struct = DllStructCreate("int")

	$a_Call = DllCall("Crypt32.dll", "int", "CryptStringToBinary", _
			"str", $sData, _
			"int", 0, _
			"int", 1, _
			"ptr", 0, _
			"ptr", DllStructGetPtr($struct, 1), _
			"ptr", 0, _
			"ptr", 0)

	If @error Or Not $a_Call[0] Then
		Return SetError(1, 0, "") ; error calculating the length of the buffer needed
	EndIf

	Local $a = DllStructCreate("byte[" & DllStructGetData($struct, 1) & "]")

	$a_Call = DllCall("Crypt32.dll", "int", "CryptStringToBinary", _
			"str", $sData, _
			"int", 0, _
			"int", 1, _
			"ptr", DllStructGetPtr($a), _
			"ptr", DllStructGetPtr($struct, 1), _
			"ptr", 0, _
			"ptr", 0)

	If @error Or Not $a_Call[0] Then
		Return SetError(2, 0, ""); error decoding
	EndIf
	If $iBin Then Return DllStructGetData($a, 1)
	Return BinaryToString(DllStructGetData($a, 1))
EndFunc   ;==>_Encoding_Base64Decode
 
Garrett

Garrett

Модератор
Локальный модератор
Сообщения
3,999
Репутация
967
eropov [?]
Как вытащить капчу из IE
Нажмите, чтобы раскрыть...
Как вариант:
Код: 
#include <IE.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>

$oIE = _IECreate("you_site")
$oImg = _IEGetObjById($oIE, "capimg")

$Form1 = GUICreate("Form1", 220, 100, -1, -1)
$Obj1 = ObjCreate("Shell.Explorer.2")
$Obj1_ctrl = GUICtrlCreateObj($Obj1, 0, 0, 250, 100)
$Obj1.Navigate("about:blank")

Do
   Sleep(250)
Until $Obj1.Document.readyState == "complete"

$oDocument = $Obj1.Document
$sData = $oImg.getAttributeNode("src").value
$oDocument.Write(StringFormat("<img src='%s'>", $sData))

GUISetState(@SW_SHOW)

While 1
   $nMsg = GUIGetMsg()
   Switch $nMsg
	  Case $GUI_EVENT_CLOSE
		 Exit

   EndSwitch
WEnd
 
madmasles

madmasles

Модератор
Глобальный модератор
Сообщения
7,790
Репутация
2,322
alex33 [?]
Всё равно не работает
Нажмите, чтобы раскрыть...
Не знаю, у меня работают оба варианта. :scratch:


Добавлено:
Сообщение автоматически объединено:

alex33 [?]
Файл 1.txt в порядке, содержит код ниже (UTF-8 (без BOM)).
Нажмите, чтобы раскрыть...
В нем нет закрывающей кавычки ("). Попробуйте в 1.txt скопировать весь код из первого поста.
 
alex33

alex33

Скриптер
Сообщения
1,457
Репутация
186
Код скопирован правильно. :smile:
Вот посмотрите. Файл 11111.zip
Код: 
не удалось открыть это изображение, поскольку файл поврежден или слишком велик
Версия AutoIt - 3.3.12.0 , Windows 7 .
 
alex33

alex33

Скриптер
Сообщения
1,457
Репутация
186
Блин, и в реале :smile: :smile:
Всё заработало. :smile:
 
Вам необходимо войти или зарегистрироваться, чтобы здесь отвечать.
Автор темы Похожие темы Форум Ответы Дата
M Сохранил черновик, а как его достать? Общение 1
M [Автоматизация] Достать информацию с веб-страницы Общие вопросы по AutoIt 6
D [Данные, строки] Достать инфу из свойства .exe Общие вопросы по AutoIt 2
mef-t Как достать определенный Cookie текущей сессии Автоматизация IE и Web-интерфейса 4
M Достать имя компьютера из строки текста Регулярные выражения и прочее 3
Похожие темы
Сохранил черновик, а как его достать?
[Автоматизация] Достать информацию с веб-страницы
[Данные, строки] Достать инфу из свойства .exe
Как достать определенный Cookie текущей сессии
Достать имя компьютера из строки текста
Верх