[ASP] Lecture d'un fichier texte

Bonjour tout le monde,

Voila j'ai un soucis assez simple : dans un script que j'ai réalisé en ASP, j'ai soucis concernant la lecture d'un fichier texte (et même p'tete lors de la définition du chemin :s)

Mon fichier texte se compose ainsi

login1 passw1
login2 passw2
.... vous avez compris chaque est composée de 6 caractères, un espace, 6 caractères et un retour charriot.

Le soucis c'est que j'utilise inF.Read, mais je suis pas du tout sûr que ça fonctionne comme je le pense. Pour preuve, j'ai réalisé le même script en C (langage que je connais/maîtrise beaucoup mieux), et celui-ci fonctionne.

Si quelqu'un pouvait donc m'aider, voici mon script ASP:

<%
'Vérification des logs dans un fichier !

'On commence par récupérer ce qui a été tapé !
login_user=Request.Form("login")
passwd_user=Request.Form("passwd")

'Et ceux qui vont accueillir les log du fichier
dim taille : taille=6
dim login : redim login(taille)
dim passwd : redim passwd(taille)
dim poubelle : redim poubelle(taille)
login=""
passwd=""

'Petite variable qui permet de sortir de la boucle quand authentifié
dim a : a=0

'On récupère le chemin absolu du fichier dans l'arborescence du serveur
Set FSO=Server.CreateObject("Scripting.FileSystemObject")
mon_fich="\log.txt"
repertoire="/admin/"
chemin_fichier=Server.MapPath(repertoire & nom_fich) 'le chemin du fichier depuis la racine

'On teste si le fichier existe ou non
if FSO.FileExists(chemin_fichier) then
'On commence le traitement
'En ouvrant le fichier
set inF=FSO.OpenTextFile(chemin_fichier, 1, false)

'On lit toutes les lignes tant qu'on a pas tout lu, ou tant que a est différent de 1
While not inF.atEndOfStream or a<>1

login=inF.Read(6) 'Les logins présent dans le fichier
poubelle=inF.Read(1) 'L'espace
passwd=inF.Read(6) 'Les password présents dans le fichier
poubelle=inF.Read(1) 'Le retour chariot
'Et on teste si c'est correct ou pas
if login_user=login and passwd_user=passwd then
rep="OK"
a=1
else 'Ca correspond pas, on met la variable rep à ERREUR, au cas où c'est le dernier tour de boucle
rep="ERREUR"
end if 'On remonte dans la boucle, et on lit la ligne suivante voir si ce coup-ci c'est bon

Wend 'On a lu tout le fichier
'On renvoi donc la variable pour le suite du traitement
Response.Write("rep="&rep)
inF.close
else 'Le fichier n'existe pas
Response.Write("Authentification impossible, veuillez contacter votre Administrateur pour plus d'informations")
end if
%>

Merci par avance

c'est pas super propre ...

pq pas utiliser un xml pour storer les credentials, c'est bcp plus simple à parcourir.

genre

    <users>
          <user name="user1" password="pass1" />
          <user name="user2" password="pass2" />
   </users>

Désolé pour la propreté, comme je disais l'ASP ya encore 1 semaine j'avais jamais entendu :s, donc je débute navré :(

Par contre ton histoire de XML heu, c'est un autre fichier en fait, c'est ça ? Désolé je ne connais pas non plus

oui

c'est comme un fichier texte mais structuré d'une certaine manière et qui peut être utilisé comme une petite base de données

ce sera bcp plus facile pour toi de faire des requetes dessus

parce que tu feras un truc du genre

dans tous les users , prendre celui qui a le nom users1, et comparer son password ac celui entré par le user

Donc je change le contenu de mon fichier log.txt pour ceci admettons

    <users>
          <user name="user1" password="pass1" />
          <user name="user2" password="pass2" />
   </users>

Dans mon ASP va certainement falloir que je change quelque chose non ?

oui évidemment

tu dois changer la partie pour aller chercher le password d'un user

juste une question

pourquoi de l'asp ? et pas de l'asp.net ?

Bah l'admin de la boîte m'a dit que le serveur tournait sous ASP, point barre. ASP.net ya de grosses différences ?

Sinon oui je me doutais un peu que j'allais devoir changer cela, mais comment on parcourt un fichier xml ? Et puis déjà comment on créer un fichier xml ? j'ai beau être en train de lire http://xml.developpez.com/cours/ ça à l'air d'être le gros bazard :( c'est même flou en fait

D'ailleurs l'admin il ne connaît pas ASP.net apparemment ... enfin comme je demandais ya de grosses différences ?