Count Lines in Pages

Contents of Page: nameUpdate.asp Number of Lines: 22 Last Modified: 3/20/2019 7:34:31 AM
0001: <% @Language = "VBScript" %>
0002: 
0003: <!-- #include FILE="include/adovbs.inc" -->
0004: <!-- #include FILE="include/constants.inc" -->
0005: 
0006: <%
0007: 	entryName = Request.Form("EntryName")
0008: 	picksid = Request.Form("PicksID")
0009: 	user  = Request.Cookies("user")
0010: 
0011: 
0012: 	Set rs = Server.CreateObject("ADODB.Recordset")
0013: 	sqlString = "SELECT * FROM mmPicks " & _
0014: 							"WHERE ID = " & picksid
0015: 	rs.Open sqlString, conn, adOpenDynamic, adLockOptimistic, adCmdText
0016: 	rs("EntryName").Value = entryName
0017: 	rs.Update
0018: 	rs.Close
0019: 	Set rs = Nothing
0020: 	
0021: 	Response.Redirect("picks.asp")
0022: %>