Spacing and margin issue

We are trying to get this Permit Report to take up as much space on an 11X17 paper while showing all of the data.  The only way to get it to come close is to print from Internet Explorer at 125% in Print Preview but a Manager wants to see if we can use even more of the paper.  We have tried different table width and center settings along with margins settings in the IE browser and we are getting close.  The code for the whoe report is listed below.  Any assistance offered would be greatly appreciated.

<%@ Register TagPrefix="uc1" TagName="Header" Src="../Header.ascx" %>
<%@ Page Language="vb" AutoEventWireup="false" Codebehind="PermitStatusRpt.aspx.vb" Inherits="SMITHNet.PermitRpt" %>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML >
      <HEAD>
            <title>Permit Status Report</title>            
            <meta name="GENERATOR" content="Microsoft Visual Studio.NET 7.0">
            <meta name="CODE_LANGUAGE" content="Visual Basic 7.0">
            <meta name="vs_defaultClientScript" content="VBScript">
            <meta name="vs_targetSchema" content="http://schemas.microsoft.com/intellisense/ie5">                  
            <style>
                  .tdHeader
                  {
                        font-size:12;
                        font-family:verdana,arial;
                        font-weight:bold;
                        padding:6px;
                  }
                  .tdJobName
                  {
                        font-size:13;
                        color:maroon;
                        font-family:verdana,arial;
                        font-weight:bold;
                        padding:6px;
                  }
                  .tdProjectDesc
                  {
                        font-size:11;
                        color:navy;
                        font-family:verdana,arial;
                        font-weight:bold;
                        padding:6px;
                  }
                  .tdComments
                  {
                        font-size:9;
                        font-family:verdana,arial;
                        font-weight:bold;
                        padding:6px;
                  }      
                  .tdData
                  {
                        font-size:9;
                        font-family:verdana,arial;
                        padding:6px;
                  }                  
            </style>      
      </HEAD>
      <body leftmargin="0" topmargin="0" bgcolor="#FFFFFF">
      <%If sErr <> "" Then%>
            <table width="1152" align="center" cellpadding="0" cellspacing="0">
                  <tr><td><font size="3" color="red"><b>ALERT!</b></font> <%= sErr%></td></tr>
            </table>
      <%End If%>
      <table align="center" width="1224px" height="792px" cellpadding="0" cellspacing="36">
      <tr><td>
            <table width="1152" cellpadding="0" cellspacing="0" border="2">
            <tr><td>
            <table width="1146" cellpadding="0" cellspacing="0" border="0">
                  <tr>
                        <td nowrap height="50" >
                        <%If sPJNameID <> "" Then%>
                              &nbsp;&nbsp;Project:&nbsp;<b><%= sProjectName%></b>
                        <%End If
                        If sProjNum <> "" Then%>
                              &nbsp;&nbsp;&nbsp;&nbsp;Job #:&nbsp;<b><%= sProjNum%></b>
                        <%End If
                        If sPSJobNum <> "" Then%>
                              &nbsp;&nbsp;&nbsp;&nbsp;Job:&nbsp;<b><%= sJobName%></b>
                        <%End If
                        If sProjectDesc <> "" Then%>
                              &nbsp;&nbsp;&nbsp;&nbsp;<b><%= sProjectDesc%></b>
                        <%End If%>
                        </td>                              
                  </tr>
            </table>
            </td></tr></table>
            <%If dtItems.Rows.Count > 0 Then%>
                  <table width="1152" cellpadding="0" cellspacing="0" border="1">
                        <tr>
                              <td width="150" class="tdHeader">Permit Type</td>
                              <td class="tdHeader">Agency</td>
                              <td class="tdHeader">Permittee</td>
                              <td class="tdHeader">Submitted</td>
                              <td class="tdHeader">RAI Rcv'd</td>
                              <td class="tdHeader">RAI Resubmitted</td>
                              <td class="tdHeader">Permit #</td>
                              <td class="tdHeader">Issued</td>
                              <td class="tdHeader">Expires</td>
                              <td class="tdHeader">SMITH
