473,473 Members | 1,895 Online
Bytes | Software Development & Data Engineering Community
Create Post

Home Posts Topics Members FAQ

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

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
%>
Jul 19 '05 #1
3 1783
It's caused by the link and all the <font> tags. Have you considered using
CSS?

--
http://www.aspfaq.com/
(Reverse address to reply.)


"ZZZupan" <no****@ascendhosting.com> wrote in message
news:33**************************@posting.google.c om...
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("New
sStandNo"))%>"><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("Tex
t"))%>&nbsp;<A HREF="http://www.news.navy.mil/Search/display.asp?Story_id=<%=Trim(NLRs("New
sStandNo"))%>"><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("New
sStandNo"))%>"><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("Tex
t"))%>&nbsp;<A HREF="http://www.news.navy.mil/Search/display.asp?Story_id=<%=Trim(NRRs("New
sStandNo"))%>"><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
%>

Jul 19 '05 #2
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.

--
Mark Schupp
Head of Development
Integrity eLearning
www.ielearning.com
"ZZZupan" <no****@ascendhosting.com> wrote in message
news:33**************************@posting.google.c om...
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("New
sStandNo"))%>"><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("Tex
t"))%>&nbsp;<A HREF="http://www.news.navy.mil/Search/display.asp?Story_id=<%=Trim(NLRs("New
sStandNo"))%>"><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("New
sStandNo"))%>"><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("Tex
t"))%>&nbsp;<A HREF="http://www.news.navy.mil/Search/display.asp?Story_id=<%=Trim(NRRs("New
sStandNo"))%>"><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
%>

Jul 19 '05 #3
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

"Aaron [SQL Server MVP]" <te*****@dnartreb.noraa> wrote in message news:<Oc**************@TK2MSFTNGP15.phx.gbl>...
It's caused by the link and all the <font> tags. Have you considered using
CSS?

--
http://www.aspfaq.com/
(Reverse address to reply.)


"ZZZupan" <no****@ascendhosting.com> wrote in message
news:33**************************@posting.google.c om...
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("New
sStandNo"))%>"><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("Tex
t"))%>&nbsp;<A

HREF="http://www.news.navy.mil/Search/display.asp?Story_id=<%=Trim(NLRs("New
sStandNo"))%>"><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("New
sStandNo"))%>"><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("Tex
t"))%>&nbsp;<A

HREF="http://www.news.navy.mil/Search/display.asp?Story_id=<%=Trim(NRRs("New
sStandNo"))%>"><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
%>

Jul 19 '05 #4

This thread has been closed and replies have been disabled. Please start a new discussion.

Similar topics

6
by: Jonathan | last post by:
I want to save textarea contents to a mysql database with the paragraph breaks intact without having to type paragraph or break tags in HTML. How can I do that. So far, although it occurs naturally...
3
by: Andrew Tang | last post by:
Hi. I'm having problems with the following code. The last line seems to be in the wrong place, its been moved down slightly by about 3 pixels in IE6. <html> <head> <title>Lorem Ipsum</title>...
7
by: Zhang Weiwu | last post by:
Hello. This is problem puzzled me a long time. I wish to organize some block elements and let them flow one after each other like text. Think about a album, I wish the album have 12 thumbnails,...
2
by: Andrey Tarasevich | last post by:
Hello Consider the following HTML code sketch <div> <img src="..." style="float: left"> <p>Paragraph text</p> </div> <hr>
6
by: Edd Dawson | last post by:
Hi. I have a strange problem involving the passing of command line arguments to a C program I'm writing. I tried posting this in comp.programming yesterday but someone kindly suggested that I'd...
4
by: Charles Erwin | last post by:
Is there any way, upon scanning in a file line by line to avoid missing the last line if there is not a newline character (aka you have to hit return on the last line of input in your file). I was...
2
by: michael | last post by:
On my ASP.NET pages, it seems that _after_ any web or user control - an extra (small) line break or space is inserted automatically right after the Control. This is unwanted since it messes up...
17
by: Randy Webb | last post by:
I know that the /g flag will match all occurrences. Is there a way, with a Regular Expression, to match all occurrences *except* the last one? pattern = /df/g; var myString = "asdfasdfasdfasdf";...
7
by: questionz_99 | last post by:
I've created a style sheet with three columns contained in a fixed-width box. The columns are all relative position, percentage widths. (I wanted to avoid the fixed-width columns in the "Holy...
0
marktang
by: marktang | last post by:
ONU (Optical Network Unit) is one of the key components for providing high-speed Internet services. Its primary function is to act as an endpoint device located at the user's premises. However,...
0
Oralloy
by: Oralloy | last post by:
Hello folks, I am unable to find appropriate documentation on the type promotion of bit-fields when using the generalised comparison operator "<=>". The problem is that using the GNU compilers,...
0
jinu1996
by: jinu1996 | last post by:
In today's digital age, having a compelling online presence is paramount for businesses aiming to thrive in a competitive landscape. At the heart of this digital strategy lies an intricately woven...
1
by: Hystou | last post by:
Overview: Windows 11 and 10 have less user interface control over operating system update behaviour than previous versions of Windows. In Windows 11 and 10, there is no way to turn off the Windows...
0
agi2029
by: agi2029 | last post by:
Let's talk about the concept of autonomous AI software engineers and no-code agents. These AIs are designed to manage the entire lifecycle of a software development project—planning, coding, testing,...
1
isladogs
by: isladogs | last post by:
The next Access Europe User Group meeting will be on Wednesday 1 May 2024 starting at 18:00 UK time (6PM UTC+1) and finishing by 19:30 (7.30PM). In this session, we are pleased to welcome a new...
0
by: TSSRALBI | last post by:
Hello I'm a network technician in training and I need your help. I am currently learning how to create and manage the different types of VPNs and I have a question about LAN-to-LAN VPNs. The...
0
by: adsilva | last post by:
A Windows Forms form does not have the event Unload, like VB6. What one acts like?
0
by: 6302768590 | last post by:
Hai team i want code for transfer the data from one system to another through IP address by using C# our system has to for every 5mins then we have to update the data what the data is updated ...

By using Bytes.com and it's services, you agree to our Privacy Policy and Terms of Use.

To disable or enable advertisements and analytics tracking please visit the manage ads & tracking page.