Here is a sample code to read excel data

OLEObject xlapp, xlsub
String    ls_filename = 'one.xls'
Long      ll_sheet, ll_max_rows, ll_max_columns, ll_start, ll_end

ll_start = 1
ll_end = 500      // To read 500 rows

// Create OLE 
xlApp = Create OLEObject

ll_ret = xlApp.ConnectToNewObject( "Excel.Application" )
If ll_ret < 0  then
    Return
End If

try
        // Open Excel file
	xlApp.Application.Workbooks.Open(ls_filename) 

        // Open Active sheet
        ll_sheet = 1
	xlsub = xlapp.Application.ActiveWorkbook.Worksheets[ll_sheet]
	ll_max_rows     = Xlsub.UsedRange.Rows.Count
	ll_max_columns = Xlsub.UsedRange.Columns.Count
	
	If ll_start = 1 Then ll_start = 2
	
	
	dw_1.SetReDraw(False)
	
	For ll_cnt = ll_start to ll_end
		ll_row = tab_1.tabpage_1.dw_1.InsertRow(0)
		ll_inc ++
		dw_1.SetItem(ll_row, 'field1', Mid(Trim(String(xlsub.cells[ll_cnt, 1].value)),1,20))
		dw_1.SetItem(ll_row, 'field2', Mid(Trim(String(xlsub.cells[ll_cnt, 2].value)),1,10))
		dw_1.SetItem(ll_row, 'field3', Mid(Trim(String(xlsub.cells[ll_cnt, 3].value)),1,3))
		Yield()
	Next
	dw_1.SetReDraw(True)

CATCH ( runtimeerror  lo_rte)
	MessageBox('Error', "MS Excel api runtime error")
FINALLY   
	 // Quit
	XlApp.Workbooks.close()
	xlapp.quit()
	xlapp.DisconnectObject()
	tab_1.tabpage_1.dw_1.SetReDraw(True)

	 Destroy xlsub
	 Destroy xlapp
	GarbageCollect()	 
END TRY

HTH

Happiness Always
BKR Sivaprakash

Hi Winnie;

  If the Excel spreadsheet is not complex, then I use Excel to export the data as (for example) as a .CSV file. Then I use the DW Control's ImportFile() command to import the CSV datum into the DWO's primary buffer.  HTH

Regards ... Chris