How to save an .xls file to .txt using lotusscript agents

HCL Domino Domino Forum
1

how to save an .xls file to .txt using lotusscript agents

2

Subject: how to save an .xls file to .txt using lotusscript agents

Dim oExcelConst xlText = -4158

Set oApp=CreateObject(“Excel.Application”)

oApp.Visible = True

oApp.DisplayAlerts = False

oApp.Workbooks.Open “C:\1.xls”

oApp.ActiveWorkbook.SaveAs “C:\1.txt”, xlText

oApp.Quit

Set oApp=Nothing