problèmes avec /iisHelp/common/500-100.asp, line 11

Question

bonjour,

je suis nouveau venu sur ce forum ou j'espere trouver de l'aide.

Voila, je me suis mis a l'ASP depuis hier, je suis en stage et je dois refaire des scripts php (qui marchaient...) en ASP. Enfin bon j'arrete de raconter ma vie !

Voila mon probl&#232;me : je veux copier des fichiers contenu dans un repertoire "prospectXX" dans un repertoire "clientXX".

Pour cela, je cr&#233;er d'abord mon fichier clientXX puis je liste tous les fichiers de prospectXX et au fur et a mesure, je les copies et les supprimes mais ca marche pas et l&#224; c fait 4h que je galere sur la meme connerie..

Voici mon code :
####################################################
//on recup&#232;re le nom du prospect
    n=Request.QueryString("nom")


    //#####################################//
                //    Creation du repertoire client    //     
    //#####################################//
    //on donne le chemin du repertoire CLIENTS
    dirClient="D:\Stage\CRM\exploitation\CLIENTS"


    //on creer le repertoire au nom du client
    Set FSO =Server.CreateObject("Scripting.FileSystemObject")
    FSO.CreateFolder(dirClient & "" & n)



    //#####################################//
                                // Copies des fichiers        //    
    //#####################################//
    //on donne le chemin du repertoire PROSPECTS
     dirProspect ="D:\Stage\CRM\exploitation\PROSPECTS"


    //on selection les fichiers du client dans son repertoire PROSPECTS
    //et on les copies dans son repertoire CLIENTS
    //Cr&#233;ation de l'objet avec le dossier de base
    Dim dir = new DirectoryInfo(dirProspect);
     foreach(FileInfo file in dir.GetFiles())
      {
       filePt.Copy dir & file
       file.Delete()
      }

###############################################################

Et voici l'erreur g&#233;n&#233;r&#233;e

###############################################
Erreur de compilation Microsoft VBScript error '800a0401' 


Fin d'instruction attendue 
/iisHelp/common/500-100.asp, line 11 Dim objASPError, blnErrorWritten, strServername, strServerIP, strRemoteIP Dim strMethod, lngPos, datNow, strQueryString, strURL
--------------------------------------------------------------------------^


Erreur de compilation Microsoft VBScript error '800a0401' 
Fin d'instruction attendue 
/exploitation/transfert.asp, line 26 Dim dir = new DirectoryInfo(dirProspect);
--------^
##############################################
 Si quelqu'un peu m'aider, ca serait vraiement cool, et ca me remotiverait pour faire de l'asp!!

D'avance Merci

cordialement

seb

cs_Nurgle · Answer

Salut

essaye plut&#244;t :

Set dir = New DirectoryInfo(dirProspect)

(en ASP on instancie un objet avec Set et une variable avec Dim...)

ah aussi......pas de ; &#224; la fin !!!!

Nurgle 
C'est une grande folie que de vouloir &#234;tre sage tout seul !

cs_roro06 · Answer

Bonjour

plut&#244;t : 

set dir=fso.getFolder(dirProspect)

for each f in dir.files

    f.move dirClients

next


A tester, car j'ai pas trop le temps, l&#224;, mais la syntaxe de ta boucle n'est pas bonne


Cordialement
Roro webDev

Problèmes avec /iisHelp/common/500-100.asp, line 11

2 réponses

Votre réponse

Discussions similaires