<%@LANGUAGE="VBSCRIPT"%>
<%
Dim rsNewsletters__MMColParam
rsNewsletters__MMColParam = "1"
if (Request.QueryString("NewsletterID") <> "") then rsNewsletters__MMColParam = Request.QueryString("NewsletterID")
%>
<%
set rsNewsletters = Server.CreateObject("ADODB.Recordset")
rsNewsletters.ActiveConnection = MM_connCMS_STRING
rsNewsletters.Source = "SELECT * FROM Newsletters WHERE NewsletterID = " + Replace(rsNewsletters__MMColParam, "'", "''") + ""
rsNewsletters.CursorType = 0
rsNewsletters.CursorLocation = 2
rsNewsletters.LockType = 3
rsNewsletters.Open()
rsNewsletters_numRows = 0
%>
South West Machinery Ring
<%
rsNewsletters.Close()
%>
