怎么排版?

naomi77 2002-09-17 11:54:40
请看下面的代码：
<%@ Language=VBScript %>
<%set cn=server.CreateObject("adodb.connection")
strcn="provider=sqloledb;user id=sa;password=;initial catalog=yqz;data source=ct-rock"
cn.Open strcn
set rst=server.CreateObject("adodb.recordset")
strrst="select * from data"
rst.Open strrst,cn,3,3
%>
<HTML>
<HEAD>
<META NAME="GENERATOR" Content="Microsoft Visual Studio 6.0">
</HEAD>
<BODY bgcolor="#FFFFCC">
<h1><b><font face="华文新魏"><%=date%>油气站0#柴油、90#汽油、93#汽油和液化气销量情况表</font></b></h1>
<table border="1" bgcolor="#CC99FF" bordercolor="#FFFFFF" width="223">
<tr>
<td width=222 bgcolor="#999999"> </td>
<%do while not rst.EOF%>
<td width=55><%=rst.Fields(0)%></td>
<%rst.MoveNext%>
<%loop%>
<%rst.MoveFirst%>
</tr>
<tr>
<td width=222 bgcolor="#999999"><b>0#柴油销量(升)</b></td>
<%do while not rst.EOF%>
<td width=55><%=rst.Fields(1)%></td>
<%rst.MoveNext%>
<%loop%>
<%rst.MoveFirst%>
</tr>
<tr>
<td width=222 bgcolor="#999999"><b>90#汽油销量(升)</b></td>
<%do while not rst.EOF%>
<td width=55><%=rst.Fields(2)%></td>
<%rst.MoveNext%>
<%loop%>
<%rst.MoveFirst%>
</tr>
<tr>
<td width=222 bgcolor="#999999"><b>93#汽油销量(升)</b></td>
<%do while not rst.EOF%>
<td width=55><%=rst.Fields(3)%></td>
<%rst.MoveNext%>
<%loop%>
<%rst.MoveFirst%>
</tr>
<tr>
<td width=222 bgcolor="#999999"><b>液化气销量(升)</b></td>
<%do while not rst.EOF%>
<td width=55><%=rst.Fields(4)%></td>
<%rst.MoveNext%>
<%loop%>
<%rst.MoveFirst%>
</tr>
<tr>
<td width=222 bgcolor="#999999"><b>总销量(升)</b></td>
<%do while not rst.EOF%>
<td width=55><%=rst.Fields(5)%></td>
<%rst.MoveNext%>
<%loop%>
<%rst.MoveFirst%>
</tr>
<tr>
<td width=222 bgcolor="#999999"><b>洗车收入（元）</b></td>
<%do while not rst.EOF%>
<td width=55><%=rst.Fields(6)%></td>
<%rst.MoveNext%>
<%loop%>
<%rst.MoveFirst%>
</tr>
</table>
<%cn.Close
%>
<form name="form1" method="post" action="yqz_cal.asp">
<p>0#柴油销量(升)
<input type="text" name="caiyou" size="6">
90#汽油销量(升)
<input type="text" name="qiyou90" size="6">
93#汽油销量(升)
<input type="text" name="qiyou93" size="6">
</p>
<p>液化气销量(升)
<input type="text" name="yehuaqi" size="6">
洗车收入（元）
<input type="text" name="xiche" size="6">
今天几号？
<input type="text" name="riqi" size="3">
</p>
<p align="center">
<input type="submit" name="Submit" value="确定">
<input type="reset" name="Submit2" value="重输">
</p>
</form>
<p> </p>
</BODY>
</HTML>
有2个问题：
1）标题没有居中显示
2）第1列字段的宽度不是程序中定的130，而只是50左右。如果程序中把数值定为200多，还是如此。此情况发生在当数据库记录较多时，而当记录只有2，3个是，width是130。
...全文
138 12 打赏 收藏 转发到动态 举报
写回复
用AI写文章
12 条回复
切换为时间正序
请发表友善的回复…
发表回复
naomi77 2002-09-17
  • 打赏
  • 举报
 回复
首先谢谢千年精灵的帮助
No.1 我也试过像这样的代码，但这样居中只是相对于整个屏幕居中，而列有32列，远远超出屏幕的宽度。这样这些文字不但集中在整个页面的左边，而且由于写不下，要分2行显示。
No.2 拷贝了你的代码，好像没有达到效果。我的目的是能把第一列的列宽放大一点，使第一列的文字能在一行内显示
naomi77 2002-09-17
  • 打赏
  • 举报
 回复
