表格批量导入金蝶专业版销售订单

项目需求

客户整理出一个excel表格，表格中有订单必需的几个字段。然后把表格批量到导入到金蝶的专业版订单中。

如图：

 

 

项目开发思路：用vba代码把这个原表中需要的字段提取出来。然后生成到新的一张excel表格中，订单需要的字段能固定的，都固定写在生成导入表格里，

不能固定的，用vba代码写一个窗体，菜单，让客户可以简单选择。

如图：

 

 项目开发过程及主要代码：

 

Private Sub UserForm_Initialize()

TextBox1.Text = Format(Date, "yyyy-m-d")

End Sub

Private Sub CommandButton1_Click()
Dim cn As New ADODB.Connection
Dim rs As New ADODB.Recordset
Dim strCn As String, strSQL As String '字符串变量
strCn = "Driver={sql server};" _
& "server