Dim dlg As New OpenFileDialog '定义一个新的OpenFileDialog
dlg.Filter = "Excel文件|*.xls;*.xlsx"
If dlg.ShowDialog = DialogResult.Ok Then '如果用户单击了确定按钮
Dim mg As New Merger
mg.SourcePath = dlg.FileName
mg.Format = "excel" '指定格式
mg.SourceTableName = "sheet0$"
mg.DataTableName = "订单临时表"
mg.FieldMaps.Add("收件人电话/手机","收件人电话")
mg.FieldMaps.Add("收件人姓名*","收件人姓名")
MessageBox.Show(1)
mg.Merge()
MessageBox.Show(2)
End If
====================================================
用以上的代码导入excel；出现 从字符串“”到类型“Date”的转换无效。
“1”显示是正常的；
mg.Merge() 执行这个的时候出现这个问题，
请问老师，这个该怎么办?
加好友 
发短信
Post By：2019/2/20 14:23:00 [只看该作者]
