Last line in paragraph has extra space - cannot get rid of it

Z

ZZZupan

http://www.naveur.navy.mil/default_test.asp
I have tried with some success reorganizing the code and putting it
all on one line. However for some reason I cannot get rid of the
space on the last line.

<!--#INCLUDE FILE="include.htm" -->
<%
' Get News Table Left Info
Dim NLConn
Set NLConn = server.CreateObject("ADODB.Connection")
NLConn.open ConnectionString
NLSQL = "SELECT * FROM tblNews Where Side Like 'Left' ORDER BY
ArticleDate DESC"
Set NLRs = NLConn.Execute(NLSQL)
' Get News Table Right Info
Dim NRConn
Set NRConn = server.CreateObject("ADODB.Connection")
NRConn.open ConnectionString
NRSQL = "SELECT * FROM tblNews Where Side Like 'Right' ORDER BY
ArticleDate DESC"
Set NRRs = NRConn.Execute(NRSQL)

%>

<TABLE BORDER="0" CELLPADDING="5" CELLSPACING="0" Width="559"
background="Images/News_Line.gif">
<TR>
<TD width="50%" valign="Top">

<TABLE Width="100%" Cellpadding="5" Cellspacing="0" Border="0">
<%Do While Not NLRs.EOF%>
<TR>
<TD>
<A HREF="http://www.news.navy.mil/Search/display.asp?Story_id=<%=Trim(NLRs("NewsStandNo"))%>"><Font
Face="Arial, Verdana" Size="2"
Color="Black"><B><%=Trim(NLRs("Title"))%></A></B></Font><BR><Font
Face="Verdana" Size="1"
Color="Black"><B><%=Trim(NLRs("ByLine"))%>&nbsp;</B></Font><%=Trim(NLRs("Text"))%>&nbsp;<A
HREF="http://www.news.navy.mil/Search/display.asp?Story_id=<%=Trim(NLRs("NewsStandNo"))%>"><Font
Face="Arial" Size="1" Color="Blue">>>></A>
</TD>
</TR>
<%NLRs.MoveNext%><%Loop%>
</TABLE>
</TD>
<TD width="50%" valign="Top">
<TABLE Width="100%" Cellpadding="5" Cellspacing="0" Border="0">
<%Do While Not NRRs.EOF%>
<TR>
<TD>
<A HREF="http://www.news.navy.mil/Search/display.asp?Story_id=<%=Trim(NRRs("NewsStandNo"))%>"><Font
Face="Arial, Verdana" Size="2"
Color="Black"><B><%=Trim(NRRs("Title"))%></A></B></Font><BR><Font
Face="Verdana" Size="1"
Color="Black"><B><%=Trim(NRRs("ByLine"))%>&nbsp;</B></Font><%=Trim(NRRs("Text"))%>&nbsp;<A
HREF="http://www.news.navy.mil/Search/display.asp?Story_id=<%=Trim(NRRs("NewsStandNo"))%>"><Font
Face="Arial" Size="1" Color="Blue">>>></A>
</TR>
</TR>
<%NRRs.MoveNext%><%Loop%>
</TABLE>
</TD>
</TR>
</TABLE>
<CENTER><FOnt Face="Arial" Size="2" Color="Black">
For more US Navy news around Europe, visit our <A
HREF="http://www.news.navy.mil/local/naveur/" TARGET="_BLANK">Navy
Newsstand</A>
</Font></CENTER>
<%
'Clean Up NL
NLRs.Close
NLConn.Close
Set NLRS = Nothing
Set NLConn = Nothing
'Clean Up NR
NRRs.Close
NRConn.Close
Set NRRS = Nothing
Set NRConn = Nothing
%>
 
A

Aaron [SQL Server MVP]

It's caused by the link and all the <font> tags. Have you considered using
CSS?
 
M

Mark Schupp

The blank after the text block is using the default font size (since all
FONT tags are closed).
Put the last font tag before the &nbsp;

Color="Black"><B><%=Trim(NRRs("ByLine"))%>&nbsp;</B></Font><%=Trim(NRRs("Tex
t"))%>&nbsp;<Font Face="Arial" Size="1" Color="Blue">>>></A>
<A
HREF="http://www.news.navy.mil/Search/display.asp?Story_id=<%=Trim(NRRs("New
sStandNo"))%>">

You may want to review the text entry process as well. There appear to be a
lot of FONT tags scattered through the text from the database.
 
Z

ZZZupan

Thanks to both or you for your help.
I am just assisting the webmaster here but will pass your comments about CSS to him.
Thanks,
Frank
aka Master Chief Zupan
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Members online

No members online now.

Forum statistics

Threads
473,766
Messages
2,569,569
Members
45,042
Latest member
icassiem

Latest Threads

Top