Example
The following example imports an Excel-formatted file into an fpSpread control in Microsoft Visual InterDev. The page provides a button that imports an existing file. The following code belongs in the button's event.
To access the file used in this sample, change the path in the code to the path for your product installation's \SAMPLES\FILES directory.
Visual
InterDev
dim listcount,handle
dim List()
dim sheet
fpSpread1.ScriptEnhanced=true
fpSpread1.IsExcelFile("C:\Samples\Files\quotes.XLS")
' returns number of sheets as ListCount
fpSpread1.ScriptGetExcelSheetList("C:\Samples\Files\quotes.XLS ", Null, listcount, "C:\Samples\Files\quotes.log", handle, true)
ReDim List(listcount)
' returns sheet names in List
fpSpread1.ScriptGetExcelSheetList("C:\Samples\Files\quotes.XLS", List, listcount, "C:\Samples\Files\quotes.log", handle, true)
sheet=List(0)
fpSpread1.ImportExcelSheet(cint(handle), sheet)