Valeur par defaut parcourir [Résolu]

MarieKisSlaJoue · 20/02/2013, 12h23

Bonjour, je créer un tableau avec des valeur lu dans un fichier csv.
Chaque valeur est envoyer à un input créer dans une boucle qui donne donc quelque chose comme cela

Sauf que comme la valeur est un chemin j'aurai aimer afficher cette valeur déjà dans un parcourir.

Mais la les valeurs par défauts ne sont pas prise en comptes.
J'ai cru comprendre que c'était normal pour des questions de sécurité. Est-ce vrai ?

Comment je pourrai arriver à la solution souhaité ?

Voici le code de mon affichage.

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
'Affiche le contenue du csv sans 
	Sub afficheCSV
 
		Dim csv
		Dim txtCsv
		Dim arrExport
		Dim strBody
		Dim numLigne
 
		Set csv = CreateObject("Scripting.FileSystemObject")
		Set txtCsv = csv.OpenTextFile(path & "\menu.csv",1 ,true)
		numLigne = 0
		do while not txtCsv.AtEndOfStream
 
			arrExport = split(txtCsv.ReadLine,",")
			numLigne = numLigne + 1
			strBody = strBody & " <br/><input type ="& " text " & " name=" &" nomClient"&numLigne & " value = " & arrExport(0) & ">   <input type ="& " file " & " name=" &" cheminIso"&numLigne & " value = " & arrExport(1) &">    <input type ="& " text " & " name=" &" nomIso"&numLigne & " value = " & arrExport(2) &">"
			resultat.innerHTML = strBody
		Loop
 
		txtCsv.Close
 
	End Sub

hackoofr · 20/02/2013, 14h15

Dans la 2eme colonne il y a des chemins absolus de fichiers c'est ça

Pouvez-vous poster le menu.csv pour voir mieux les choses ?

MarieKisSlaJoue · 20/02/2013, 14h29

exactement je sont des chemin absolue

et voila le contenue de mon fichier csv

Code :

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

1
2
3
4
google , C:\DD\Google\isoGoogle.iso , test1
microsoft , C:\DD\Microsoft\isoMicrosoft.iso , test2
microsoft , C:\DD\Microsoft\isoMicrosoft.iso , microtest
google , C:\DD\Google\isoGoogle.iso , googletest

hackoofr · 20/02/2013, 18h53

