ntko execl操作[通俗易懂]

<OBJECT id=TANGER_OCX codeBase=”http://www.ntko.com/control/officecontrol/OfficeControl.cab#Version=5.0.2.5″ classid=clsid:A39F1330-3322-4a1d-9BF0-0BA2BB90E970 width=”100%” height=”100%”><PARAM NAME=”_ExtentX” VALUE=”19923″><PARAM NAME=”_ExtentY” VALUE=”12700″><PARAM NAME=”BorderColor” VALUE=”14402205″><PARAM NAME=”BackColor” VALUE=”-2147483643″><PARAM NAME=”ForeColor” VALUE=”-2147483640″><PARAM NAME=”TitlebarColor” VALUE=”42768″><PARAM NAME=”TitlebarTextColor” VALUE=”0″><PARAM NAME=”BorderStyle” VALUE=”1″><PARAM NAME=”Titlebar” VALUE=”0″><PARAM NAME=”Toolbars” VALUE=”0″><PARAM NAME=”Caption” VALUE=”欢迎使用！”><PARAM NAME=”IsShowToolMenu” VALUE=”1″><PARAM NAME=”IsNoCopy” VALUE=”0″><PARAM NAME=”IsHiddenOpenURL” VALUE=”0″><PARAM NAME=”MaxUploadSize” VALUE=”0″><PARAM NAME=”NetworkBufferSize” VALUE=”0″><PARAM NAME=”Menubar” VALUE=”1″><PARAM NAME=”Statusbar” VALUE=”1″><PARAM NAME=”FileNew” VALUE=”-1″><PARAM NAME=”FileOpen” VALUE=”-1″><PARAM NAME=”FileClose” VALUE=”-1″><PARAM NAME=”FileSave” VALUE=”-1″><PARAM NAME=”FileSaveAs” VALUE=”-1″><PARAM NAME=”FilePrint” VALUE=”-1″><PARAM NAME=”FilePrintPreview” VALUE=”-1″><PARAM NAME=”FilePageSetup” VALUE=”-1″><PARAM NAME=”FileProperties” VALUE=”-1″><PARAM NAME=”IsStrictNoCopy” VALUE=”0″><PARAM NAME=”IsUseUTF8URL” VALUE=”1″><PARAM NAME=”MenubarColor” VALUE=”14402205″><PARAM NAME=”IsUseControlAgent” VALUE=”0″><PARAM NAME=”IsUseUTF8Data” VALUE=”0″><PARAM NAME=”IsSaveDocExtention” VALUE=”0″><PARAM NAME=”IsDirectConnect” VALUE=”0″><PARAM NAME=”SignCursorType” VALUE=”0″><PARAM NAME=”IsResetToolbarsOnOpen” VALUE=”0″><PARAM NAME=”IsSaveDataIfHasVDS” VALUE=”0″><PARAM NAME=”MenuButtonStyle” VALUE=”7″><PARAM NAME=”MenuButtonColor” VALUE=”16180947″><PARAM NAME=”MenuButtonFrameColor” VALUE=”14924434″><PARAM NAME=”MenuBarStyle” VALUE=”3″><PARAM NAME=”IsGetPicOnlyOnHandSign” VALUE=”0″><PARAM NAME=”IsSecurityOptionsOpen” VALUE=”0″><PARAM NAME=”IsShowHelpMenu” VALUE=”0″><PARAM NAME=”IsShowInsertMenu” VALUE=”1″><PARAM NAME=”IsAutoDetectWebCharSet” VALUE=”0″><PARAM NAME=”WebCodePage” VALUE=”936″><PARAM NAME=”IsShowEditMenu” VALUE=”1″><PARAM NAME=”IsShowFileErrorMsg” VALUE=”1″><PARAM NAME=”IsShowNetErrorMsg” VALUE=”1″><PARAM NAME=”ReceiveDataTimeOut” VALUE=”180″><PARAM NAME=”ConnectServerTimeOut” VALUE=”180″><PARAM NAME=”IsRemoveMacrosOnSave” VALUE=”1″><PARAM NAME=”IsForceCheckSecSignCertCRLOnline” VALUE=”0″><PARAM NAME=”IsAutoLockOnSecSign” VALUE=”0″><PARAM NAME=”IsAllowAddSignOnLockedDoc” VALUE=”0″><PARAM NAME=”DefaultOpenDocType” VALUE=”0″><PARAM NAME=”IsShowFullScreenButton” VALUE=”-1″><PARAM NAME=”IsEnableDoubleClickFSM” VALUE=”-1″><PARAM NAME=”IsExcelAutoCalIncludeHidden” VALUE=”0″><PARAM NAME=”MaxNetworkBufferSize” VALUE=”8388608″><PARAM NAME=”IsEnableWordConverters” VALUE=”0″><PARAM NAME=”IsSave2007InnerFmt” VALUE=”0″><PARAM NAME=”EkeyType” VALUE=”1″><PARAM NAME=”CustomToolBar” VALUE=”0″><PARAM NAME=”IsOptForOpenSpeed” VALUE=”0″><PARAM NAME=”IsAllowEkeyOnlySignDemo” VALUE=”0″><PARAM NAME=”OptMSDocApp” VALUE=”0″><PARAM NAME=”IsUserDDE” VALUE=”0″><PARAM NAME=”IsEnableOtherPdfViewer” VALUE=”1″><PARAM NAME=”IsCheckEkey” VALUE=”0″><PARAM NAME=”MenuButtonDefaultColor” VALUE=”0″><PARAM NAME=”IsDebugNoDelfile” VALUE=”0″><PARAM NAME=”IsDebugLogDelfile” VALUE=”0″><PARAM NAME=”IsShowDocStatusInfo” VALUE=”1″><PARAM NAME=”IsFastSaveHandSign2″ VALUE=”0″><PARAM NAME=”IsSetShowFieldsValue” VALUE=”0″><PARAM NAME=”IsSetIEUploadFileContainLocalDir” VALUE=”1″><PARAM NAME=”IsSetSvrSignBelowText” VALUE=”0″><PARAM NAME=”IsUseOfficeConvertDocToPDF” VALUE=”0″><PARAM NAME=”MultiSecSignMarginSize” VALUE=”5″><PARAM NAME=”UseSignPartProtectDoc” VALUE=”0″><PARAM NAME=”SetMultiSecSignPosition” VALUE=”-1″><PARAM NAME=”IsAddRandomOffsetForMultiSecSign” VALUE=”0″></OBJECT>

