function AutomateExcel(tablename) //function out to excel
{
var outtable=document.getElementById(tablename);
var oXL = new ActiveXObject("Excel.Application");
var oWB = oXL.Workbooks.Add();
var oSheet = oWB.ActiveSheet;
var hang = outtable.rows.length;
alert(hang);
var lie = outtable.rows.items(0).cells.length;
alert(lie);
for(var i=0;i<hang;i++)
{
for(var j=0;j<lie;j++)
{
oSheet.Cells(i+1,j+1).value = outtable.rows(i).cells(j).innerText;
}
}
oXL.Visible = true;
oXL.UserControl = true;
}