%@LANGUAGE="VBSCRIPT"%> <% Dim rsValidate__MMColParam rsValidate__MMColParam = "1" If (Request.Form("password") <> "") Then rsValidate__MMColParam = Request.Form("password") End If %> <% Dim rsValidate__varPassword rsValidate__varPassword = "1" If (Session("password") <> "") Then rsValidate__varPassword = Session("password") End If %> <% Dim rsValidate Dim rsValidate_numRows Set rsValidate = Server.CreateObject("ADODB.Recordset") rsValidate.ActiveConnection = MM_connNWR_STRING rsValidate.Source = "SELECT * FROM products WHERE password = '" + Replace(rsValidate__MMColParam, "'", "''") + "' or password = '" + Replace(rsValidate__varPassword, "'", "''") + "'" rsValidate.CursorType = 0 rsValidate.CursorLocation = 2 rsValidate.LockType = 1 rsValidate.Open() rsValidate_numRows = 0 %>
This resource is password protected. |
|||||||||||||||||
You will need Adobe's free Acrobat Reader to view/print this file.
Table of Contents
|
|||||||||||||||||