1MDI1
Новичок
- Сообщения
- 4
- Репутация
- 0
Всем привет!
Пишу скрипт для обновления списка отозванных сертификатов(CRL) который должен проверять обновился ли CRL и если обновился то устанавливать его снова но есть одна проблема не могу подключится к FTP через прокси сервер.
Этот код работает в обход прокси. А если прописать прокси в
и запустить подключение через прокси то не подключается!
Есть какие предложения?
Пишу скрипт для обновления списка отозванных сертификатов(CRL) который должен проверять обновился ли CRL и если обновился то устанавливать его снова но есть одна проблема не могу подключится к FTP через прокси сервер.
Код:
#include <FTPEx.au3>
#include <Array.au3>
#include <Crypt.au3>
$server = '10.0.1.111'
$username = ''
$pass = ''
$Dir = '/reg/intcrlinfo/'
$Open = _FTP_Open('ZIC')
if @error then
MsgBox(64,"Error","Ошибка подключения")
Exit
EndIf
$Conn = _FTP_Connect($Open, $server, $username, $pass,1)
if @error then
MsgBox(64,"Ошибка!","Не могу подключиться к FTP " & @error)
_FTP_Close($Open)
Exit
EndIf
;проверка актуальности CRL
if FileExists(@ScriptDir & '\4be.crl') Then
_FTP_FileGet($Conn,$Dir & '4be.crl', @ScriptDir & '\4be1.crl' )
_Crypt_Startup()
$hashLocal=_Crypt_HashFile(@ScriptDir & '\4be.crl',$CALG_MD5)
$hashRemote=_Crypt_HashFile(@ScriptDir & '\4be1.crl',$CALG_MD5)
_Crypt_Shutdown()
if $hashLocal=$hashRemote Then
_FTP_Close($Open)
Exit
Else
instCRL()
EndIf
Else
instCRL()
EndIf
;получение и установка CRL
Func instCRL()
_FTP_FileGet($Conn,$Dir & '4be.crl', @ScriptDir & '\4be.crl' )
If @error Then
_FTP_Close($Open)
Exit
EndIf
_FTP_Close($Open)
$comm = @SystemDir & '\rundll32.exe cryptext.dll,CryptExtAddCRL ' & @ScriptDir &'\4be.crl'
Run(@ComSpec & " /c " & $comm, "", @SW_HIDE)
WinWaitActive("Мастер импорта сертификатов")
Send("{ENTER}")
WinWaitActive("Мастер импорта сертификатов","Хранилище сертификатов")
Send("{ENTER}")
WinWaitActive("Мастер импорта сертификатов","Завершение мастера импорта сертификатов")
Send("{ENTER}")
EndFunc
Этот код работает в обход прокси. А если прописать прокси в
Код:
_FTP_Open
Есть какие предложения?