Re: VBScript: Использование в скрипте STARTTLS

null@example.com (Xameleon) — Tue, 22 Nov 2011 13:12:46 +0000

На сколько я понял это консольное приложение для работы по протоколу TLS. К сожалению (а может и к счастью ) не приходилось с ним работать, но предполагаю, что начать нужно с WshExec и выяснить поддерживает ли это приложение работу со стандартными потоками StdIn и StdOut. Т.к найти модуль этого приложения я сам не смог, то провести эксперимент соответственно тоже.

Предположительно копать нужно в аналогичном направлении.


Option Explicit
Dim WshShell, WshExec
Set WshShell = CreateObject("WScript.Shell")
Set WshExec = WshShell.Exec("cmd.exe")
WshExec.StdIn.WriteLine "ping 127.0.0.1"
WshExec.Terminate()
MsgBox ConvertCharset(WshExec.StdOut.ReadAll,"windows-1251","cp866")

Function ConvertCharset(text,srcCharset,destCharset)
	Dim stream
	Set stream = CreateObject("ADODB.Stream")
	stream.charset = srcCharset
	stream.type = 2
	stream.open
	stream.writeText text
	stream.position = 0
	stream.charset = destCharset
	ConvertCharset = stream.readText
End Function

VBScript: Использование в скрипте STARTTLS

null@example.com (nostro) — Mon, 21 Nov 2011 13:23:15 +0000

Кто-либо знает, как в VBScript`е использовать STARTTLS? А то на локальном почтовом сервере авторизация идет через 25й порт с использованием STARTTLS...

Серый форум — VBScript: Использование в скрипте STARTTLS

Re: VBScript: Использование в скрипте STARTTLS

VBScript: Использование в скрипте STARTTLS