这个imports,提示有错误。
阿里云的代码,下一步我该怎么用呢?谢谢!
Imports System
Imports System.Collections.Generic
Imports Aliyun.Acs.Core
Imports Aliyun.Acs.Core.Profile
Imports Aliyun.Acs.Core.Exceptions
Imports Aliyun.Acs.Core.Http
Imports Aliyun.Acs.Core.Auth
Namespace CommonRequestDemo
Class Program
Private Shared Sub Main(ByVal args As String())
Dim provider As AlibabaCloudCredentialsProvider = New AccessKeyCredentialProvider("<your-access-key-id>", "<your-access-key-secret>")
Dim profile As IClientProfile = DefaultProfile.GetProfile("cn-hangzhou")
Dim client As DefaultAcsClient = New DefaultAcsClient(profile, provider)
Dim request As CommonRequest = New CommonRequest()
request.Method = MethodType.POST
request.Domain = "nlp.cn-hangzhou.aliyuncs.com"
request.Version = "2018-04-08"
request.UriPattern = "/nlp/api/kwe/{Domain}"
request.AddHeadParameters("Content-Type", "application/json")
Dim requestBody As String = "" & "{}"
request.SetContent(System.Text.Encoding.[Default].GetBytes(requestBody), "utf-8", FormatType.JSON)
Try
Dim response As CommonResponse = client.GetCommonResponse(request)
Console.WriteLine(response.Data)
Catch e As ServerException
Console.WriteLine(e)
Catch e As ClientException
Console.WriteLine(e)
End Try
End Sub
End Class
End Namespace