Я создаю приложение в VBSCRIPT
требование моего приложения состоит в том, чтобы отфильтровать данные, сохраненные в файле Excel, и получить общее количество записей и сумму определенного столбца. Файл Excel, который я беру в качестве входных данных, программно генерируется другим скриптом.
но когда я запускаю свой скрипт, я получаю сообщение об ошибке
" [Microsoft][ODBC Excel Driver] Data type mismatch in criteria expression.
Line (35): "objAdRs.Open strSQLStatement, objAdCon, 1, 3". "
требование моего приложения состоит в том, что оно должно быть достаточно устойчивым, чтобы принимать входные данные из Excel, написанные в любом формате или версии.
я использовал следующую инструкцию драйвера.
Set objAdCon = CreateObject("ADODB.Connection")
objAdCon.Open "DRIVER={Microsoft Excel Driver (*.xls)};DBQ="&strFileName & ";Readonly=True"
и обрабатывать набор записей по этим строкам
Set objAdRs = CreateObject("ADODB.Recordset")
objAdRs.CursorLocation=3
objAdRs.Open strSQLStatement, objAdCon, 1, 3
все работает нормально, если я сначала сохраняю файл на моем компьютере ..
и приложение, которое создает файл, использует инструкцию foll для программного сохранения и создания книги.
сохранить:
objExcelMain.ActiveWorkbook.Save
создать:
set objOutputWorkbook = objOutputExcel.WorkBooks.Add
set objOutputWorksheets = objOutputWorkbook.WorkSheets