<% Function recordAnswer(iQuestion,sAnswer,iYesNo,connection) //Create the SQL command to record the answer sCommand = "INSERT INTO Answers " _ & "(QuizID,Question,Answer,Judgment) VALUES(" _ & Request.Cookies("QuizID") _ & ", " & iQuestion _ & ", '" & sAnswer & "', " _ & iYesNo & ")" //Issue the command connection.Execute(sCommand) //Check for Errors if (connection.errors.count > 0) then Response.Write("recordAnswer connection error...") end if End Function %>