Столкнувшись с проблемой при вызове веб-сервиса WCF (по протоколу HTTPS) из файла VBS

---

Я создал веб-сервис WCF с несколькими svc-файлами. Я вызываю метод в файле svc из vbscript, используя приведенный ниже код:


ScriptTimeOut = 6000000

Dim soapServer, soapMessage

soapServer = "https://www.emarketyard.in/marketyardwebservice/SchedulerClasses/MailIntimations.svc"

soapMessage = "&ЛТ;ы:описание конверта:с=" &амп; GetQuotedUrl("http://schemas.xmlsoap.org/soap/envelope/") &ампер; "и GT;" &амп; _
"<s:тело>" & _
"&ЛТ;AuctionWinnerSendMail префиксом xmlns=" &амп; GetQuotedUrl("http://tempuri.org/") &ампер; "и GT;" &амп; _
"" &усилитель; _
""

soapMessage = заменить(soapMessage, "'", chr(34))

Набор для xmlhttp = функция createobject("msxml2 описывается.Для serverxmlhttp")

xmlhttp.SetOption 2, xmlhttp.GetOption(2)
Dim lResolve,lConnect,lSend,lReceive
lResolve = 5 * 1000
lConnect = 60 * 1000
lSend = 600 * 1000
lReceive = 600 * 1000

xmlhttp.setTimeouts lResolve, lConnect, lSend, lReceive

xmlhttp.open "POST", soapServer, False
для xmlhttp.добавляет "человек", почта &ампер; ""&амп; soapServer &амп; с " HTTP/1.1"
xmlhttp.setRequestHeader "SOAPAction", "http://tempuri.org/IMailIntimations/AuctionWinnerSendMail"
xmlhttp.setRequestHeader "Content-Type", "text/xml; charset=utf-8"

для xmlhttp.отправить(soapMessage)

GetQuotedUrl функция(значение ключевого слова byval )
GetQuotedUrl = ЧР(34) &ампер; значение &амп; ЧР(34)
Конечная Функция



Приведенный выше скрипт выполняется правильно, когда https не включен. Но как только я включаю HTTPS, я получаю следующую ошибку при выполнении vbscript "Для завершения проверки подлинности клиента требуется сертификат".

Пожалуйста, кто-нибудь может мне помочь, как я могу решить эту проблему.
Заранее спасибо

Что я уже пробовал:

Мы включили атрибут httpsGetEnabled serviceMetadata в true, но все равно он дает ту же проблему.

---