<%@ LANGUAGE="VBSCRIPT" %> <% PageStrings = "14, 119, 120, 466, 697, 1133" %> <% '=============================================== ' CactuShop ASP Shopping Cart ' ©1999-2004 Cactusoft Ltd. www.cactusoft.com '=============================================== ' All rights reserved. ' Use of this code is covered by the terms and ' conditions in the license agreement. No ' unauthorized duplication or distribution is ' permitted. Cactusoft's copyright notices must ' remain in the ASP sections of the code. '=============================================== Call ReadFromTemplate(strTemplateLocation, aryPageTemplate, strBasketHTML, strCategoryListHTML) response.write(aryPageTemplate(0)) %>

<% WriteString("PageTitle_MailingList") %>
<% WriteString("ContentText_MailingList") %>
<% WriteString("FormLabel_EmailAddress") %>:
<% WriteString("ContentText_HTMLEmail") %>
	" id="Submit1">
<% WriteString("ContentText_RemoveAnAddress") %>

<% '----------------------------------------------- 'WRITE LAST HALF OF PAGE HTML '----------------------------------------------- response.write(aryPageTemplate(1)) '----------------------------------------------- 'CLOSE DATA CONNECTIONS '----------------------------------------------- objDataConn.Close set objDataConn = nothing %>