Recommandé: ASP 3.0 Advanced Programming (trente-six) Chapitre 8 Bases de ADO Dans les 7 premiers chapitres de ce livre, il a déjà parlé du contenu de l'ASP et de la façon dont ASP apporte du contenu dynamique au site Web. Il a été constaté que son programme de script permet des pages Web personnalisées, ce qui nous permet de créer des pages ASP plus puissantes. Maintenant, ASP sera étudié
Avec le développement de la technologie Internet, l'enseignement en ligne deviendra la principale forme de rééducation des gens et d'éducation permanente. Dans les écoles en ligne, les gens peuvent choisir n'importe quel cours n'importe où, n'importe où sans être limité par le temps et l'espace. Le développement des écoles en ligne a présenté des exigences urgentes pour le développement des examens en ligne. Voici un système d'examen en ligne que j'ai mis en œuvre à l'aide de bases de données ASP et d'accès. Lorsque l'utilisateur se connecte avec le nom d'utilisateur et le mot de passe, le système vérifie d'abord si l'utilisateur a passé l'examen. Si c'est le cas, mène une requête de score. Sinon, extraire les questions de test de la banque de questions pour que l'utilisateur puisse répondre. Une fois l'utilisateur à soumettre la feuille de réponses, le système marquera et enregistrera les résultats dans la base de données.
un. Conception de la base de données
Tout d'abord, créez un exercice de base de données.MDB, qui comprend deux tableaux: utilisateur et test. Le tableau utilisateur contient trois champs:
Nom du champ: utilisateur; Type de champ: texte; Taille du champ: 20. Nom d'utilisateur du magasin
Nom du champ: passwd; Type de champ: texte; Taille du champ: 20. Stocker le mot de passe utilisateur
Nom du champ: score; Type de champ: numéro; Taille du champ: entier. Stocker les résultats des utilisateurs
Il y a cinq champs dans le tableau de test:
Nom du champ: Question; Type de champ: texte; Taille du champ: 255. Questions d'examen du magasin
Nom du champ: a; Type de champ: texte; Taille du champ: 100. Réponse de l'option de stockage A
Nom du champ: B; Type de champ: texte; Taille du champ: 100. Option de stockage B Réponse
Nom du champ: C; Type de champ: texte; Taille du champ: 100. Option de stockage C Réponse
Nom du champ: D; Type de champ: texte; Taille du champ: 100. La réponse à l'option de stockage D
Nom du champ: Ans; Type de champ: texte; Taille du champ: 2. Stocker les réponses correctes
deux. Code du programme d'origine
Vous trouverez ci-dessous trois autres programmes originaux de base dans le système. J'espère jouer le rôle des lecteurs stimulants qui développent des systèmes similaires, et les lecteurs peuvent également les améliorer pour s'adapter à leur propre système.
| Ce qui suit est le contenu cité: «Login.asp Source Program, vérifiez si l'utilisateur est légal <% @ Language = vbscript%> <% name = trim (demande (nom)) passwd = trim (demande (passwd)) 'Vérifiez si l'utilisateur entre les informations Si name <> et passwd <> alors Définir Conn = Server.CreateObject (Adodb.Connection) Conn.open Driver = {Microsoft Access Pilote (* .mdb)}; dbq = & Server.mappath (exercice.mdb) set rs = server.createObject (adodb.recordSet) SQL = SELECT * FROM User Where User = '& Name & 'et passwd =' & passwd & ' 'Vérifiez la légalité de l'utilisateur SET RS = Conn.Execute (SQL) Sinon (Rs.Eof) alors Vérifiez si l'utilisateur a passé l'examen. Si c'est le cas, faites une requête de note Si rs (score) <> 0 alors réponse.WRITE RS (utilisateur) et Le score de test est & rs (score) autre Session (pass) = 1 Session (utilisateur) = nom réponse.redirect test.asp terminer si autre Réponse.Write désolé, L'utilisateur ou le mot de passe est incorrect! ! ! terminer si autre terminer si %> <html> <adal> <Méta-nom = générateur Content = Microsoft Visual Studio 6.0> <Title> Vérification du mot de passe utilisateur </TITME> </ Head> <body> <Form Action = Login.asp Id = Form1 Méthode = Post Name = Form1> <P title => </p> <P title => </p> <P title = align = Centre> Utilisateur: <Entrée id = text1 name = nom style = hauteur: 22px; Largeur: 103px> </p> <P title = align = Centre> Mot de passe: <ID d'entrée = mot de passe1 Nom = Passwd style = hauteur: 23px; Largeur: 101px type = mot de passe> </p> <P title = align = centre> <ID de saisie = Soumis1 Name = Soumide1 Type = Soumider Value = Entrée Style = Font-Size: moyen; Style de police: normal; Font-Variant: Normal; Police-poids: Titre audacieux => </p> <P title = align = centre> </p> </ form> </docy> </html> 'Test.asp Source Program, Extraire les questions de test de la banque de questions pour répondre <% @ Language = vbscript%> <% Si session (pass) <> 1 alors Response.Redirect Login.asp autre terminer si Définir Conn = Server.CreateObject (ADODB.Connection) Conn.open Driver = {Microsoft Access Pilor (* .mdb)}; dbq = & Server.mappath (exercice.mdb) 'Extraire les questions de test SQL = SELECT * à partir du test SET RS = Conn.Execute (SQL) %> 'Fonction de minuterie <Script Language = JavaScript> var isn1 = null; var isn2 = false; Aujourd'hui = new Date (); fonction stopSit () { if (isn2) { ClearTimeout (ISN1); } isn2 = false; } fonction startIt () { stopIt (); isnclock (); } fonction isnclock () { var now = new Date (); var hrs = now.Gethours (); var min = now.getMinutes (); var sec = maintenant.getSeconds (); document.clckh.disp.value = ((hrs> 12)? HRS-12: HRS); document.clckm.disp.value = ((min <10)? 0 :) min; document.clcks.disp.value = ((sec <10)? 0 :) sec; Document.clck.disp.value = (hrs> = 12)? PM: AM; ISN1 = setTimeout (isnclock (), 1000); isn2 = true; } </cript> <html> <adal> <Méta-nom = générateur Content = Microsoft Visual Studio 6.0> </ Head> <Body onload = startIt () bgColor = ffffff> <Nenter> 'Appelez la fonction de synchronisation pour afficher l'heure <Table Border = 2> <tr> <Td> Time </td> <Td> Hour </td> <Td> Min </td> <td> sec </td> <td> </td> </tr> <tr> <td> </td> <Td valign = top> <form name = clckh onsubmit = 0> <Entrée type = nom de texte = disparition de disparition = 2 valeur => </ form> </td> <Td valign = top> <form name = clckm onsubmit = 0> <Entrée type = nom de texte = disparition de disparition = 2 valeur => </ form> </td> <Td valign = top> <form name = clcks onsubmit = 0> <Entrée type = nom de texte = disparition de disparition = 2 valeur => </ form> </td> <Td valign = top> <form name = clck onSubmit = 0> <Input type = Text Name = Disp size = 4 Value => </ form> </td> </tr> </ Center> 'Afficher les questions de test pour répondre <Form Action = result.asp id = form1 Méthode = Post Name = Form1> <p> </p> <p> <% i = 1 Rs.MoveFirst faire tout en pas Rs.Eof%> <p> <% = rs (question)%> </p> <Table Align = Centre Border = 1 CELLPADDING = 1 CellSpacant = 1 largeur = 80%> <tr> <Style td = largeur: 50% largeur = 50% <Entrée name = ANS <% = i%> type = Radio Value = A> <% = rs (a)%> </td> <td> <name d'entrée = ANS <% = i%> type = valeur radio = b> <% = rs (b)%> </td> </tr> <tr> <td> <name d'entrée = ANS <% = i%> type = valeur radio = c> <% = rs (c)%> </td> <td> <name d'entrée = ANS <% = i%> type = valeur radio = d> <% = rs (d)%> </td> </tr> </ Table> <% i = i 1 Rs.MovEnext boucle %> </p> <p> </p> <P align = Center> <IND ID = soumis1 name = soumis1 type = soumettre Value = Soumider> <IND ID = RESET1 NAME = RESET1 Type = réinitialiser la valeur = réinitialiser> </p> </ form> </docy> </html> |
Partager: ASP Advanced: Utilisez ASP pour fabriquer des graphiques à tarte statistiques, des graphiques à barres, etc. Dans nos travaux, nous devons souvent convertir les données en graphiques à barres, graphiques circulaires, etc. pour faciliter et une analyse intuitive des données. Ici, je vous présenterai un composant qui fabrique des graphiques à tarte et des graphiques à barres dans ASP: CSDrawgraph, csdgt.zip. Parce qu'il s'agit d'un composant, nous devons utiliser REGSV avant de l'utiliser.
2 pages de la page suivante de la page suivante précédente