<%@ language=JavaScript %> <% //these variable set the access needed for the page var required_login = "false"; //'true' or 'false' var required_status = "user"; //'user' or 'admin' var asp_dir = "asp/"; //state where asp folder is in relation to this one %> PsionStyle
| :reviews: | :bits: | :wallpapers: | :about: | :links: | :site map: | :guest book: | :home: |

/ Home / The Survey

<% if (String(Request("action")) == "log_vote"){ sql = "SELECT * from survey_table WHERE uID=" + String(Request("uid")); rs = Server.CreateObject("ADODB.RecordSet"); rs.Open (sql, Conn, 2,3); var survey_responses = String(rs.Fields.item("survey_responses")); survey_array = survey_responses.split("|"); var num = new Number(survey_array[Request("surveyradio")]); num++; survey_array[Request("surveyradio")] = num; survey_responses = ""; for (i = 0; i < survey_array.length; i++){ if (i!=0) {survey_responses += "|"} survey_responses += survey_array[i]; } sql = "UPDATE survey_table SET survey_responses='" + survey_responses + "' WHERE uid=" + String(Request("uid")); Conn.Execute(sql); Response.Write("Thanks you for participating! Here are the current results:"); rs.Close (); //Close previews set } //Now write the results out sql = "SELECT * from survey_table ORDER BY survey_date DESC" rs = Server.CreateObject("ADODB.RecordSet"); rs.Open (sql, Conn, 2,3); if (rs.EOF){ Response.Write("
There's no questionnaire at the moment. Pop back later.
"); } else{ var survey_question = String(rs.Fields.item("survey_question")); var survey_answers = String(rs.Fields.item("survey_answers")); var survey_responses = String(rs.Fields.item("survey_responses")); Response.Write("

Current Survey

"); %> <% answer_array = survey_answers.split("|"); responses_array = survey_responses.split("|"); for (i = 0; i < answer_array.length; i++){ %> <% } //end while %>
Question : <%= survey_question %>
<%= answer_array[i] %> : <%= responses_array[i] %>
<% rs.Move(1); } //close else if (! rs.EOF) { Response.Write("

Past Surveys

"); } while (! rs.EOF) { var survey_question = String(rs.Fields.item("survey_question")); var survey_answers = String(rs.Fields.item("survey_answers")); var survey_responses = String(rs.Fields.item("survey_responses")); %> <% answer_array = survey_answers.split("|"); responses_array = survey_responses.split("|"); for (i = 0; i < answer_array.length; i++){ %> <% } //end while %>
Question : <%= survey_question %>
<%= answer_array[i] %> : <%= responses_array[i] %>

<% rs.Move(1); } rs.Close (); %>

:top:
Location :
© Michael Rhodes and Jason Morley 2000.
We're not associated with Psion in any way, shape or form.
In fact, they've probably never heard of us. Just so you know.
<% if (logged_in == "True") { Response.Write("You are logged in as " + current_user + ""); if (user_status == "useradmin"){ %> Admin Home <% } %> | Logout <% } %>

<% Conn.Close (); %>