<%@LANGUAGE="VBSCRIPT"%> <% Dim RsAllAnn__MMColParam RsAllAnn__MMColParam = "All Employees Announcements" If (Request("MM_EmptyValue") <> "") Then RsAllAnn__MMColParam = Request("MM_EmptyValue") End If %> <% Dim RsAllAnn__MMColParam1 RsAllAnn__MMColParam1 = "1" If (Date() <> "") Then RsAllAnn__MMColParam1 = Date() End If %> <% Dim RsAllAnn Dim RsAllAnn_numRows Set RsAllAnn = Server.CreateObject("ADODB.Recordset") RsAllAnn.ActiveConnection = MM_portal_STRING RsAllAnn.Source = "SELECT dbo.UserData.nvarchar1, dbo.UserData.tp_modified, dbo.UserData.datetime1,dbo.UserData.tp_id FROM dbo.Lists, dbo.UserData WHERE dbo.Lists.tp_Title LIKE '%" + Replace(RsAllAnn__MMColParam, "'", "''") + "%' And dbo.UserData.tp_ListId = dbo.Lists.tp_ID And dbo.UserData.datetime1 > '" + Replace(RsAllAnn__MMColParam1, "'", "''") + "' ORDER BY dbo.UserData.tp_modified Desc" RsAllAnn.CursorType = 0 RsAllAnn.CursorLocation = 2 RsAllAnn.LockType = 1 RsAllAnn.Open() RsAllAnn_numRows = 0 %> <% Dim Repeat1__numRows Dim Repeat1__index Repeat1__numRows = -1 Repeat1__index = 0 RsAllAnn_numRows = RsAllAnn_numRows + Repeat1__numRows %> SMCCCD Portal - Home
 
Logo
spacer
Home Banner Downloads Resources WebSMART

FAQ Page Here

 

 
 
Copyright 2006 © San Mateo County Community College District. All rights reserved.
Questions? Contact the Webmaster

 

 

 
<% RsAllAnn.Close() Set RsAllAnn = Nothing %>