LR Web - Le blog de Loïc Ridel » Tutos – ASP

Vérification d’email en ASP

lolo — Mon, 29 Jan 2007 15:50:26 +0000

Une petite fonction bien pratique pour vérifier la validité d’un email en ASP grâce aux expressions régulières :

 <%
Function verifEmail(email)
   Dim regEx
   Set regEx = New RegExp
   regEx.Global = True
   regEx.Pattern = "^[a-zA-Z0-9._-]+@[a-zA-Z0-9.-]{2,}[.][a-zA-Z]{2,4}$"
   notag = regEx.test(email)
   verifEmail=noTag
End Function
%>

ASP – Manipuler les fichiers

lolo — Thu, 09 Nov 2006 09:36:53 +0000

Mais comment fait-on pour manipuler les fichier en ASP ???
Oui, je sais ce n’est pas le genre de question que l’on se pose souvent, mais voilà, je me la suis posé…
Et pour toutes les personnes qui n’ont que ça à se poser comme question, voici les fonctions et méthode de base pour la manipulation des fichiers en ASP.
(si toi aussi tu es fatigué, pour voir l’article, il faut cliquer sur « Lire la suite… »)

^?View Code VB

<%
' le chemin du fichier :
chemin = "C:\www\fichier.txt"
 
' Création de l'objet pour la manipulation des fichiers :
Set FSO = server.CreateObject("Scripting.FileSystemObject") 
 
' vérification de l'existence du fichier :
if FSO.FileExists(chemin) then
	' si le fichier existe, on le supprime :
	FSO.DeleteFile(chemin)
end if 
 
' création du fichier :
Set monfichier = FSO.CreateTextFile(chemin, true) 
 
' écrire une ligne dans le fichier :
monfichier.WriteLine("blablabla") 
 
' fermer le fichier :
monfichier.Close() 
 
' lecture du fichier :
Set monfichier = FSO.OpenTextFile(chemin, 1, false) 
 
' lire la ligne :
ligne = monfichier.ReadLine() 
 
' lire tout le fichier :
tout = monfichier.ReadAll 
 
' ou un nombre de caratères :
nbcaracteres = 10
caract = Read(nbcaracteres) 
 
response.write("Une ligne : " & ligne)
response.write("Tout le fichier : " & tout)
response.write(nbcaracteres & " caractères : " & caract)
 
' suppression du fichier :
FSO.DeleteFile(chemin)
%>

Histogrammes en ASP

lolo — Fri, 13 Oct 2006 20:26:59 +0000

Des histogrammes en veux-tu en voilà !
Je cherchais un moyen de faire des histogrammes en ASP pour un projet, et je suis tombé sur pureAspGraph.
C’est sympa, ça marche bien et c’est simple. Voilà ce que ça donne :

Vous pouvez créer des histogrammes verticaux ou horizontaux, plus d’explications et d’exemples ici : pureAspGraph
A télécharger ici.

ASP : la fonction replace

lolo — Sat, 26 Aug 2006 00:37:32 +0000

Replace fonctionne de la manière suivante :

^?View Code VB

1	<% Nouvellechaine = replace(anciennechaine, c1, c2) %>

Elle remplace la chaine de caractère « c1 » par la chaine « c2 » au sein de la chaine « anciennechaine » pour vous retournez « Nouvellechaine ».
Mais voilà, quand vous passez une chaine vide pour le paramètre « anciennechaine », vous aurez droit à un beau plantage, une astuce consiste donc à faire :

^?View Code VB

1	<% Nouvellechaine = replace(anciennechaine&"", c1, c2) %>

Et là, ô miracle, ça fonctionne même si « anciennechaine » est vide !