Imports System
Imports System.Collections.Generic
Imports System.Net
Imports System.Xml
Imports Newtonsoft.Json
Namespace EC_OpenApi_Service
Public Class EC_OpenApi_ServiceExample
Private Shared _ebDomain As String = "http://kaifa-eb.ez-wms.com"
Private Shared _wmsDomain As String = "http://kaifa.ez-wms.com"
Private Shared _userName As String = "admin"
Private Shared _userPass As String = "eccang123456"
Private Shared ReadOnly Property _userebName As String
Get
Return "admin"
End Get
End Property
Private Shared ReadOnly Property _userebPass As String
Get
Return "123456"
End Get
End Property
Private Shared ReadOnly Property _userwmsName As String
Get
Return "admin"
End Get
End Property
Private Shared ReadOnly Property _userwmsPass As String
Get
Return "eccang123456"
End Get
End Property
Public Shared Sub Main(ByVal args As String())
Console.WriteLine("测试获取仓库Json")
Dim result As String = GetWarehouses()
Console.WriteLine(result)
Console.ReadKey()
Console.WriteLine("测试获取订单列表Json")
Dim orderListRequest As OrderListRequest = New OrderListRequest() With {
.condition = New OrderListConditionStruct() With {
.saleOrderCodes = New List(Of String)() From {
"302173175674-1364094976020"
}
}
}
result = GetOrderList(orderListRequest)
Console.WriteLine(result)
Console.ReadKey()
End Sub
这样吗，他说我imports未声明
加好友 
发短信
Post By：2021/8/26 10:19:00 [显示全部帖子]
此主题相关图片如下：3.png