服务器已损坏的理解错了，我希望把单元格的第一列定的大一点，但实际情况是当列数较多时，第一列的列宽会变小
iStringTheory 2002-09-17
  • 打赏
  • 举报
 回复
no.1
----
<div align="center"><h1><b><font face="华文新魏"><%=date%>油气站0#柴油、90#汽油、93#汽油和液化气销量情况表</font></b></h1></div>

no.2
----
<table border="1" bgcolor="#CC99FF" bordercolor="#FFFFFF">
<tr>
<td width=222 bgcolor="#999999"> </td>
<%do while not rst.EOF%>
<td width=130><%=rst.Fields(0)%></td>
<%rst.MoveNext%>
<%loop%>
<%rst.MoveFirst%>
</tr>
<tr>
<td width=222 bgcolor="#999999"><b>0#柴油销量(升)</b></td>
<%do while not rst.EOF%>
<td width=130><%=rst.Fields(1)%></td>
<%rst.MoveNext%>
<%loop%>
<%rst.MoveFirst%>
</tr>
<tr>
<td width=222 bgcolor="#999999"><b>90#汽油销量(升)</b></td>
<%do while not rst.EOF%>
<td width=130><%=rst.Fields(2)%></td>
<%rst.MoveNext%>
<%loop%>
<%rst.MoveFirst%>
</tr>
<tr>
<td width=222 bgcolor="#999999"><b>93#汽油销量(升)</b></td>
<%do while not rst.EOF%>
<td width=130><%=rst.Fields(3)%></td>
<%rst.MoveNext%>
<%loop%>
<%rst.MoveFirst%>
</tr>
<tr>
<td width=222 bgcolor="#999999"><b>液化气销量(升)</b></td>
<%do while not rst.EOF%>
<td width=130><%=rst.Fields(4)%></td>
<%rst.MoveNext%>
<%loop%>
<%rst.MoveFirst%>
</tr>
<tr>
<td width=222 bgcolor="#999999"><b>总销量(升)</b></td>
<%do while not rst.EOF%>
<td width=130><%=rst.Fields(5)%></td>
<%rst.MoveNext%>
<%loop%>
<%rst.MoveFirst%>
</tr>
<tr>
<td width=222 bgcolor="#999999"><b>洗车收入（元）</b></td>
<%do while not rst.EOF%>
<td width=130><%=rst.Fields(6)%></td>
<%rst.MoveNext%>
<%loop%>
<%rst.MoveFirst%>
</tr>
</table>
yonghengdizhen 2002-09-17
  • 打赏
  • 举报
 回复
因为你显示记录的单元格上定了宽度..
总是以同列中最大宽度为宽度
sunxiaoli 2002-09-17
  • 打赏
  • 举报
 回复
设计界面用DreamweaverMX
可以轻松搞定
claudia 2002-09-17
  • 打赏
  • 举报
 回复
试试下面的：只是在标题中加了<p>.......</p>
<p>
<h1><b><font face="华文新魏"><%=date%>油气站0#柴油、90#汽油、93#汽油和液化气销量情况表</font></b></h1>
</p>
iStringTheory 2002-09-17
  • 打赏
  • 举报
 回复
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td align="center">油气站0#柴油、90#汽油、93#汽油和液化气销量情况表</td>
</tr>
<tr>
<td> </td>
</tr>
<tr>
<td><table width="100%" border="1" bordercolor="#FFFFFF" bgcolor="#CC99FF">
<tr>
<td width=25% nowrap bgcolor="#999999"> </td>
<%do while not rst.EOF%>
<td><%=rst.Fields(0)%></td>
<%rst.MoveNext%>
<%loop%>
<%rst.MoveFirst%>
</tr>
<tr>
<td width=25% nowrap bgcolor="#999999"><b>0#柴油销量(升)</b></td>
<%do while not rst.EOF%>
<td><%=rst.Fields(1)%></td>
<%rst.MoveNext%>
<%loop%>
<%rst.MoveFirst%>
</tr>
<tr>
<td width=25% nowrap bgcolor="#999999"><b>90#汽油销量(升)</b></td>
<%do while not rst.EOF%>
<td><%=rst.Fields(2)%></td>
<%rst.MoveNext%>
<%loop%>
<%rst.MoveFirst%>
</tr>
<tr>
<td width=25% nowrap bgcolor="#999999"><b>93#汽油销量(升)</b></td>
<%do while not rst.EOF%>
<td><%=rst.Fields(3)%></td>
<%rst.MoveNext%>
<%loop%>
<%rst.MoveFirst%>
</tr>
<tr>
<td width=25% nowrap bgcolor="#999999"><b>液化气销量(升)</b></td>
<%do while not rst.EOF%>
<td><%=rst.Fields(4)%></td>
<%rst.MoveNext%>
<%loop%>
<%rst.MoveFirst%>
</tr>
<tr>
<td width=25% nowrap bgcolor="#999999"><b>总销量(升)</b></td>
<%do while not rst.EOF%>
<td><%=rst.Fields(5)%></td>
<%rst.MoveNext%>
<%loop%>
<%rst.MoveFirst%>
</tr>
<tr>
<td width=25% nowrap bgcolor="#999999"><b>洗车收入（元）</b></td>
<%do while not rst.EOF%>
<td><%=rst.Fields(6)%></td>
<%rst.MoveNext%>
<%loop%>
<%rst.MoveFirst%>
</tr>
</table>

