** mztolo 2006
** membuat file xls dan mengisinya dg data, bisa berupa data statis atau dari table
** cek isi xls-nya setelah ter-create di "c:\dataku.xls"
LOCAL nama,alamat, hasil

nama="TOLO"
alamat="DEPOK"
hasil="c:\dataku.xls"

oxls=CREATEOBJECT("Excel.Application")
obuk=oxls.workbooks.add()

WITH oxls.activesheet
	.range("b1").value=nama
	.range("b2").value=alamat
	.range("b1:b2").interior.color=RGB(192,192,192)
ENDWITH

obuk.saveas(hasil)
oxls.quit()
RELEASE oxls