Bonjour,

J'ai un script qui me permet de lister des fichiers sur mon profil utilisateur en fonction de l'extension.

ce que j'aimerai faire est d'avoir une checkbox devant chaque chemin et ensuite en fonction de ce qui est coché, copier le fichier selectionné.

Actuellement, j'affiche le chemin des fichiers mais tout est à la suite, je n'arrive pas a faire de retour à la ligne.
J'ai essayé d'ajouter /n ou <TR> mais ca ne fonctionne pas

Merci d'avance pour votre aide.

voici la fonction qui liste des pst :

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
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
 
Set oFSO = CreateObject("Scripting.FileSystemObject")
Set WshShell = CreateObject("WScript.Shell")
 
start_folder = WshShell.ExpandEnvironmentStrings("%USERPROFILE%")
ext = Array("pst")
 
Set oFSO = CreateObject("Scripting.FileSystemObject")
Set folder = oFSO.GetFolder(start_folder)
 
 
Sub ListPST(folder, ext)
 
    For Each objFile In folder.Files
 
If (UCase(ext(0)) = UCase(oFSO.GetExtensionName(objFile.Name))) Then
 
	    strFileName = objFile.Name
        strFilePath = objFile.ParentFolder
		strhtml = strhtml & strFileName
		listingPST.innerHTML =   listingPST.innerHTML & strFilePath & "\" & strFileName            
        End If
    Next
    For Each fldr In folder.subfolders
        ListPST fldr, ext
    Next
 
End Sub
 
ListPST folder, ext