%@LANGUAGE="VBSCRIPT"%> <% ' *** Go To Record and Move To Record: create strings for maintaining URL and Form parameters ' create the list of parameters which should not be maintained MM_removeList = "&index=" If (MM_paramName <> "") Then MM_removeList = MM_removeList & "&" & MM_paramName & "=" MM_keepURL="":MM_keepForm="":MM_keepBoth="":MM_keepNone="" ' add the URL parameters to the MM_keepURL string For Each Item In Request.QueryString NextItem = "&" & Item & "=" If (InStr(1,MM_removeList,NextItem,1) = 0) Then MM_keepURL = MM_keepURL & NextItem & Server.URLencode(Request.QueryString(Item)) End If Next ' add the Form variables to the MM_keepForm string For Each Item In Request.Form NextItem = "&" & Item & "=" If (InStr(1,MM_removeList,NextItem,1) = 0) Then MM_keepForm = MM_keepForm & NextItem & Server.URLencode(Request.Form(Item)) End If Next ' create the Form + URL string and remove the intial '&' from each of the strings MM_keepBoth = MM_keepURL & MM_keepForm if (MM_keepBoth <> "") Then MM_keepBoth = Right(MM_keepBoth, Len(MM_keepBoth) - 1) if (MM_keepURL <> "") Then MM_keepURL = Right(MM_keepURL, Len(MM_keepURL) - 1) if (MM_keepForm <> "") Then MM_keepForm = Right(MM_keepForm, Len(MM_keepForm) - 1) ' a utility function used for adding additional parameters to these strings Function MM_joinChar(firstItem) If (firstItem <> "") Then MM_joinChar = "&" Else MM_joinChar = "" End If End Function %>
Saez ,Fils de France,la nation, droits,l'homme,nation, tolérance,l'heure,résistance,idées,vendu,cause,perdu, honte,nation des droits de l'homme,indiférence, l'heure de la resistance,Warez,pirate,Fils de France,savoir vivre,instant,site lire,bienvenue site lire,services,notre,texte,rêves,pratique,libre expression,histoire pensée,vivre,centre histoire pensée,sentiment,aimer,privée,vouloir,inscription,bien être,faire lire,savoir,lecture,search,question,savoir plus,afficher,lire aimer,respecte,idée,vouloir lire,active,écrire,lire faire lire,tout savoir,centre,mots,pensée,yahoo respect privé,respect privé,parler,lire aimer lire,faire,francais,respecte privé,lire écrire,tout,lire,traité savoir vivre,bien vouloir,libre,faire connaître,trace,site lire aimer,service,santé bien être,avis,savoir vivre usage,être,respect,rêve,bien vouloir lire,écrire textes,lire comprendre,titres,vivre usage une,bien,quoi,seule
Nouveautés |
Soyez le ou la bienvenu(e) sur mon site personnel. Vous trouverez dans ces pages des textes pour cogiter, des photographies pour assouvir votre curiosité, plus intime, mon parcours professionnel et mes qualifications (diverses), un peu de son pour écouter ou découvrir, mais surtout télécharger, il y a bien sûr des liens favoris et une page qui ne doit, normalement pas vous attirer. |
||||||||
Nouveautés 2 |
|||||||||
![]() |
|||||||||
Pourquoi ce site ? | |||||||||
Un site personnel permet de se dévoiler, partager ses passions de façon textuelle, visuelle ou bien par le biais de moyens interactifs.
|
|||||||||
|
|||||||||
Vous
êtes le Cette page a été mise à jour le lundi, 28 août, 2006 23:34 . |
|||||||||