This code will convert an Excel file to tab delimited format, using the Excel object model (which will require Excel to be installed where this code is run!).
Dim lobjExcel As Object ' Instance Of The Excel Application Object
Dim lobjWorkBook As Object 'Instance For WorkBook Collection
Set lobjExcel = server.CreateObject("Excel.Application")
Set lobjWorkBook = lobjExcel.Workbooks.Open(Filename with the path)
lobjExcel.DisplayAlerts = False
'Saving In The Tab Delimited Format
lobjWorkBook.SaveAs lstrFilePath, -4158
lobjWorkBook.Close
Set lobjWorkBook = Nothing
'DesTroying The Excel Object
lobjExcel.Quit
lobjExcel = Nothing
Comments