fév

Script de protection en ASP

Posted in Développement by Jon

Sur le site Bepass.com vous trouvez le script de protection en php et en javascript, voici celui en asp.
Penser bien à compléter les paramètres doc_id et site_id de votre document.

<%
	Dim valide,xml,requete, doc_id, site_id
	' identifiant de votre document à compléter
	doc_id = "";
	site_id= "";
	'construction de la requête 
	requete		= "http://secure.bepass.com/checkcode.php?"
	requete		= requete + "docId=" + doc_id
	requete		= requete + "&siteId=" + site_id
	requete		= requete + "&code=" + Request.QueryString("code")
	requete		= requete + "&REMOTE_ADDR=" + Request.ServerVariables("REMOTE_ADDR")
 
	Set xml = Server.CreateObject("MSXML2.ServerXMLHTTP") 
	xml.Open "GET", requete, false 
	xml.Send 
	valide = xml.ResponseText
 
	if(instr(valide,"OK")<>0) then 
		'Affichage dela page protégé
	else
		' redirection vers une page d'erreur
		response.Redirect("/code_error.html")
    	        response.End()
	end if
%>

Comments are closed.