Jeder muss mit Online-Umfragen vertraut sein. Dem Benutzer werden eine Frage und mehrere Antworten zum Ausfüllen gegeben. Anschließend werden die Ergebnisse in der Datenbank gespeichert, Statistiken werden automatisch erstellt und schließlich wird eine statistische Grafik erstellt. Folgen Sie mir in dieser Ausgabe und erstellen Sie ein Online-Umfragesystem.
1. Funktionales Design:
Muss ein so einfaches System funktional gestaltet sein? Manche Leute finden es vielleicht seltsam, aber egal um welche Art von System es sich handelt: Wenn man sich zuerst mit dem funktionalen Design befasst, kann man immer ein klareres Verständnis des Systems erlangen. Werfen wir einen Blick darauf, was Online-Umfragen bewirken können. Die oben erwähnte Grundfunktion besteht darin, eine Frage und mehrere Antworten zu geben, dann Statistiken zu erstellen und schließlich ein Diagramm zu erstellen. Auf dieser Grundlage können wir erwägen, einer Umfrage einen Zeitraum (Gültigkeitszeitraum) hinzuzufügen. Während dieses Zeitraums ist die Umfrage gültig. Darüber hinaus können wir festlegen, dass ein Benutzer jeweils nur einmal Antworten einreichen kann. Wenn Sie restriktiver sein möchten, können Sie festlegen, dass eine IP-Adresse nur einmal eine Antwort einreichen kann. Dies kann jedoch dazu führen, dass nur eine Person in einem Internetcafé die Antwort einreichen kann. Bei den Fragen in der Umfrage kann es sich bei einigen um Single-Choice-Fragen und bei anderen um Multiple-Choice-Fragen handeln. Lassen Sie uns abschließend über die statistische Grafik sprechen. In der statistischen Grafik sollten die Antworten, die Anzahl der Wähler für jede Antwort und der Anteil der Stimmen für jede Antwort angezeigt werden. Im Allgemeinen reicht es aus, ein horizontales Diagramm zu verwenden, das einfacher zu implementieren ist. Wenn Sie es natürlich in ein vertikales Diagramm ändern möchten, können Sie dies auch tun.
Auf dieser Grundlage werden nun die Funktionen der Online-Umfrage wie folgt zusammengefasst:
1. Die Daten werden in der ACCESS 2000-Datenbank gespeichert.
2. Jeder Benutzer kann einmal pro Besuch abstimmen
. 3. Die Statistiken jeder Umfrage werden mit angegeben und angezeigt Statistische Diagramme
4. Jede Umfrage hat ein Ablaufdatum und endet automatisch nach Ablauf. Es können nur die Ergebnisse abgeschlossener Umfragen eingesehen werden.
5. Administratoren können Umfragen hinzufügen und Umfrageantworten ändern (hinzufügen, ändern, löschen, Typ ändern).
6. Bei beendeten Umfragen können Administratoren die Umfrage nur löschen, die Antworten jedoch nicht ändern.
7. Es gibt nur einen Administrator (einzelner Benutzer)
2. Datenbankdesign
Jetzt entwerfen wir die Datenbank. Gemäß den funktionalen Anforderungen müssen mindestens drei Tabellen vorhanden sein, eine ist die Administratortabelle, die zweite ist die Umfragetabelle und die Drittens ist die Tabelle mit den Umfrageergebnissen. Der Name der Datenbankdatei lautet Survey.mdb und kann in .asp geändert werden. Nehmen Sie in diesem Fall bitte entsprechende Änderungen im ASP-Programm vor.
Tabelle 1. Name der Administratortabelle: verwalten
-------------------------------------------------- ---------------
Beschreibung der Feldtyplänge
-------------------------------------------------- ---------------
manage_id automatische Nummerierung – wird hier nicht verwendet, wird in Zukunft erweitert
manage_username Text 15 Administrator-Benutzername
manage_password Text 15 Administratorkennwort
-------------------------------------------------- ---------------
Nachdem Sie die Verwaltungstabelle erstellt haben, fügen Sie einen neuen Datensatz hinzu und geben Sie Ihren Administrator-Benutzernamen und Ihr Passwort ein. Hier geben Sie die xmxoxo-
Tabelle 2 ein. Name der Umfragetabelle: Umfrage
-------------------------------------------------- ---------------
Beschreibung der Feldtyplänge
-------------------------------------------------- ---------------
Survey_id automatische Nummerierung – inkrementell, Primärschlüssel, indiziert, keine Duplizierung
Survey_Question Text 255 Umfragefrage
Survey_type ob – Typ, nein: Einzelauswahl, ja: Mehrfachauswahl
Survey_stime Datum – langes Datum, Startzeit
Survey_etime Datum – langes Datum, Endzeit
-------------------------------------------------- ---------------
Tabelle 3. Umfrage-Endformular Tabellenname: Survey_vote
------------------------- ------ ----------------------------------------
Beschreibung der Feldtyplänge
-------------------------------------------------- ---------------
vote_no automatische Nummerierung – aufsteigend, Primärschlüssel, indiziert und keine Duplizierung
vote_id lange Ganzzahl – indiziert und wiederholt, Dezimalstelle 0
vote_answer Text 100 Umfrageantworten
vote_count long – Anzahl der Stimmen
-------------------------------------------------- ---------------
Unter diesen besteht eine Viele-zu-Eins-Beziehung zwischen der Tabelle „survey_vote“ und dem Feld „id“ der Umfragetabelle. Es ist nicht notwendig, diese Beziehung herzustellen, aber durch die Herstellung einer Beziehung werden die Ideen klarer.
3.Hier werden nicht viele Funktionen zum
Einschließen von Dateien
verwendet. Sie werden hauptsächlich zum Betreiben der Datenbank verwendet. Wenn Sie HTML und andere Codes bei der Eingabe verhindern möchten, verwenden Sie einfach server.htmlencode, um sie zu verarbeiten Sonderfunktionzu handhaben. Wir können weiterhin die enthaltenen Dateien in der vorherigen Artikelreihe „Lernen Sie von mir“ „Lernen Sie von mir, ein Baummenü zu erstellen“ verwenden.
Gemeinsam genutzte Funktionsdatei, Dateiname: inc.asp
<%
''************************************************** *******************
''Gemeinsame Datenbank-ASP-Funktion
''************************************************** *******************
''Datenbankkonstanten
Datenbankname="survey.mdb" ''Datenbankname. Wenn Sie den Namen ändern, ändern Sie ihn einfach hier
''************************************************** *******************
''Öffnen Sie die Datenbank
sub opendb(connect)
set connect=server.CreateObject("ADODB.connection")
connect.ConnectionString="DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" &_
server.MapPath(Datenbankname)
connect.Open strconn
Ende sub
''************************************************** *******************
''Datenbank schließen
sub geschlossenb(verbinden)
verbinden.schließen
setze connect=nichts
Ende sub
''************************************************** *******************
''Öffnen Sie eine einzelne Tabelle zum Lesen
sub opentable(connect,tbname,myrs)
set myrs=server.createobject("ADODB.recordset")
rssql="select * from " & tbname
myrs.open rssql,connect,1,1
Ende sub
''************************************************** *******************
''Schließen Sie die temporäre Tabelle
Unterschrank(r)
rs.close
setze rs=nichts
Ende sub
''************************************************** *******************
''Datenbank abfragen
Untersuchtabelle (connect, sql, rs)
set rs=server.createobject("ADODB.recordset")
rs.open sql,connect,1,1
Ende Sub
''************************************************** *********************
„Datenbank abfragen und ändern.“
sub changetable(connect,sql,rs)
set rs=server.createobject("ADODB.recordset")
rs.open sql,connect,1,3
Ende Sub
''************************************************** *********************
''Informationen zum Debuggen anzeigen
Sub w(msg)
Antwort.Nachricht schreiben
Ende Sub
''************************************************** *********************
''Programmunterbrechung zum Debuggen
subuserstop()
Antwort.Ende
Ende sub
%>
4. Dokumentendesign
Gemäß der traditionellen Denkweise gliedern wir Online-Umfragen immer in drei Teile: Der erste dient der Anzeige des Fragebogens; der dritte dient der Hintergrundverwaltung. In praktischen Anwendungen werden wir feststellen, dass der Fragebogen häufig auf einer bestimmten Webseite angezeigt wird und die Ergebnisse normalerweise in einem Popup-Fenster angezeigt werden. Über einen weiteren Link oder ein Login-Formular gelangt man zur Backend-Verwaltung. Um die Online-Umfrage bequemer nutzen zu können, haben wir den Teil zur Anzeige des Fragebogens als JS-Skript geschrieben, sodass die Webseite, die den Fragebogen anzeigen muss, ihn frei aufrufen kann, indem sie auf das Skript verweist. Okay, werfen wir einen Blick auf das Dateidesign
1. Inc.asp schließt die Datei ein. Hauptfunktionsbibliothek
2, Surveycode.asp zeigt das Fragebogenprogramm an. Verwenden Sie zum Aufrufen ein Skript auf der Hauptwebseite.
3. Survey.asp Fragebogenlistenprogramm. Listet den Status aller Untersuchungen auf.
4. Survey_vote.asp ist ein Programm, das statistische Umfrageergebnisse anzeigt. Bringen Sie Parameter mit, um die untersuchten Fragen darzustellen.
5. Survey_manage.asp-Verwaltungsprogramm.
Hier haben wir das Seitendesign übersprungen, da es hier nicht um Stildesign geht. Bitte entwerfen Sie es daher selbst, was Stil, Layout, CSS usw. der Webseite betrifft.
5. Dateifluss:
Schreiben Sie zunächst den Hauptfluss des Programms auf, um spätere Änderungen, Erweiterungen und Transplantationen zu erleichtern. Wichtiger ist hier, welche Unterprogramme in das Programm geschrieben werden sollen und wie diese Unterprogramme angeordnet werden.
1. Surveycode.asp zeigt das Umfrageformular
<%
an
''Rufen Sie den Querystring-Parameter ab. Die ID stellt die Umfragenummer dar
''Bestimmen Sie die Richtigkeit der Parameter
''Stellen Sie fest, ob die Untersuchung innerhalb des Gültigkeitszeitraums liegt.
''Umfragefrage lesen, eingeben
„Umfrageantworten ausgeben und Umfrageformular erstellen.“
''Datenbank und Tabellen schließen
%>
2. Survey.asp zeigt den gesamten Umfragestatus an
<%
„Lesen Sie die Datenbank.“
%>
<html>
''Alle Umfragestatus anzeigen und Links hinzufügen
</html>
3. Survey_vote.asp zeigt statistische Ergebnisse an.
Hier gibt es zwei Funktionen: Eine besteht darin, die Antwort ohne Übermittlung anzuzeigen, und die andere besteht darin, nach Übermittlung der Antwort Statistiken durchzuführen und dann das Ergebnis anzuzeigen. Wenn keine Parameter vorhanden sind, ist dies der erste Weg. Es kann auch in zwei Dateien erfolgen.
<%
''Parameter abrufen. id stellt die Umfragenummer dar. Alle Daten stammen aus dem Formular.
„Bestimmen Sie, ob Parameter vorhanden sind. Wenn ja, führen Sie zuerst Statistiken durch.“
''Wenn nicht, wird es direkt angezeigt.
''Statistisches Unterprogramm
%>
<html>
''Unterprogramm anzeigen
</html>
4. Survey_manage.asp-Verwaltungsprogramm.
Der Verwaltungsteil ist komplexer und muss mehr Funktionen implementieren. Lassen Sie uns zunächst die Verwaltungsfunktionen auflisten:
1) Administrator-Login. Die Verwaltung kann nur nach der Anmeldung erfolgen
. 2) Abmelden. Steigen Sie sicher aus, wenn Sie mit der Verwaltung fertig sind.
Die Verwaltung von Umfragen umfasst:
3) Hinzufügen einer Umfrage. Fügen Sie auch Umfrageantworten hinzu
. 4) Ändern Sie eine Umfrage. Inhalt, Zeit, Typ und Inhalt der Umfrageantworten ändern, hinzufügen, löschen
5) Eine Umfrage löschen. Eine laufende Umfrage kann nicht gelöscht werden.
Entwerfen Sie seinen Prozess für diese Funktionen
<%
''Parameter abrufen. Aktion stellt eine Aktion dar, die den oben genannten Funktionen entspricht.
''Weiterleitung zur entsprechenden Unterroutine entsprechend der Aktion
''Login-Unterroutine
''Beenden Sie die Anmeldeunterroutine
''Führen Sie die Unterroutine zum Hinzufügen von Umfragefragen aus
''Führen Sie die Unterroutine zum Hinzufügen von Umfrageantworten aus
''Führen Sie die geänderte Umfrage-Unterroutine aus, um die Fragen und Antworten gemeinsam zu ändern
''Führen Sie die Unterroutine zum Löschen der Umfragefrage aus
''Führen Sie die Unterroutine zum Löschen der Umfrageantwort aus
<html>
<%
'' Stellen Sie fest, ob Sie angemeldet sind. Wenn nicht, zeigen Sie das Anmeldeformular an.
''Zeigen Sie das entsprechende Formular basierend auf der Aktion an
''Alle Umfrage-Unterprogramme anzeigen
''Zeigt ein einzelnes Umfrage-Unterprogramm. Fragen und Antworten werden gemeinsam angezeigt
''Zeigt die hinzugefügte Untersuchungsunterroutine an.
''Anmeldeformular anzeigen
%>
</html>
6. Code schreiben
Nachdem das Prozessdesign abgeschlossen ist, wird das Schreiben von Code besser organisiert. Fangen wir einfach an. Bevor wir den Code schreiben, müssen wir einige Datensätze zum Testen in die Datenbank eingeben. Fügen Sie zunächst eine Umfragefrage und mehrere Umfrageantworten hinzu und geben Sie manuell einige statistische Informationen ein.
Schreiben wir zunächst „surveycode.asp“, um das Umfrageformular anzuzeigen. Diese Datei muss auf anderen Seiten aufgerufen werden, daher schreiben wir sie auf eine gemischte Weise aus JS und VBS. Beim Aufruf können Sie es in ein Formular einfügen und die folgende Anweisung verwenden:
<SCRIPT Language="JavaScript" SRC="surveycode.asp?id=1"></SCRIPT>
Befolgen Sie zunächst den oben beschriebenen Vorgang, bevor Sie das Formular anzeigen feststellen, ob die Untersuchung vorliegt und im Gange ist. Darüber hinaus muss im Formular ein versteckter Parameter übermittelt werden, der die Fragenummer (ID) der Umfrage darstellt. Bei der Übermittlung der Antwort wird die Antwortnummer vote_no
Dateiname Surveycode.asp
<!--#include file="inc" angegeben. asp" -->
<%
id=request.querystring("id")
if id<>"" then ''wenn es Parameter gibt
opendb my '' stellt eine Verbindung zur Datenbank her
sql="wählen Sie * aus der Umfrage aus, wobei Survey_id="& id ''Abfrageanweisung
searchtable my,sql,rs ''Datenbank abfragen
Wenn nicht rs.eof, dann „Wenn es diesen Ermittlungsdatensatz gibt.“
question=rs("survey_question") ''Lesen Sie die Frage
Surveytype=rs("survey_type") ''Lesen Sie den Antworttyp
stime=rs("survey_stime") ''Startzeit lesen
etime=rs("survey_etime") ''Endzeit lesen
closetable rs ''Tisch schließen
wenn stime<now() und etime>now() dann „wenn die Untersuchung läuft.“
''Geben Sie das Umfrageformular unten aus
''Geben Sie zuerst das Formular und die Fragen aus und senden Sie das Formular dann an Survey_vote.asp
%>
document.write("<form action=''survey_vote.asp'' target=''_blank'' method=''post''>");
document.write("<table border=''1'' cellpadding=''2'' cellspacing=0'' bordercolorligh=''#000000''");
document.write(" bordercolordark=''#ffffff'' width=''100%'' align=''center''><tbody>");
document.write("<tr><td colspan=''2'' align=''center''><b><%=server.htmlencode(question)%></b></td></tr >");
<%
sql="select vote_no,vote_answer from Survey_vote where vote_id="&id ''SQL, um die Antwort abzufragen
searchtable my,sql,rs ''Abfrage ausführen
wenn nicht rs.eof then ''Wenn es eine Antwort gibt, gib sie aus
für i=1 bis rs.recordcount
%>
document.write("<tr><td align=''right''><input name=''res'' type=''");
<%
wenn Umfragetyp, dann ''Beurteilen Sie den Typ, zeigen Sie eine Einzelauswahl oder eine Mehrfachauswahl an
%>
document.write("checkbox");
<%else%>
document.write("radio");
<%end if ''Der folgende Satz gibt den Text der Antwort und den übermittelten Wert (vote_no)%> aus
document.write("'' value=<%=rs("vote_no")%>></td><td><%=rs("vote_answer")%></td></tr>");
<%
rs.movenext
nächste
''Die folgenden Sätze geben einen versteckten Parameter aus und übergeben die Fragenummer (id)
'' und verwenden Sie eine JS-Funktion, um den Link zu definieren, nachdem Sie zum Anzeigen geklickt haben
%>
document.write("<tr><td colspan=''2'' align=''center''><input type=''hidden'' name=''id'' value=''<%=id% >''>");
document.write("<input type=''submit'' class=button value=''vote''> ");
document.write("<input type=button class=button value=''View'' onclick=''jump(<%=id%>)''>");
document.write("</td></tr></tbody></table></form>");
Funktion springen(id){
window.open("survey_vote.asp?id="+id,"survey")
}
<%
Ende wenn
Ende wenn
Ende wenn
Schranktischler
geschlossenb mein
Ende wenn
%>
Nachdem Surveycode.asp abgeschlossen ist, haben wir die folgenden Punkte in der Implementierung ermittelt:
1. Wenn in Survey_vote.asp der Abfragezeichenfolgenparameter id einen Wert hat, wird das Ergebnis angezeigt.
2. In Survey_vote.asp, wenn der Formularparameter vorhanden ist Wenn die ID einen Wert hat, müssen zuerst Statistiken durchgeführt werden.
3. In Survey_vote.asp ist der übermittelte Formularparameter res die Antwortnummer vote_no.
7. Statistische Ergebnisse
Zuerst werden wir die Anzeige der statistischen Ergebnisse Survey_vote vervollständigen eng verwandt mit Surveycode.asp .asp-Dateien. Am Ende des vorherigen Artikels haben wir einige in Surveycode.asp ermittelte Parameter erläutert.
Statistische Ergebnisse Survey_vote.asp
<!--#include file="inc.asp" -->
<html>
<Kopf>
<title>Umfragestatistik</title>
<link rel="stylesheet" href="main.css" type="text/css">
</head>
<Körper>
<%
''Fügen Sie im vorherigen Satz zunächst die Include-Datei hinzu und verweisen Sie auf die Funktion.
id=request.querystring("id") ''Querystring-Parameter-ID abrufen
opendb my '' stellt eine Verbindung zur Datenbank her
if id="" then ''Wenn nicht, sehen Sie das Ergebnis nicht direkt.
id=request.form("id") ''Formularparameter-ID abrufen
if id<>"" then ''Wenn es einen Wert gibt, muss dieser zuerst gezählt werden
Surveycount() ''Statistisches Unterprogramm aufrufen
Ende wenn
Ende wenn
wenn id<>"" dann
disp_survey() ''Egal was es ist, das Ergebnis wird am Ende angezeigt
Ende wenn
geschlossenb meine ''Datenbank schließen
''-----Statistische Unterroutine-----
Unterumfrageanzahl()
if session("survey_ok")="" then ''Wenn Sie noch nicht abgestimmt haben
no=request.form("res") ''Antwortnummer abrufen
wenn nein<>"" dann
''Definieren Sie SQL-Anweisungen, um die Anzahl der übermittelten Antworten um 1 zu erhöhen
sql="update Survey_vote set vote_count=vote_count+1 where vote_no= in (" & no &")"
my.execute sql
Ende wenn
session("survey_ok")="ok"
Ende wenn
Ende sub
''------------------
''---Ergebnisunterroutine anzeigen---
sub disp_survey()
''SQL-Anweisungen definieren, um Umfragefragen zu erhalten
sql="wählen Sie Survey_Question aus der Umfrage aus, wobei Survey_id=" & ID
searchtable my,sql,rs ''Abfrage ausführen
question=rs("survey_question") ''Speichern Sie die Frage in Frage
closetable rs ''Tisch schließen
''Definieren Sie die SQL-Anweisung und erhalten Sie die Gesamtzahl der Antworten
sql="wählen Sie sum(vote_count) als Gesamtsumme aus Survey_vote aus, wobei vote_id="& id
durchsuchbare my,sql,rs
total=rs("total")
closetable rs „close table
“ definiert die SQL-Anweisung und ruft alle Antworttextteile und Abstimmungsnummern ab
sql="select vote_answer,vote_count from Survey_vote where vote_id=" & id
searchtable my,sql,rs ''Abfrage ausführen
''Im Folgenden werden Tabellen zur Ausgabe statistischer Tabellen verwendet
%>
<table width="500" border="1" align="center" cellpadding="2" cellspacing="0"
bordercolorligh="#000000" bordercolordark="#ffffff">
<tr>
<td colspan="4" align="center"><b>Umfragestatistiken</b></td>
</tr>
<tr>
<td colspan="4"><b>Umfragefrage: <%=question%></b></td>
</tr>
<tr>
<td width="150" align="center" height="20">Antworten</td>
<td width="150" align="center" height="20">Wahlbeteiligung</td>
<td width="100" align="center" height="20">Proportion</td>
<td width="100" align="center" height="20">Anzahl der Stimmen</td>
</tr>
<%do while not rs.eof
wenn total=0 dann
Prozent=0 ''Wenn niemand abstimmt, ist der Prozentsatz 0
anders
percent=int(rs("vote_count")/total*10000)/100 ''Prozentsatz berechnen
Ende wenn
%>
<tr>
<td width="150" align="center"><%=rs("vote_answer")%></td>
<td width="150" align="left">
<table border="0" width="<%=percent%>" bgcolor="#CCCC00" height="10">
<tr>
<td></td>
</tr>
</table>
</td>
<td width="100" align="center"><%=percent%>%</td>
<td width="100" align="center"><%=rs("vote_count")%></td>
</tr>
<%
rs.movenext
Schleife
%>
<tr>
<td colspan="4"> Es gibt <%=total%> Stimmen zum Stand <%=now()%>
<a href="javascript:window.close()">Fenster schließen</a>
</td>
</tr>
</table>
<%
closetable rs ''Tisch schließen
Ende sub
''------------------
%>
</body>
</html>
Bei der Anzeige der Abstimmung verwenden wir die Sitzungsvariable „survey_ok“, um anzugeben, ob die Stimme abgegeben wurde. Darüber hinaus bezieht sich diese Anzeigestatistik auf CSS-Dateien, um den Stil der Tabelle zu steuern. Sie können sie entsprechend Ihren eigenen Anforderungen hinzufügen.
8. Den Status aller Umfragen auflisten
Lassen Sie uns nun Survey.asp ausfüllen. Seine Hauptaufgabe besteht darin, den Status aller Umfragen aufzulisten, einschließlich:
1. Umfragefragen, verknüpft mit der Abstimmungsformularseite (direkt auf dieser Seite geschrieben)
; Die Startzeit der Umfrage
;
4. Der Status der Umfrage: nicht gestartet, in Bearbeitung, beendet;
6. Die Art der Umfrage
;
7. Geben Sie auch einen Link zum Anzeigen der Abstimmungsergebnisse an
. Fragen Sie einfach die entsprechende Tabelle ab, z. B. zum Abrufen der Gesamtzahl der Stimmen. Die SQL-Anweisungen wurden tatsächlich in Survey_Vote geschrieben
.
asp oben.
Listen Sie den Status aller Umfragen Survey.asp auf
<!--#include file="inc.asp" -->
<html>
<Kopf>
<title>Online-Umfrageliste</title>
<link rel="stylesheet" href="main.css" type="text/css">
</head>
<Körper>
<%
id=request.querystring("id") ''Parameter abrufen
if id<>"" then ''Wenn Parameter vorhanden sind, zeigen Sie dieses Umfrageformular an
Response.write "<SCRIPT Language=''JavaScript'' SRC=''surveycode.asp?id="&id&"''></SCRIPT>"
else '' Andernfalls rufen Sie die Unterroutine auf, um den Status anzuzeigen
disstat()
end if
''-----Status-Unterroutine anzeigen----
sub disstat()
opendb my '' stellt eine Verbindung zur Datenbank her
opentable my,"survey",rs ''Öffnen Sie die Tabelle direkt
''Im Folgenden wird eine Tabelle verwendet, um jeden Datensatz anzuzeigen
''Kopfzeile zuerst anzeigen
%>
<table width="760" border="1" cellpacing="0" cellpadding="2"
align="center" bordercolorligh="#000000" bordercolordark="#ffffff">
<tr>
<td colspan="8" align="center"><b>Online-Umfrageliste</b></td>
</tr>
<tr>
<td width="50" align="center" height="20">Nummer</td>
<td width="200" align="center" height="20">Umfragefragen</td>
<td width="50" align="center" height="20">Typ</td>
<td width="140" align="center" height="20">Startzeit</td>
<td width="140" align="center" height="20">Endzeit</td>
<td width="50" align="center" height="20">Status</td>
<td width="80" align="center" height="20">Anzahl der abgegebenen Stimmen</td>
<td width="50" align="center" height="20">Ansicht</td>
</tr>
<%
''Geben Sie jeden Datensatz unten aus
tun, während nicht rs.eof
„Lesen Sie zuerst jedes Feld.“
id=rs("survey_id")
question=rs("survey_question")
''Typ lesen
if rs("survey_type") dann
stype="Mehrfachauswahl"
anders
stype="Einzelauswahl"
Ende wenn
stime=rs("survey_stime")
etime=rs("survey_etime")
''Urteilsstatus
if now()<stime then
stat="nicht gestartet"
anders
wenn jetzt<etime dann
stat="in Bearbeitung"
anders
stat="Beendet"
Ende wenn
end if
''Definieren Sie die SQL-Anweisung und erhalten Sie die Gesamtzahl der Antworten
sql="wählen Sie sum(vote_count) als Gesamtsumme aus Survey_vote aus, wobei vote_id="& id
durchsuchbare my,sql,tmprs ''Abfrage
total=tmprs("total")
closeable tmprs ''Tisch schließen
''Geben Sie unten einen Datensatz aus
%>
<tr>
<td align="center" height="20"><%=id%></td>
<td height="20">
<a href="survey.asp?id=<%=id%>"><%=question%></a>
</td>
<td align="center" height="20"><%=stype%></td>
<td align="center" height="20"><%=stime%></td>
<td align="center" height="20"><%=etime%></td>
<td align="center" height="20"><%=stat%></td>
<td align="center" height="20"><%=total%></td>
<td align="center" height="20">
<a href="survey_vote.asp?id=<%=id%>" target="_blank">Ansicht</a>
</td>
</tr>
<%
rs.movenext ''Gehe zum nächsten Element, Schleife
Schleife
%>
</table>
<%
closetable rs ''Tisch schließen
closeb my ''Schließe die Datenbank
Ende sub
''--------
%>
</body>
</html>
9. Backend-Verwaltung
Auf der Backend-Verwaltungsseite Survey_manage.asp haben wir bereits die Verwaltungsfunktionen aufgelistet, die damit erreicht werden sollen. Der Verwaltungsprozess besteht darin, zunächst alle Untersuchungen anzuzeigen, die noch nicht begonnen haben. Bei abgeschlossenen Untersuchungen können Sie sie löschen, bei laufenden Untersuchungen können Sie sie jedoch nicht ändern Zeit. Verwenden Sie einen Aktionsparameter, um die Aktion darzustellen. Die Bedeutung ist wie folgt:
1. Keine Parameter. Zeigt die erste Eingabe an, zeigt das Anmeldeformular
an 2, „Anmelden“ bedeutet, die Anmeldung auszuführen
3, „Abmelden“ bedeutet, die Abmeldung auszuführen
4, „showaddquestion“ bedeutet, eine zusätzliche Umfrage anzuzeigen
5, „showsurvey“ bedeutet, eine Umfrage anzuzeigen
6, „doaddsurvey“ bedeutet, auszuführen Das Hinzufügen einer Umfrage
7, doaddanswer bedeutet, eine Antwort hinzuzufügen
8. dodelsurvey bedeutet, eine Umfrage zu löschen
9. dodelanswer bedeutet, eine Antwort zu löschen
10. domodify bedeutet, eine Umfrage und Antwort zu ändern