1、你程序那里用到了什么硬件设备了吗?你做什么操作的时候报错?
2、如果你发布一个空白的项目过去,执行是否有问题?
3、相对路径,这样写
Dim ip As New Importer ip.SourcePath = ProjectPath & "销售管理.mdb" '指定数据文件ip.SourceTableName = "订单" '指定要导入的表ip.NewTableName ="订单" '导入后的表名ip.Import()