Error Message #3600 关注

I'm have BarTender 9.3 SR2, I am printing a label using VB Script to an Excel file. In BarTender all the data is on the label with no errors, When I try to print I get this:

BarTender Error Message #3600

No Data Sources Are Set To Read From File

To enable the reading of data for an object from a file, see the Data Source dialog box.

Here is the code for the PDF417 barcode, this is where I'm having the problem:

______________________________________________________________________________________________________________________________

dim objConn

dim strConn

dim rs

On Error Resume Next

strConn = "Provider=Microsoft.Ace.OLEDB.12.0;Data Source='C:\Users\Admin\Documents\2DTest.xls';Extended Properties=""Excel 12.0 Xml;HDR=YES;""

Dim strNames

Set objConn = CreateObject("ADODB.Connection")

objConn.Open strConn

Set rs = CreateObject("ADODB.Recordset")

Set rs = objConn.Execute("Select * FROM [Sheet1$]")

strNames = ""

rs.MoveFirst()

for i = 1 to 64

       strNames = strNames + CStr(rs.fields("IMEI")) + vbCrLf

       rs.MoveNext()

next

strNames = LEFT(strNames,(LEN(strNames)-2))

value = strNames

___________________________________________________________________________________________

I use this in Windows 7 and have no problem, but this is in Windows 10. All the data shows up on the BarTender label including all of the PDF417 values but it gives me the error when I try to print.