Poser une question

Re: Remplir un tableau avec le contenu d'un fichier texte

Salut,

Tu dois lire chaque ligne, faire un "split" sur le point virgule (;) dans un tableau (array) à deux dimensions. Et ensuite boucler le tableau (array) et générer le HTML. Note que tu peux aussi utiliser un "dictionary" ou encore boucler, splitter et générer le HTML directement à la lecture du fichier. Exemple :

<%
dim fs, file, i, aTemp(5)
set fs = CreateObject("Scripting.FileSystemObject")
if fs.FileExists(path) then
set file = fs.OpenTextFile(path, ForReading)
response.write "<table>"
do while not file.AtEndOfStream
response.write "<tr>"
aTemp = split(file.ReadLine, ";")
for i = 0 to ubound(aTemp)
response.write "<td>" & aTemp(i) & "</td>"
next
response.write "</tr>"
loop
file.Close()
response.write "</table>"
else
response.write "Fichier inexistant!"
end if
%>

Ciao
Oznog

Réponses

Aucune réponse à ce message...