</td>
</tr>
<tr>
<td> </td>
</tr>
</table>
naomi77 2002-09-17
  • 打赏
  • 举报
 回复
这个标题是孤立于表格之外的，下面放一个表格，最好下面再放一个图表
naomi77 2002-09-17
  • 打赏
  • 举报
 回复
谢谢精灵兄弟的帮助。那个关于第一列列宽的问题，加入代码nowrap 就解决了，但那个标题的问题，代码无论如何不应该在表格之内啊。
iStringTheory 2002-09-17
  • 打赏
  • 举报
 回复
<table width="100%" border="1" bordercolor="#FFFFFF" bgcolor="#CC99FF">
<tr align="center" bgcolor="#FFFFFF">
<td colspan="2">油气站0#柴油、90#汽油、93#汽油和液化气销量情况表</td>
</tr>
<tr>
<td width=25% nowrap bgcolor="#999999"> </td>
<%do while not rst.EOF%>
<td><%=rst.Fields(0)%></td>
<%rst.MoveNext%>
<%loop%>
<%rst.MoveFirst%>
</tr>
<tr>
<td width=25% nowrap bgcolor="#999999"><b>0#柴油销量(升)</b></td>
<%do while not rst.EOF%>
<td><%=rst.Fields(1)%></td>
<%rst.MoveNext%>
<%loop%>
<%rst.MoveFirst%>
</tr>
<tr>
<td width=25% nowrap bgcolor="#999999"><b>90#汽油销量(升)</b></td>
<%do while not rst.EOF%>
<td><%=rst.Fields(2)%></td>
<%rst.MoveNext%>
<%loop%>
<%rst.MoveFirst%>
</tr>
<tr>
<td width=25% nowrap bgcolor="#999999"><b>93#汽油销量(升)</b></td>
<%do while not rst.EOF%>
<td><%=rst.Fields(3)%></td>
<%rst.MoveNext%>
<%loop%>
<%rst.MoveFirst%>
</tr>
<tr>
<td width=25% nowrap bgcolor="#999999"><b>液化气销量(升)</b></td>
<%do while not rst.EOF%>
<td><%=rst.Fields(4)%></td>
<%rst.MoveNext%>
<%loop%>
<%rst.MoveFirst%>
</tr>
<tr>
<td width=25% nowrap bgcolor="#999999"><b>总销量(升)</b></td>
<%do while not rst.EOF%>
<td><%=rst.Fields(5)%></td>
<%rst.MoveNext%>
<%loop%>
<%rst.MoveFirst%>
</tr>
<tr>
<td width=25% nowrap bgcolor="#999999"><b>洗车收入（元）</b></td>
<%do while not rst.EOF%>
<td><%=rst.Fields(6)%></td>
<%rst.MoveNext%>
<%loop%>
<%rst.MoveFirst%>
</tr>
</table>
naomi77 2002-09-17
  • 打赏
  • 举报
 回复
对不起，不知是我的哪里概念发生了混乱还是我没有表达清楚？第一列是静态的，就几个汉字，但要比较大的列宽（要130），后面几列其实是某一天的数值，由于最多一个月31天，所以有31列。数据库里有31个记录，字段包括液化气，90＃汽油，洗车等。
<div align="center"><h1><b><font face="华文新魏"><%=date%>油气站0#柴油、90#汽油、93#汽油和液化气销量情况表</font></b></h1></div>
这段程序是标题，是表格之外的。我想把这几个字相对表格居中，而不是相对屏幕居中。另外，N0.2的程序我试了一下，还是不行。我是想让静态的第一列列宽大一点。我的概念是td width=222就行，但如我调试时（只有3个记录时）可以，当有31个记录时就不行
iStringTheory 2002-09-17
  • 打赏
  • 举报
 回复
