Discussion :

[Armand59]

Bonjour,

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
 
    Dim oScript,FSO,dir,Fnm,inF,NomRepMaintenanceSource
    Response.Write "Demarrage du batch de test : "
    Set oScript = Server.CreateObject("WSCRIPT.Shell")
    oScript.Run "cmd.exe /c I:\Dev\Batch\rechercheRepMaintenanceSource.bat "& num
    Set FSO = Server.CreateObject("Scripting.FileSystemObject")
    dir = Server.MapPath("\Batch")
    Fnm = dir & "\NomRepMaintenanceSource.txt"
    if FSO.FileExists(Fnm) then set inF = FSO.OpenTextFile(Fnm,1,false)
    'Response.Write Fnm
    NomRepMaintenanceSource= inF.readLine
    inF.close
    Response.Write NomRepMaintenanceSource
    Set oScript = Nothing
    Response.Write "ok."

Dans mon script asp je lance un .bat qui me génère un fichier .txt

Ensuite je lis le fichier .txt mais le problème est qu'il me lit l'ancien fichier généré, je m'explique :

A mon avis l'exécution du .bat n'est pas terminée lorsque je lis le fichier .txt
Et du coup, je ne lis pas le nouveau fichier généré

C'est pour cela que je souhaiterais mettre une "pause" juste après avoir lancé l'exécution de mon .bat (pour que le nouveau fichier ait le temps de se générer) et de reprendre ensuite mon script.

Voilà, si vous connaissez une fonction pause pour asp, je suis preneur

[Armand59]

C'est bon j'ai trouvé

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
function pause(temps)
date1=dateadd("s",temps,now)
while(now<>date1)
 
wend
end function

pause(3)

[Immobilis]

Salut,

C'est cool ta fonction, mais faut pas se gourer car si tu mets un nb négatif, tu pars dans une boucle infinie.

De plus, il faudrait regarder les ressources du serveur car les boucles while consomment pas mal de ressources du processeur quand elles partent débridées (sans rien dedans).

Que se passe-t-il si d'entrée tu supprimes "NomRepMaintenanceSource.txt"?

A+