<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
<%
dim sDate
dim sTitle
dim cnContent
dim rsArticle
on error resume next
sDate = GetToday
Set cnContent = Server.CreateObject("ADODB.Connection")
cnContent.open MM_Content_ConnectionString
if err.number <> 0 then response.Redirect c_SQLServerDownPage
Set rsArticle = Server.CreateObject("ADODB.Recordset")
Set rsArticle = GetSermonsArchives(sDate, cnContent)
%>
Lutheran Hour Ministries - The Lutheran HourLutheran Hour Ministries
Resources for Your Church to Advertise The Lutheran Hour
