> Tech > Listings 5 & 6

Listings 5 & 6

Tech - Par Renaud ROSSET - Publié le 24 juin 2010

Listing 5 : Sous-routine ValidationError

Sub ValidationError(DataFieldsInError)
Response.Write “<html><head><title>Data Validation Error</title></head>”
Response.Write “<body><h3><font face='Verdana' color='red'>Error: Data Missing From Required Field</font></h3>”
Response.write “<br><br><br>”
Response.Write “<p><font face='Verdana' size='2'>Please provide data for the following field(s):</font></p><br></font>”
Response.Write “<blockquote>”
for k=0 to ubound(DataFieldsInError)
 if DataFieldsInError(k)<>”” then
  if isnumeric(datafieldsinerror(k)) then
   Response.Write “<p><font face='Verdana' size='2'><b>” & oAuth.DisplayPreDefinedQuestion(DataFieldsInError(k))

Listings 5 & 6

& _
“</b></font></p><br></font>”
else
if datafieldsinerror(k)=”C” then
Response.Write “<p><font face=’Verdana’ size=’2′><b>Custom Challenge
Question</b></font></p><br></font>”
else
Response.Write “<p><font face=’Verdana’ size=’2′><b>Response to Custom Challenge
Question</b></font></p><br></font>”
end if
end if
end if
next
End sub

Listing 6 : Code pour collecter l’information utilisateur

<td><font face=”Verdana” size=”2”><b>What is your user id?:</b><br><small>Enter
Domain\Username or Username@Domain.com</small></font></td>
<td><font face=”Verdana” size=”2”><input type=”text” name=”UserName”
size=”25”></font></td>
</tr>

Téléchargez cette ressource

Sécuriser Microsoft 365 avec une approche Zero-Trust

Sécuriser Microsoft 365 avec une approche Zero-Trust

Découvrez comment renforcer la cyber-résilience de Microsoft 365 grâce à une approche Zero-Trust, une administration granulaire et une automatisation avancée. La technologie Virtual Tenant de CoreView permet de sécuriser et simplifier la gestion des environnements complexes, tout en complétant vos stratégies IAM, y compris dans les secteurs réglementés.

Les plus consultés sur iTPro.fr

A lire aussi sur le site

À la une de la chaîne Tech