第一列？
“0#柴油销量(升)”这一列么？不是吧？这列不是对态的啊，你说的应该是第二列吧？
no.1
----
什么？你有32列？？？天，那你的屏幕岂不是向右拖的好厉害？
no.2
----
<table width="100%" border="1" bordercolor="#FFFFFF" bgcolor="#CC99FF">
<tr>
<td width=25% bgcolor="#999999"> </td>
<%do while not rst.EOF%>
<td><%=rst.Fields(0)%></td>
<%rst.MoveNext%>
<%loop%>
<%rst.MoveFirst%>
</tr>
<tr>
<td width=25% bgcolor="#999999"><b>0#柴油销量(升)</b></td>
<%do while not rst.EOF%>
<td><%=rst.Fields(1)%></td>
<%rst.MoveNext%>
<%loop%>
<%rst.MoveFirst%>
</tr>
<tr>
<td width=25% bgcolor="#999999"><b>90#汽油销量(升)</b></td>
<%do while not rst.EOF%>
<td><%=rst.Fields(2)%></td>
<%rst.MoveNext%>
<%loop%>
<%rst.MoveFirst%>
</tr>
<tr>
<td width=25% bgcolor="#999999"><b>93#汽油销量(升)</b></td>
<%do while not rst.EOF%>
<td><%=rst.Fields(3)%></td>
<%rst.MoveNext%>
<%loop%>
<%rst.MoveFirst%>
</tr>
<tr>
<td width=25% bgcolor="#999999"><b>液化气销量(升)</b></td>
<%do while not rst.EOF%>
<td><%=rst.Fields(4)%></td>
<%rst.MoveNext%>
<%loop%>
<%rst.MoveFirst%>
</tr>
<tr>
<td width=25% bgcolor="#999999"><b>总销量(升)</b></td>
<%do while not rst.EOF%>
<td><%=rst.Fields(5)%></td>
<%rst.MoveNext%>
<%loop%>
<%rst.MoveFirst%>
</tr>
<tr>
<td width=25% bgcolor="#999999"><b>洗车收入（元）</b></td>
<%do while not rst.EOF%>
<td><%=rst.Fields(6)%></td>
<%rst.MoveNext%>
<%loop%>
<%rst.MoveFirst%>
</tr>
</table>
使用bootstrap技术制作网页，应用bootstrap卡片有几种排版方式？
使用bootstrap技术制作网页，应用bootstrap卡片有几种排版方式？ 使用bootstrap技术制作网页，应用bootstrap卡片有几种排版方式？ 使用bootstrap技术制作网页，应用bootstrap卡片有几种排版方式？ 使用bootstrap技术制作网页，应用bootstrap卡片有几种排版方式？ 使用bootstrap技术制作网页，应用bootstrap卡片有几种排版方式？ 使用bootstrap技术制作网页，应用bootstrap卡片有几种排版方式？ 使用bootstrap技术制作网页，应用bootstrap卡片有几种排版方式？ 使用bootstrap技术制作网页，应用bootstrap卡片有几种排版方式？ 使用bootstrap技术制作网页，应用bootstrap卡片有几种排版方式？ 使用bootstrap技术制作网页，应用bootstrap卡片有几种排版方式？ 使用bootstrap技术制作网页，应用bootstrap卡片有几种排版方式？ 使用bootstrap技术制作网页，应用bootstrap卡片有几种排版方式？ 使用bootstrap技术制作网页，应用
cad图纸翻译简单教程。
CAD图纸翻译困扰了你1年？10年？ 翻译CAD图纸的时候你大部分时间在抠字？回填？排版？ 本篇让你解决这些问题，duang duang duang三步搞定CAD图纸翻译！
PHPweb成品网站排版去phpweb排版功能
还在为phpweb后台的排版功能而烦恼嘛？ 辛苦排版出来的网站，给客户做出的网站，担心别人打乱排版而烦恼嘛？ 使用方法，直接解压后覆盖根目录，建议先备份原文件！ 如何恢复？ 把覆盖的两个文件 用原先模板里的文件替换即可恢复！
怎样把微信公众平台的排版做到更好？.docx
怎样把微信公众平台的排版做到更好？.docx
论文排版不用愁，专业排版更省心
你还在为茫茫的论文排版发愁吗？这里有你想要的解脱！
ASP

28,404

社区成员

356,946

社区内容

发帖
与我相关
我的任务
社区描述
ASP即Active Server Pages，是Microsoft公司开发的服务器端脚本环境。
社区管理员
  • ASP
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今

加载中

查看更多榜单
社区公告
暂无公告

试试用AI创作助手写篇文章吧

+ 用AI写文章