Analysieren Sie die Abstimmung im ASP Implementation Dig -Programm

Empfohlen: Analysen, wie man unzivilisierte Charaktere filtert
% Funktion badchar (str) badstr = unzivilisierte Zeichenliste, getrennt mit | (Da die Zeichen beim Veröffentlichen nicht enthalten sein können, kann sie nicht veröffentlicht werden.) Badword = split (badstr, |) für i = 0 bis Ubound (Badword) Wenn Instr

ASP macht eine Abstimmung in einem DIG -Programm (einige werden als Top und Schritt bezeichnet). Da der Code lang ist, wird nur der Kernteil veröffentlicht: der Code in der Abstimmung

Die Seite zeigt die Abstimmung:

<div class = votes1> <script src = '/voteresult.asp? id = 1 & action = view'> </script> </div>

Der Effekt ist wie in der Abbildung dargestellt: Klicken Sie dann zur Abstimmung, und die Anzahl der Stimmen steigt um 1, wie in der Abbildung gezeigt:

Voteresult.asp Code

<%

Antwort.ContentType = text/html; charSet = gb2312

'Autor: Wuqing Quelle: Bitte behalten Sie die Quelle beim Nachdruck

'Link -Datenbankcode weggelassen

Setzen Sie rs = server.createObject (adodb.Recordset)

SQL = (SELECT NEWS_ID, VERFAHREN SIE AUS DWWW_NEWS WHERE NEWS_ID = & REFORT (ID) &)

Rs.open SQL, Conn, 1,1

Wenn nicht Rs.Eof und nicht Rs.Bof, prüfen Sie zuerst, ob die ID korrekt ist

Wenn Anfrage (Aktion) = Ansicht dann 'Wenn es sich um die ID aus dem Nachrichtencode handelt

Wenn instr (Request.cookies (VoTID), Anfrage (ID) & |) <> 0, beurteilen Sie, ob die Nachrichten der ID abgestimmt haben

response.write document.write (<div class = 'result' id = 'result_ & rs (news_id) &'> & rs (stimmen) & </div>);

response.write document.write (<span class = 'result_link' id = 'result_link_ & rs (news_id) &'> Stimmen erfolgreich </span>);

anders

response.write document.write (<div class = 'result' id = 'result_ & rs (news_id) &'> <a href = 'javaScript: dovote (& request (id) &)'> & rs (stimmen) & </a> </div>);

response.write document.write (<span class = 'result_link' id = 'result_link_ & rs (news_id) &'> <a href = 'javaScript: dovote (& request (id) &)'> stimmen </a> </span>);

Ende wenn

Ansonsten 'Klicken Sie, um zu stimmen, um Code zu verarbeiten

Wenn instr (Request.cookies (VoTID), Anfrage (ID) & |) <> 0 dann

Response.cookies (votId) = request (id) & |

Antwort.cookies (VoTID) .expires = Date ()+365

anders

Response.cookies (VoTID) = Anfrage (ID) & | & request.cookies (VoTID)

Antwort.cookies (VoTID) .expires = Date ()+365

Ende wenn

Share: ASP ruft Pure IP -Bibliotheksbeispiel auf
% '================================================' Return IP -Informationen disp_ipaddressData (IP, 0) ' ==========================================ieben