DSOFRAMER内的EXCEL文档访问方法

最近要用DSOFRAMER做为一个客户端OFFICE访问工具,而且需要把EXCEL内的文件数据导出,总结了几个简单的方法,以备后用:)

 

[javascript] view plain copy

1. try {   
2.   
3. var obj;   
4. obj = new Object(oframe.ActiveDocument);//获得当前控件的文档对象   
5.   
6. if(obj !=null){   
7.   var xls;   
8.   var slt;   
9.            xls = obj.Application;   
10.   var xlsheet = xls.Worksheets(1);   
11.   alert(xls.ActiveCell.value);//当前cell的值   
12. //xls.Range("A1:D5").Select;//selected the gived rang   
13. slt = xls.selection;//get the selected area   
14. var rg = slt.Address(false, false);//get the rang such as a1:b5   
15. var aryReg = rg.split(":");//split the rangs   
16. //alert(slt.Address(rowAbsolute=true))   
17. //alert(xls.ActiveCell.row);   
18. //alert(xls.ActiveCell.column);   
19. //xlsheet.Range("A1:A1").value = "KKKK";   
20. var xr = xlsheet.Range(aryReg[0]);   
21. var beginRow = xr.row,beginColumn = xr.column;   
22. alert(beginRow + "," + beginColumn);   
23. xr = xlsheet.Range(aryReg[1]);   
24. var endRow = xr.row,endColumn = xr.column;   
25. alert(endRow + "," + endColumn);   
26. //alert(xlsheet.UsedRange.value);   
27. //alert(slt.Rows.Count);   
28. //alert(slt.Columns.Count);   
29. //xlsheet.Cells(1,1) = 123;   
30. //alert(xlsheet.Cells.Count);所有的cells count,is wrong   
31. //xlsheet.Range(xlsheet.Cells(1,1),xlsheet.Cells(1,7)).mergecells=true;   
32. //xlsheet.Range(xlsheet.Cells(1,1),xlsheet.Cells(1,7)).value="test";   
33. delete obj;   
34.   
35. }   
36.       
37.         
38.      } catch(e)  {   
39.      alert(e.description);   
40.      }