Использую : http://www.translate.ru/
Отследил запрос через Fiddler2 (скрины прилагаются)
и началась вторая часть и тут я поплыл (использовал библиотеку FoxTools)
ну и сам код:
Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click Using w As New FoxTools.Lib.Net.Web() 'MsgBox(TextBox1.Text.Replace(" ", "&20")) w.Method = FoxTools.Lib.Net.Enums.HttpMethod.POST w.Url = "http://www.translate.ru/services/TranslationService.asmx/GetTranslateNew" w.ResponseAutoEncoding = True Dim result As String = w.ExecuteString() End Using
Спасибо!