Je ne sais pas si voulez faire quelque chose comme ceci :

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
31
32
33
34
35
36
37
<html>
<head>
<title>afficheCSV</title>
</head>
<SCRIPT LANGUAGE="VBScript">
    Sub afficheCSV
        Dim csv
        Dim txtCsv
        Dim arrExport
        Dim strBody
        Dim numLigne
        Set csv = CreateObject("Scripting.FileSystemObject")
        Set txtCsv = csv.OpenTextFile("menu.csv",1 ,true)
        numLigne = 0
        strbody = "<center><table border='3' cellpadding='1' style='border-collapse: collapse; font size:11pt' bordercolor='#CCCCCC' width='100%' id='Table1'></center>" & _
    "<td><center><strong>Nom</strong></center></td>" & _
    "<td><center><strong>Chemin</strong></center></td>" & _
    "<td><center><strong>Autre chose</strong></center></td>"
 
        do while not txtCsv.AtEndOfStream
            arrExport = split(txtCsv.ReadLine,",")
            numLigne = numLigne + 1
            strBody = strBody & "<tr><td><center><input type ="& " text " & " name=" &" nomClient"&numLigne & " value = " & arrExport(0) & "></center></td><td><center><a href=""#"" OnClick='Explore(""" & arrExport(1) & """)'>" & arrExport(1) & "</a></center></td><td><center><input type ="& " text " & " name=" &" nomIso"&numLigne & " value = " & arrExport(2) &"></center></td></tr>"
            resultat.innerHTML = strBody
        Loop
        txtCsv.Close        
End Sub
 
Function Explore(filename)
Set ws = CreateObject("WScript.Shell")
ws.run "Explorer /n,/select,"&filename&""
End Function
</script>
<body>
<center><span id="resultat"><INPUT TYPE="SUbmit" VALUE="Afficher" ONCLICK="afficheCSV"></span>
</body>
</html>

MarieKisSlaJoue · 20/02/2013, 19h00

la ça va me permettre d'arriver jusqu'au fichier, ce qui n'est pas ce que je souhaite, en fait quand quelqu'un rentre une ligne dans le fichier csv, l'une des valeur vient d'un parcourir.

Mais si il se trompe et qu'il souhaite modifier je voulais lui afficher un tableau ou il puisse changer les valeurs mais en ayant les anciennes affiché par défaut, mais pour le bouton parcourir je ne peux pas lui indiqué l'ancien chemin en fait.

finalement j'ai fait un autre formulaire à coté pour modifier c'est ce qui ma sembler le plus simple.

hackoofr · 20/02/2013, 20h38

postez votre nouveau formulaire complet et soyez plus explicite car je crois que je n'ai pas bien compris votre but final

20/02/2013, 14h15	#2
hackoofr Expert Confirmé Mehdi Tounisiano Enseignant Inscription : juin 2009 Messages : 1 629 Détails du profil Informations personnelles : Nom : Mehdi Tounisiano Âge : 38 Localisation : Tunisie Informations professionnelles : Activité : Enseignant Informations forums : Inscription : juin 2009 Messages : 1 629 Points : 3 689 Points : 3 689	Dans la 2eme colonne il y a des chemins absolus de fichiers c'est ça Pouvez-vous poster le menu.csv pour voir mieux les choses ? __________________ [HTA] Exportation du Code Source Avec Coloration Syntaxique en HTML [VBS] SHORTCUTREMOVER outil pour supprimer automatiquement les raccourcis infectés par un virus sur une clé USB [HTA] Vérificateur de Processus + VirusTotal Uploader Mes Contributions en Téléchargement
	00

20/02/2013, 19h00	#5
MarieKisSlaJoue Membre éclairé Développeur Java Inscription : mai 2012 Messages : 191 Détails du profil Informations personnelles : Sexe : Localisation : France Informations professionnelles : Activité : Développeur Java Secteur : High Tech - Éditeur de logiciels Informations forums : Inscription : mai 2012 Messages : 191 Points : 355 Points : 355	la ça va me permettre d'arriver jusqu'au fichier, ce qui n'est pas ce que je souhaite, en fait quand quelqu'un rentre une ligne dans le fichier csv, l'une des valeur vient d'un parcourir. Mais si il se trompe et qu'il souhaite modifier je voulais lui afficher un tableau ou il puisse changer les valeurs mais en ayant les anciennes affiché par défaut, mais pour le bouton parcourir je ne peux pas lui indiqué l'ancien chemin en fait. finalement j'ai fait un autre formulaire à coté pour modifier c'est ce qui ma sembler le plus simple. __________________ Ce post à été écrit par un panda
	00

20/02/2013, 20h38	#6
hackoofr Expert Confirmé Mehdi Tounisiano Enseignant Inscription : juin 2009 Messages : 1 629 Détails du profil Informations personnelles : Nom : Mehdi Tounisiano Âge : 38 Localisation : Tunisie Informations professionnelles : Activité : Enseignant Informations forums : Inscription : juin 2009 Messages : 1 629 Points : 3 689 Points : 3 689	postez votre nouveau formulaire complet et soyez plus explicite car je crois que je n'ai pas bien compris votre but final __________________ [HTA] Exportation du Code Source Avec Coloration Syntaxique en HTML [VBS] SHORTCUTREMOVER outil pour supprimer automatiquement les raccourcis infectés par un virus sur une clé USB [HTA] Vérificateur de Processus + VirusTotal Uploader Mes Contributions en Téléchargement
	00

Outils de la discussion
Afficher une version imprimable Envoyer un lien vers cette page par email