Recommandé: Une brève discussion sur le principe du programme d'acquisition ASP Les principales étapes du programme de collecte sont les suivantes: 1. Obtenez le contenu de la page collectée 2. Extraire toutes les données du code d'acquisition 1. Obtenez le contenu de la page collectée que je connais actuellement sur les méthodes ASP couramment utilisées pour obtenir la page collectée: 1.
Script de vérification de la connexion de l'utilisateur, chkpwd.asp
Ce qui suit est le contenu cité:
<%
'========= Script de vérification de connexion utilisateur ========
'Si l'objet passé n'a pas été défini, il est défini comme faux, indiquant qu'il n'a pas réussi la vérification
Si iSempty (session (passé)) alors
Session (passée) = false
Terminer si
'Session (passé) = false, ce qui signifie que les informations de vérification transmises du formulaire n'ont pas encore été adoptées.
Si la session (passée) = false alors
Username = request.form (nom d'utilisateur)
Userpwd = request.form (userpwd)
Si le nom d'utilisateur = alors
Errmsg = Conseil: veuillez saisir votre nom d'utilisateur et votre mot de passe
Autre
'==============================================.
Définir Conn = Server.CreateObject (ADODB.Connection)
Conn.ConnectionString = Driver = {SQL Server}; server = 192.168.1.3; uid = sa; pwd =; database = zcmrs
Conn.open
'=========================== Lisez les données de l'utilisateur de la table Log ========================================.
'Définir l'objet RecordSet
Set rs = server.createObject (adodb.recordSet)
'Réglez le service de connexion de l'objet de connexion
Définir Rs.ActiveConnection = Conn
'Régler le type de curseur
Rs.cursortype = 3
'Ensemble de records ouverts
Rs.Open Sélectionner le nom d'utilisateur, le mot de passe depuis Erpuser où username = '& username &'
'==============================================.
Si Rs.Eof alors
Errmsg = pourboire: l'utilisateur n'existe pas ou le mot de passe est mauvais
Autre
Si userPwd <> Rs.fields (mot de passe) alors
Errmsg = Tip: Login a échoué! Erreur de mot de passe?
Else 'Connexion avec succès
Errmsg =
Session (passé) = Vrai
Session (nom d'utilisateur) = Rs.fields (nom d'utilisateur)
'Identifier la session des autorisations utilisateur (utilisateur) = Rs.Fields (UserID)
Terminer si
Terminer si
Terminer si
Terminer si
'Après l'échec de la connexion, le formulaire de connexion sera dessiné
Si ce n'est pas la session (passée) = true alors
%>
<html>
<A-Head> <Title> UNT intitulé Document </Title>
<style type = text / css>
<! -
.Style1 {Font-Size: 12px; Font-Weight: Bold; margin-left: 120px; contour: double}
->
</ style>
<style type = text / css>
<! -
.Style2 {Font-Size: 12px; Font-Weight: Bold; contour: Double; Color: # FF3333}
->
</ style>
</ head>
<Body Leftmargin = 0 topmargin = 0 marginheight = 0 marginwidth = 0 bgColor = # 000000>
<div id = mortel style = hauteur: 300; largeur: 450; style bordure: solide; bordure-color: #fffff; margin-top: 80px; margin-left: 25%; marge-droit: 25%; fond-couleur: #fffff>
<div id = Denglu Style = Font-Size: 12px; Font-Weight: Bold; Background-Color: # 0099FF; Text-Align: Center; Height: 40px;> <br> ERP System Login </div>
<formulaire form = <% = request.servervariables (path_info)%> méthode = post name = myform id = myform>
<p class = style1> nom d'utilisateur: <name d'entrée = nom d'utilisateur type = text id = nom d'utilisateur Taille = 18 maxLength = 20>
</p>
<p class = style1> mot de passe: <entrée name = userpwd type = mot de passe id = userpwd size = 18 maxLength = 20>
</p>
<p align = Center class = style2> <% = errmsg%> </p>
<p>
<Type d'entrée = soumettre Align = deuxième nom = soumettre Value = Connexion au système>
<input name = rege type = Button align = middle onclick = location = 'register.asp' id = rege value = registre utilisateur>
</p>
</ form>
</div>
</docy>
</html>
<%
'<p class = style1> Code de vérification: <input name = checkcode type = text id = checkcode size = 6 maxLength = 4>
'<Img style = margin-droite: 40px alt = src = commun / getcode.asp> </p>
réponse.
Terminer si
%>
Page pour visiter ERP.asp
<Voici le contenu cité:
<! - # Inclure file = chkpwd.asp ->
<body>
<div style = 'Font-Size: 12px; Font-Weight: Bold; Border: 1px Solid # 001; Padding: 4px; Background: #ffccff; margin-top: 0;'> Bienvenue pour utiliser le système de requête ERP, l'utilisateur actuel connecté est:
<%
Si la session (passée) = true alors
Réponse.write (session (nom d'utilisateur))
Terminer si
%> <a href = logout.asp> quitter le système </a>
</div>
</docy>
Chaque fois que vous ouvrez ERP.asp, vous exécutez d'abord chkpwd.asp (), qui peut effectivement empêcher les utilisateurs non autorisés d'accéder à la page Web spécifiée.
Logout.asp System Exit
<body>
<%
Session (passée) = false
Session (nom d'utilisateur) =
Réponse.redirect (index.asp)
%>
</docy>
Soumettre le formulaire à l'aide d'images
Ce qui suit est le contenu cité:
<form name = form1 méthode = post-action =>
<td Align = droite> <Type d'entrée = méthode d'image = soumettre name = soumettre src = image / loginin.gif width = 70 height = 21 alt = soumed> </td>
</ form>
Partager: ASP et lien d'accès Cet article illustre deux façons de lier l'ASP et l'accès dans les exemples ASP. Ce qui suit est le contenu référencé:% dim dd, connstrdd = data.mdbconnstr = & q