Récupéré évènements

Djodu5454 Messages postés 13 Date d'inscription dimanche 10 décembre 2000 Statut Membre Dernière intervention 11 juin 2008 - 6 juin 2008 à 11:16
Djodu5454 Messages postés 13 Date d'inscription dimanche 10 décembre 2000 Statut Membre Dernière intervention 11 juin 2008 - 10 juin 2008 à 08:55
Bonjour à tous !
J'aimerais qu'on m'éclaire sur une chose, j'aimerais, pendant l'éxécution d'un script ( convertion de pdf en image et redimentionnement de l'image) qui prend beaucoup de temps afficher à chaque fin de boucle le message "Objet créer" ou quelque chose du genre quand l'évenement de conversion et de redimentionnement ce fait (également la lecture si possible) car pour l'instant je n'ai réussi qu'a afficher un message durant l'éxécution complète du script et un message de fin pour dire que le script est fini et mes response.write "convertion de l'image n°"&i, s'affiche tout en bloque à la fin du script :/
Voici mon scipt pour mieu comprendre :

<!-- *************************************************************************************************************** -->
<!-- *       PARTIE HTML         * -->
<!-- *************************************************************************************************************** -->


<html>
 <head>
  <title>
   **\Transforme les 6 premières pages d'un fichier PDF en images et les redimentionnent/**
  </title>
 </head>
  <!--Fond noir et texte vert-->


 
</html>


<!-- *************************************************************************************************************** -->
<!-- *         BALISE DIV POUR MESSAGES DURANT EXECUTION DU SCRIPT      * -->
<!-- *************************************************************************************************************** -->



<!--centrer-->
   ----

    <table height=100% width=100% cellpadding=1 cellspacing=0>
  ----
 
   ,
    
     Veuillez patienter, chargement en cours...

     - Ne pas interrompre, le script copie les fichiers -
    
   </td>
  
 

   </td>
  </tr>
 </table>



   ----

    <table height=100% width=100% cellpadding=1 cellspacing=0>
  ----

   ,
    
     Script terminé.
    
   </td>
  
 

   </td>
  </tr>
 </table>


<!-- *************************************************************************************************************** -->
<!-- *    SCRIPT D'EXECUTION : OUVERTURE DU PDF CREATION DE L'IMAGE A UNE TAILLE ELEVEE      * -->
<!-- *************************************************************************************************************** -->


<%
' Puisque ça va être long, on se donne une heure :
Server.ScriptTimeout = 3600
' Pour afficher ce qu'on a déjà chargé :
response.flush


<!-- ************************************************************** -->
<!-- *     1.1 Convertir toutes les pages du pdf    * -->
<!-- ************************************************************** -->


    Call doMain() 
    sub doMain()


 sPdfFile = "c:\\sample.pdf"                   'Source du document PDF
 sOutDir = "c:\\demo1"                         'Repertoire de sortie
    
        Set AxPdf2Image = Server.CreateObject("Pdf2ImageCOM.pdf2image")             'Create com object.


 'Ouvre le fichier pdf et crée un convertisseur.
 'Aprés que l'ouverture est réussi, cela crée un convertisseur et retourne le handle du convertisseur.
 nHandle = AxPdf2Image.apOpen(sPdfFile,"","")


<!-- ************************************************************** -->
<!-- *        1.2 Vérification d'ouverture     * -->
<!-- ************************************************************** -->
        Select Case nHandle
         Case ERR_FILE_UNEXIST
           Response.write "Open '"+sPdfFile+"' failure - Source du pdf file inexistante !
"
          exit sub
          Case ERR_FILE_DAMAGED
               Response.write "Open '"+sPdfFile+"' failure - Source du fichier pdf endommager !
"
                  exit sub
         Case ERR_FILE_RESTRICTED
                 Response.write "Open '"+sPdfFile+"' failure - Source du fichier pdf restricted!
"
                exit sub
        End Select
  Response.write "Source du fichier PDF: ["+sPdfFile+"]
"
  Response.write "Repertoire de sortie: ["+sOutDir+"]
"
    
<!-- ************************************************************** -->
<!-- *           1.3 Propriétés     * -->
<!-- ************************************************************** -->
        AxPdf2Image.sOutDirectory = sOutDir          'repertoire de sortie
        AxPdf2Image.iImageType = AP_IMAGE_JPG        'type d'image
        AxPdf2Image.iXDPI = 500                      'horizontal (en dpi)
        AxPdf2Image.iYDPI = 500                      'vertical (en dpi)
        'Pour compter le nombre de pages
        iPageCount = AxPdf2Image.apGetPageCount(nHandle)
        Response.write "Nombre de page: [6]
"
       
<!-- ************************************************************** -->
<!-- *     1.4 Boucle de conversion de fichier    * -->
<!-- ************************************************************** -->
 For iPageNo = 1 to 6 'Le site présente que les 6 première pages.
  Response.write "&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Conversion de la page "+cstr(iPageNo)+"......
"
  AxPdf2Image.apConvertPage nHandle,iPageNo
 Next
       
 'Ferme le fichier pdf et detruit le convertisseur.
 AxPdf2Image.apClose nHandle
    end sub


<!-- ************************************************************** -->
<!-- *    1.5 Changement du display des deux divs          * -->
<!-- ************************************************************** -->


response.write "<script>"
' On cache "plsWait"
response.write "document.all["&chr(34)&"plsWait"&chr(34)&"].style.display = "&chr(34)&"none"&chr(34)&";"
' On montre "isFinished"
response.write "document.all["&chr(34)&"isFinished"&chr(34)&"].style.display = "&chr(34)&chr(34)&";"
response.write "</script>"
%>


<!-- *************************************************************************************************************** -->
<!-- *          SCRIPT D'EXECUTION : OUVERTURE ET REDIMENTIONNEMENT DE L'IMAGE EN 400 PX     * -->
<!-- *************************************************************************************************************** -->


<%
<!-- ************************************************************** -->
<!-- *       1.1 Définition du type d'image           * -->
<!-- ************************************************************** -->


 


  Const AP_IMAGE_BMP  = 1 'BMP
  Const AP_IMAGE_EMF  = 2 'EMF
  Const AP_IMAGE_WMF  = 3 'WMF
  Const AP_IMAGE_JPG  = 4 'JPG
  Const AP_IMAGE_PNG  = 5 'PNG
  Const AP_IMAGE_GIF  = 6 'GIF
  Const AP_IMAGE_TIF  = 7 'TIF
  Const AP_IMAGE_PCX  = 8 'PCX
  Const AP_IMAGE_JPEG = 4 'JPEG
  Const AP_IMAGE_TIFF = 7 'TIFF
 


<!-- ************************************************************** -->
<!-- *        1.2 Repère de définition d'un fichier TIFF   * -->
<!-- ************************************************************** --> 
 


  Const AP_TIFF_COMPRESSION_NONE     = 0   'Pas de compression.
  Const AP_TIFF_COMPRESSION_LZW      = 1    '1, 4, 8, 24 bits (Par default 4, 8, 24bits)
  Const AP_TIFF_COMPRESSION_JPEG     = 2    'Grayscale 8bits, 24bits
  Const AP_TIFF_COMPRESSION_PACKBITS = 3    '4, 8, 24bits
  Const AP_TIFF_COMPRESSION_CCITTG4  = 4    '1 bit (Par default)
  Const AP_TIFF_COMPRESSION_CCITTG3  = 5    '1 bit
  Const AP_TIFF_COMPRESSION_RLE      = 6    '1 bit
 
<!-- ************************************************************** -->
<!-- *            1.3 Retourne la définition du code           * -->
<!-- ************************************************************** -->


  Const RTN_OK = 1             'Opération réussite.
  Const ERR_UNKNOWN = -99      'Erreur système inconnue.


  Const ERR_FILE_UNEXIST    = -2      'Source du PDF inexistante.
  Const ERR_FILE_DAMAGED    = -3      'Source du PDF endommager.
  Const ERR_FILE_RESTRICTED = -4      'Source du PDF restricted.




<!-- ************************************************************** -->
<!-- *       1.4 Déclaration des variables                * -->
<!-- ************************************************************** -->




dim i, image, coefficient, n, os
dim value


<!-- ************************************************************** -->
<!-- * 1.5 Boucle de création d'ouverture et de redimensionnement * -->
<!-- ************************************************************** -->


For i = 1 to 6
 response.write "
"
 Set Image = Server.CreateObject("AspImage.Image")
 os = ""
 os = "c:\demo1\sample0000"+CStr(i)+".jpg"
 If Image.LoadImage (os) Then
  Response.write "&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Image n°"
  Response.write i
  Response.write " chargée..
"
  'Calcul du coefficient et redimensionnement de l&#8217;image
  If Image.MaxX > 400 Then
   Coefficient=400/Image.MaxX
   W=int(Image.MaxX*Coefficient)
   H=int(Image.MaxY*Coefficient)
   Image.ResizeR W,H
   Response.write "&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Et redimensionnée.."
  End If
 else
  Response.Write "Echec du chargement de l'image n°"&i
 End If


<!-- ************************************************************** -->
<!-- *1.6 Définition du nom de l'emplacement de la nouvelle image * -->
<!-- ************************************************************** -->


Image.FileName = "c:\demo1\sample0000"+CStr(i)+"redimentionne.jpg"
Image.SaveImage
Next
%>

Merci de votre aide si on peut m'éclairé

Qui ne tente à rien n'a rien !

1 réponse

Djodu5454 Messages postés 13 Date d'inscription dimanche 10 décembre 2000 Statut Membre Dernière intervention 11 juin 2008
10 juin 2008 à 08:55
UP !
Bonjour à tous, j'ai tenté de créer une page html contenant du javascript qui appele mon script ASP via AJAX qui envoie un crée une image par page du PDF tant que y a pas de reponse et j'envoie via AJAX un autre script qui test la presence d'un fichier de fait, une fois que mon script AJAX qui teste l'avancement vois que le dernier fichier est fini je lance une fonction JS qui affiche que c'est fini à chaque fois. Pensée vous que cela est une bonne idée ou non ?

Qui ne tente à rien n'a rien !
0
Rejoignez-nous