Originally Posted by
rajaputra
Hi,
''''Creation of Excel Sheet'''''''''''
Set Excel=createObject("Excel.Application")
Set ExcelSheet=createObject("Excel.sheet")
ExcelSheet.Application.visible=true
'''''storing the datas into excel sheet'''''''''''
Excel.ActiveSheet.cells(1,1).value="UserName"
Excel.ActiveSheet.cells(1,2).value="Password"
Excel.ActiveSheet.cells(2,1).value="arunsingh"
Excel.ActiveSheet.cells(2,2).value="rajaputra"
ExcelSheet.SaveAs "C:/text1.xls"
datatable.Import "C:/text1.xls"
'''''Reading the datas from excel sheet'''''''
msgbox "UserName is= "+datatable(1,1)
msgbox "PassWord is= "+datatable(2,1)
____________________
Arunsingh Rajaputra