%@LANGUAGE="VBSCRIPT"%> <% If (CStr(Request("MM_vote")) = "Yes") Then MM_editConnection = MM_arrab6e_STRING MM_editColumn = (CStr(Request("email"))) MM_editQuery = "UPDATE Board_2006 SET [Voted]='Yes', [President]='" & (CStr(Request("Candidate"))) & "' WHERE [email]='" & MM_editColumn & "';" Set MM_editCmd = Server.CreateObject("ADODB.Command") MM_editCmd.ActiveConnection = MM_editConnection MM_editCmd.CommandText = MM_editQuery MM_editCmd.Execute MM_editCmd.ActiveConnection.Close End If %>
![]() |
|||||
|
|
|
||||