% dim objSecure set objSecure = server.createobject("inetsolution.secure") 'CODE TO PULL BACK NEWS ARTICLE FOR BOTTOM OF PAGE. IF WE EVER REMOVE THIS FUNCTION, THEN DELETE THIS CODE 'NEED TO CHECK PUBLISHED STATUS TO MAKE SURE THAT THE ARTICLE IS NOT A DRAFT dim strHeadline dim strTeaserText dim strArticleID dim objRS1 dim strSQL1 'set objSecure = server.createobject("InetSolution.Secure") set objRS1 = server.CreateObject("ADODB.RecordSet") strSQL1 = "select TOP 1 REF,HEADLINE,TEASER,INSERTDATE,PUBLISHDATE from NEWSARTICLES where PUBLISHED <> '0' order by INSERTDATE DESC" objRS1.Open strSQL1,objSecure.Conn, adOpenForwardOnly,adLockReadOnly,adCmdText strHeadline = objRS1("HEADLINE") strTeaserText = objRS1("TEASER") strArticleID = objRS1("REF") objRS1.Close %>
With the launch of our new web site, we are introducing the ability to apply for group or individual insurance coverage online. Choose an application type below to get started:

© Copyright 2005 John J. Boyd & Associates, Inc. All rights reserved. Privacy Policy Developed by InetSolution, Inc.