<% ' Name: News ' Author: Ben Padilla ' File: News.asp ' Created: 03.20.2003 ' Changes: 03.20.2003 MBP Created. %> <% Dim reqID Dim intToggle reqID = CInt(Request("ID")) If (reqID = 0) Then strSQL = " SELECT tblPressRelease.* " & _ " FROM tblPressRelease " & _ " WHERE (Publish = 1) AND " & _ " (Now() BETWEEN ActivationDate AND TerminationDate) " & _ "ORDER BY tblPressRelease.Date DESC" Else strSQL = " SELECT tblPressRelease.* " & _ " FROM tblPressRelease " & _ " WHERE (PressReleaseID = " & reqID & ") " End If Call ReadyADOObjects() objRS.Open strSQL, objConnection, adOpenStatic, adLockOptimistic %> TCOVE ROP

New Press Releases Coming Soon!


© Copyright 2003 TCOVE ROP. All rights reserved.
Design and development by
Vantage Technology Group, Inc.