Edit C:\Users\Administrator\Desktop\Back\galaxie - Copy\activeX\edeal.jsp
<% /****************************************************************************** * Copyright (c) 2000-2004 e-Deal * * e-Deal S.A. * 55 rue Brillat Savarin * 75013 Paris * France * * T: +33 (0)1 53 80 80 30 * F: +33 (0)1 73 01 69 77 * http://www.e-deal.com * * La diffusion de ce code source sous quelque forme que ce soit sans * l'autorisation de E-DEAL est interdite. * * Vous êtes autorisés à modifier ce code source uniquement pour votre usage * propre et sous réserve que les mentions de copyright demeurent intactes. * * Ce code est fourni en l'état. Aucune garantie d'aucune sorte, explicite ou * implicite n'est donnée. En aucun cas E-DEAL ne pourra être tenu pour * responsable des dommages pouvant résulter de l'utilisation de ce code * source. * * ******************************************************************************/ %><%@page session="true" import="com.edeal.frontline.*,java.text.*,java.util.*"%> <%@taglib uri="http://www.e-deal.com/taglib/fl" prefix="fl"%> <% final org.apache.commons.logging.Log logger = org.apache.commons.logging.LogFactory.getLog(getClass()); String contextPath = (String) session.getAttribute("contextPath"); FlContext context = null; if (contextPath != null) { context = Frontline.getContext(contextPath); } else { context = Frontline.getContext(request.getContextPath()); } // recuperation des tableaux d'id , d'objets et d'id de document modele String idies = Utils.getRequestParameter(context, request, "idies"); String objects = Utils.getRequestParameter(context, request, "objects"); String documents= Utils.getRequestParameter(context, request, "documents"); ////val= "<a href=\\"javascript:doCallWord('0001cc0000007ef7', 'Enterprise', '', '0000000000068b02')\\">" Vector docs = Utils.explodeList(documents, ","); Vector objs = Utils.explodeList(objects, ","); Vector ids = Utils.explodeList(idies, ","); idies = documents = objects = ""; session.setAttribute("tmpDocID", Utils.getRequestParameter(context, request, "DocID")); for (int i = 0; i < objs.size(); i++) { String currObj = (String) objs.elementAt(i); String currID = (String) ids.elementAt(i); String currDoc = (String) docs.elementAt(i); idies += (i == 0 ? "" : ",") + "\"" + currID + "\""; documents += (i == 0 ? "" : ",") + "\"" + currDoc + "\""; objects += (i == 0 ? "" : ",") + "\"" + currObj + "\""; } String serverURL = request.getScheme() + "://" + request.getServerName(); %><html> <head> <title>Générateur de documents au format Microsoft Word 2000 VERSION 2.0</title> </head> <body bgcolor="#cccccc" leftmargin="0" topmargin="0"> <object id="MSXML4" classid="clsid:88D969C0-F192-11D4-A65F-0040963251E5" codebase="msxml4.cab#version=4,10,9127,0" type="application/x-oleobject" style="display: none"> </object> <object id="ValueReaderActiveX" classid="clsid:63A6FC2E-CF9F-11D5-8F76-0020AF72D2A8" codebase="edeal.CAB#version=1,2,0,5" width="100%" height="100%"> </object> <object id="DocParser" classid="clsid:63A6FC28-CF9F-11D5-8F76-0020AF72D2A8" codebase="edeal.CAB#version=1,2,0,5" style="display: none"> </object> <object id="XmlParser" classid="clsid:63A6FC2B-CF9F-11D5-8F76-0020AF72D2A8" codebase="edeal.CAB#version=1,2,0,5" style="display: none"> </object> <script language="vbscript"> '===========================DECLARATION============================= compteur = 0 mids = Array(<%= documents %>) oids = Array(<%= idies %>) types = Array(<%= objects %>) Sub ValueReaderActiveX_ready() ValueReaderActiveX.host = Left(window.location, InStr(8, window.location, "/")-1) + "<fl:webapp/>" '=====================TELECHARGEMENT DES MODELES==================== For index = Lbound(mids) to Ubound(mids) ValueReaderActiveX.objectType = types(index) ValueReaderActiveX.download(mids(index)) Next '================MISE EN MODE TRAITEMENT AUTOMATIQUE================ compteur = Ubound(oids) - Lbound(oids) + 1 If compteur = 1 Then ValueReaderActiveX.batchProcess = False Else ValueReaderActiveX.batchProcess = True End if '=====================DEMARRAGE DE L'ACTIVE X======================= For index = Lbound(oids) to Ubound(oids) ValueReaderActiveX.objectType = types(index) ValueReaderActiveX.mid = mids(index) ValueReaderActiveX.oid = oids(index) ValueReaderActiveX.Start If ValueReaderActiveX.bquit Then Exit For End If Next '=======================FIN DU TRAITEMENT=========================== ValueReaderActiveX.finTraitement End Sub Sub ValueReaderActiveX_quit() Window.Close() End Sub //--> </script> </body> </html> <% /****************************************************************************** * CVS Log File - This is no longer maintained! * * Revision 1.1 2004/07/23 18:20:14 brian * Initial Revision * *****************************************************************************/ %>
Ms-Dos/Windows
Unix
Write backup
jsp File Browser version 1.2 by
www.vonloesch.de