function setObject(myParam)

{

        var TANGER_OCX_OBJ = document.all(“TANGER_OCX”);  

        TANGER_OCX_OBJ.CreateNew(“Excel.Sheet”);//创建Sheet   

        TANGER_OCX_OBJ.SetSheetName(1, “NeededList”);//修改SheetName   

        TANGER_OCX_OBJ.ActiveDocument.Sheets(1).Range(“A1”).ColumnWidth=50/8;

        TANGER_OCX_OBJ.ActiveDocument.Sheets(1).Range(“B1”).ColumnWidth=130/8;

        TANGER_OCX_OBJ.ActiveDocument.Sheets(1).Range(“C1”).ColumnWidth=200/8;

        TANGER_OCX_OBJ.ActiveDocument.Sheets(1).Range(“D1”).ColumnWidth=100/8;

        TANGER_OCX_OBJ.ActiveDocument.Sheets(1).Range(“E1”).ColumnWidth=100/8;

        TANGER_OCX_OBJ.ActiveDocument.Sheets(1).Range(“F1”).ColumnWidth=430/8; 

        TANGER_OCX_OBJ.ActiveDocument.Sheets(1).PageSetup.Orientation = 2;//默认横向打印

        

              var sSQL=”select * from PR_PM_NeededList where PR_PM_NeededListUID='”+myParam+”‘ “;       

              var jsonData = CXJLib.Runtime.Engine.RunSQLGetDataSet(sSQL);  

              if(jsonData != null && jsonData.length>0) 

              {  

                     TANGER_OCX_OBJ.ActiveDocument.Sheets(1).Range(“A1:F2”).Font.Bold = true;//加粗 1行和2行都执行此样式    

                     TANGER_OCX_OBJ.ActiveDocument.Sheets(1).Range(“A1:F2”).HorizontalAlignment = -4108;//水平居中 1行和2行都执行此样式    

                     TANGER_OCX_OBJ.ActiveDocument.Sheets(1).Range(“A1:F2”).Borders.LineStyle = 1;//边框 1行和2行都执行此样式    

                     TANGER_OCX_OBJ.ActiveDocument.Sheets(1).Range(“A1:F1”).MergeCells = true;//合并    

                     TANGER_OCX_OBJ.ActiveDocument.Sheets(1).Range(“A1:F1”).Font.Size = 16;//字号    

                     TANGER_OCX_OBJ.ActiveDocument.Sheets(1).Range(“A1”).Value = “NAMIBIAN POLICE”;//设置内容    

                     TANGER_OCX_OBJ.ActiveDocument.Sheets(1).Range(“A2:F2”).MergeCells = true;    

                     TANGER_OCX_OBJ.ActiveDocument.Sheets(1).Range(“A2”).Value = “Needed List”;    

                     TANGER_OCX_OBJ.ActiveDocument.Sheets(1).Range(“A2:F2”).Font.Size = 14;//字号    

                     TANGER_OCX_OBJ.ActiveDocument.Sheets(1).Range(“A3:C3”).MergeCells = true;  

                     TANGER_OCX_OBJ.ActiveDocument.Sheets(1).Range(“A3”).Value = “NEEDED NO:”+decodeURIComponent(jsonData[0].NeededNo);  

                     TANGER_OCX_OBJ.ActiveDocument.Sheets(1).Range(“A4:C4”).MergeCells = true;  

                     TANGER_OCX_OBJ.ActiveDocument.Sheets(1).Range(“A4”).Value = “DEPOT:”+decodeURIComponent(jsonData[0].Depot);  

                     TANGER_OCX_OBJ.ActiveDocument.Sheets(1).Range(“D3:F3”).MergeCells = true;  

                     TANGER_OCX_OBJ.ActiveDocument.Sheets(1).Range(“D3”).Value = “REQUEST DATE:”+decodeURIComponent(jsonData[0].ReqDate);  

                     TANGER_OCX_OBJ.ActiveDocument.Sheets(1).Range(“D4:F4”).MergeCells = true;  

                     TANGER_OCX_OBJ.ActiveDocument.Sheets(1).Range(“D4”).Value = “STORE:”+decodeURIComponent(jsonData[0].Store);  

                     TANGER_OCX_OBJ.ActiveDocument.Sheets(1).Range(“A5:F5”).MergeCells = true;  

                     TANGER_OCX_OBJ.ActiveDocument.Sheets(1).Range(“A5”).Value = “DESCRIPTION:”+decodeURIComponent(jsonData[0].Description);         

                      

                     sSQL=”select * from PR_PM_NeededListDetail where PR_PM_NeededListUID='”+myParam+”‘ “;       

                     jsonData = CXJLib.Runtime.Engine.RunSQLGetDataSet(sSQL);   

                     if(jsonData != null && jsonData.length>0)  

                     { 

                           TANGER_OCX_OBJ.ActiveDocument.Sheets(1).Range(“A6:F6”).HorizontalAlignment = -4108;//水平居中 1行和2行都执行此样式   

                           TANGER_OCX_OBJ.ActiveDocument.Sheets(1).Range(“A6”).Value = “LINE NO.”;   

                           TANGER_OCX_OBJ.ActiveDocument.Sheets(1).Range(“B6”).Value = “ICN”;   

                           TANGER_OCX_OBJ.ActiveDocument.Sheets(1).Range(“C6”).Value = “ITEM Description”;   

                           TANGER_OCX_OBJ.ActiveDocument.Sheets(1).Range(“D6”).Value = “DOQ”;   

                           TANGER_OCX_OBJ.ActiveDocument.Sheets(1).Range(“E6”).Value = “QTY”;   

                           TANGER_OCX_OBJ.ActiveDocument.Sheets(1).Range(“F6”).Value = “Description”; 

                           var sumrow=6+jsonData.length; 

                           var rownum = 7; 

                           for(i=0;i<jsonData.length;i++){ 

                                  rownum+=i; 

                                  TANGER_OCX_OBJ.ActiveDocument.Sheets(1).Range(“A”+rownum).Value = decodeURIComponent(jsonData[i].Child_Index);    

                                  TANGER_OCX_OBJ.ActiveDocument.Sheets(1).Range(“B”+rownum).Value = decodeURIComponent(jsonData[i].MaterialNo);    

                                  TANGER_OCX_OBJ.ActiveDocument.Sheets(1).Range(“C”+rownum).Value = decodeURIComponent(jsonData[i].MaterialDesc);    

                                  TANGER_OCX_OBJ.ActiveDocument.Sheets(1).Range(“D”+rownum).Value = decodeURIComponent(jsonData[i].MaterialDOQ);    

                                  TANGER_OCX_OBJ.ActiveDocument.Sheets(1).Range(“E”+rownum).Value = decodeURIComponent(jsonData[i].MaterialQty);    

                                  TANGER_OCX_OBJ.ActiveDocument.Sheets(1).Range(“F”+rownum).Value = decodeURIComponent(jsonData[i].Description); 

                           } 

                           TANGER_OCX_OBJ.ActiveDocument.Sheets(1).Range(“A6:F”+sumrow).Borders.LineStyle = 1;//边框 1行和2行都执行此样式   

                           TANGER_OCX_OBJ.ActiveDocument.Sheets(1).Range(“A7:F”+sumrow).WrapText=true;

                     } 

              } 

             else 

             { 

                    TANGER_OCX_OBJ.ActiveDocument.Sheets(1).Range(“A1”).Value = “No Data”;    

             }

             TANGER_OCX_OBJ.ActiveDocument.Sheets(1).Application.Quit();

}