Certified</td>
                              <td class="tdHeader">Full Certification</td>                              
                        </tr>            
                       
                        <%For i = 0 to dtItems.Rows.Count - 1
                              dRow = dtItems.Rows(i)%>
                              <%If sProjectName <> dRow("Project").ToString().Trim() Then                                    
                                    sProjectName = dRow("Project").ToString()
                                    nRowsThisPage += 1%>
                                    <tr>
                                          <td colspan="11" class="tdJobName"><%= sProjectName%></td>
                                    </tr>
                              <%End If%>
                              <%If sProjectDesc <> dRow("ProjectDesc").ToString() Then                                    
                                    sProjectDesc = dRow("ProjectDesc").ToString()
                                    nRowsThisPage += 1%>
                                    <tr>
                                          <td colspan="11" class="tdProjectDesc">&nbsp;&nbsp;&nbsp;&nbsp;<%= sProjectDesc%></td>
                                    </tr>
                              <%End If%>
                              <%nRowsThisPage += 1%>
                              <tr>
                                          <td width="150" class="tdData"><%= GetFldVal(dRow, "PermitType", "S")%></td>
                                          <td class="tdData"><%= GetFldVal(dRow, "Agency", "S")%></td>
                                          <td class="tdData"><%= GetFldVal(dRow, "Permittee", "S")%></td>
                                          <td class="tdData"><%= GetFldVal(dRow, "Submitted", "D")%></td>
                                          <td class="tdData"><%= GetFldVal(dRow, "RAIReceived", "D")%></td>
                                          <td class="tdData"><%= GetFldVal(dRow, "RAIResubmitted", "D")%></td>
                                          <td class="tdData"><%= GetFldVal(dRow, "PermitNum", "S")%></td>
                                          <td class="tdData"><%= GetFldVal(dRow, "Issued", "D")%></td>
                                          <td class="tdData"><%= GetFldVal(dRow, "Expires", "D")%></td>
                                          <td align="center" class="tdData"><%= GetFldVal(dRow, "SMITHCertified", "D")%></td>
                                          <td align="center" class="tdData"><%= GetFldVal(dRow, "FullCert", "D")%></td>                                                                        
                              </tr>
                              <%If sCustCopy <> "1" Then%>
                                    <%sNotes = dRow("Notes").ToString()
                                    If sNotes <> "" Then
                                          nRowsThisPage += 1%>
                                          <tr>
                                                <td width="150" valign="top" class="tdComments">Submittal Comments:</td>
                                                <td colspan="10" class="tdData"><%= sNotes%></td>
                                          </tr>
                                    <%End If%>
                                    <%sNotes = dRow("CertNotes").ToString()
                                    If sNotes <> "" Then
                                          nRowsThisPage += 1%>
                                          <tr>
                                                <td width="150" valign="top" class="tdComments">Certification Comments:</td>
                                                <td colspan="10" class="tdData"><%= sNotes%></td>
                                          </tr>
                                    <%End If%>
                                    <%sNotes = dRow("Comments").ToString()
                                    If sNotes <> "" Then
                                          nRowsThisPage += 1%>
                                          <tr>
                                                <td width="150" valign="top" class="tdComments">Expiration Comments:</td>
                                                <td colspan="10" class="tdData"><%= sNotes%></td>
                                          </tr>
                                    <%End If%>
                                    <tr  height="1"><td colspan="11" height="1" background="images/GrayPixel.jpg" ><img src="images/Spacer.gif" border="0"></td></tr>
                              <%End If%>
                              <%If nRowsThisPage >= nRowsPerPage  Then
                                    nRowsThisPage = 0%>                              
                                          </table><p style="page-break-before: always">&nbsp;</p><table width="1152" cellpadding="0" cellspacing="0" border="1">                                          
                                          <tr>
                                                <td width="150" class="tdHeader" height="50">Permit Type</td>
                                                <td class="tdHeader">Agency</td>
                                                <td class="tdHeader">Permittee</td>
                                                <td class="tdHeader">Submitted</td>
                                                <td class="tdHeader">RAI Rcv'd</td>
                                                <td class="tdHeader">RAI Resubmitted</td>
                                                <td class="tdHeader">Permit #</td>
                                                <td class="tdHeader">Issued</td>
                                                <td class="tdHeader">Expires</td>
                                                <td class="tdHeader">SMITH Certified</td>
                                                <td class="tdHeader">Full Certification</td>                                                
                                          </tr>                                                
                              <%End If                              
                        Next%>
                        </table>
                  <%Else%>
                        <table width="1152" cellpadding="0" cellspacing="0" border="2">
                              <tr><td class="tdHeader">No records were found.</td></tr>
                        </table>
                  <%End If%>
            </table>
      </td></tr>            
      </table>      
      </body>
</HTML>
regsampAsked:
Who is Participating?
I wear a lot of hats...

"The solutions and answers provided on Experts Exchange have been extremely helpful to me over the last few years. I wear a lot of hats - Developer, Database Administrator, Help Desk, etc., so I know a lot of things but not a lot about one thing. Experts Exchange gives me answers from people who do know a lot about one thing, in a easy to use platform." -Todd S.

NickVdCommented:
If you need accuracy on screen -- css can help. If you need accuracy on paper -- pdf is king.

I would generate the report using a pdf library for the language you are using, or you could use one of the many html2pdf converters that are available.  It will be MUCH easier to control the print output using PDF as opposed to HTML/CSS
0

Experts Exchange Solution brought to you by

Your issues matter to us.

Facing a tech roadblock? Get the help and guidance you need from experienced professionals who care. Ask your question anytime, anywhere, with no hassle.

Start your 7-day free trial
regsampAuthor Commented:
NickVD, an converter is a good idea but a deadline is almost up and just trying to go through this page and see if anyway just to work with the coding and browser to get it as large and readable on 11x17.  In the long run though it seems the way to go.  
0
regsampAuthor Commented:
I got what I needed by mainly just trial and error with the margins and the report looks good but since you responded NickVD and I liked the idea about a converter, I am giving you the points.  
0
NickVdCommented:
Thank you very much, I appreciate it :)

If you need any further help, you know where to find me :)
0
It's more than this solution.Get answers and train to solve all your tech problems - anytime, anywhere.Try it for free Edge Out The Competitionfor your dream job with proven skills and certifications.Get started today Stand Outas the employee with proven skills.Start learning today for free Move Your Career Forwardwith certification training in the latest technologies.Start your trial today
.NET Programming

From novice to tech pro — start learning today.