四、在VB.NET中使用,以vb.net为例,由于.net平台天生就具备创建与运行webservice优势,我们来创建一个工程,新建工程,取名bingTranslate,
菜单上工程》添加web服务引用,
在地址上输入http://api.microsofttranslator.com/V2/Soap.svc ,搜索,出来,给命名空间取名bingTranslator,点确定后
切换到Form1.vb的设计,添加2个文本框、2个语言代码下拉框和一个翻译按钮
切换到form1代码窗口,输入
Public Class Form1
Public Const AppID As String = "你的appid"
Public Client As New bingTranslator.LanguageServiceClient
Private Sub btnTranslate_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnTranslate.Click
Me.textbox2.Text = Client.Translate(AppID, Me.textbox1.ToString, lngFrom.SelectedValue, lngTo.SelectedValue, "text/plain", "general")
End Sub
End Class
附件
1.SoapToolkit30.rar
2.office2003webservicetoolkit2.rar
3.bingTransLate_VB6.rar
4.bingTransLate_asp.rar
5.bingTransLate_VBnet.rar