怎么美化下这个页面啊？请各位高手帮下忙！

by1sou · 发表于 2007-11-22 21:14:09

怎么美化下这个页面啊？请各位高手帮下忙！
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>无标题文档</title>
</head>

<body>

<%
   dim db,zhang
Set db=Server.CreateObject("ADODB.Connection")
db.Open "dbq=" & Server.MapPath("db.mdb")&";driver={microsoft access driver (*.mdb)}"
dim sql
sql="select name from catory where pid=0"
set rs=db.execute(sql)

%>

<script language="javascript">
function bh()
{
window.location.href='wori.asp?a='+(document.form1.aa.options[document.form1.aa.options.selectedIndex].text);

}
</script>
<table width="100%">
  
  <tr>
<td width="701" height="183" valign="top"><table width="94%" border="0" cellpadding="0" cellspacing="0">
   
   <tr>
      <td width="75" height="19"> </td>
      <td width="291" height="19"> </td>
      <td width="135"> </td>
      <td width="154"> </td>
   </tr>
   <tr>
      <td height="21"><div align="right"></div></td>
      <td height="21"><div align="right">章：</div></td>
      <td valign="top"><form name="form1" method="post" action="">
      <select name="aa" onChange="bh()">
      <option  selected>
      <%
if not(rs.eof) then

  do while not(rs.eof or rs.bof)
  %>
      <option selected><%=rs("name")%>
      <%rs.movenext
%>
      </option>
      <%loop
else
%>
      <option><%=zhang%></option>
      <% end if%>
      </select>
         </form></td>
<td><form name="form3" method="post" action="tianjiayemian.asp">
   <input type="submit" name="Submit" value="添加节">
</form></td>
   </tr>
</table>
   <form name="form2" method="post" action="tianjia3.asp">
      <p>
      <%
  dim aa,bb
  if request("a")="" then
  aa="第一章"
  else
  aa=request("a")
  end if

dim strSql,rsd
strSql="Select id From catory where name='" & aa & "'"
Set rsd=db.Execute(strSql)
dim rsa,sqla
bb=rsd("id")

sqla="select * from catory where pid=" &bb
Set rsa=db.Execute(sqla)

  %>
      <script language="javascript">
function bb()
{
window.location.href='wori.asp?a='+(document.form2.bb.options[document.form2.bb.options.selectedIndex].text);

}
</script>
      </p>
      <table width="100%" border="0">
      <tr>
         <td width="161" height="39"> </td>
         <td width="233"><div align="right">节：</div></td>
         <td width="239"><select name="bb" onChange="bb()">
            <%
  if not (rsa.eof) then
  rsa.movefirst
  do while not(rsa.eof or rsa.bof)
  %>
            <option selected><%=rsa("name")%>
            <%rsa.movenext
%>
            </option>
            <%loop
else
%>
            <option value="wu">没有章节</option>
            <% end if%>
         </select></td>
      </tr>
      <tr>
         <td height="44"> </td>
         <td><div align="right">小节：</div></td>
         <td><input name="xiaojie" type="text" id="xiaojie"></td>
      </tr>
      <tr>
         <td height="68"> </td>
         <td><div align="right">内容：</div></td>
         <td> </td>
      </tr>
      <tr>
         <td height="68"> </td>
         <td colspan="2"><div align="center">
            <iframe id="eWebEditor1" src="ewebeditor.htm?id=content" frameborder="0" scrolling="No" width="550" height="350"></iframe>
<input name="content" type="hidden"  id="content" value="<%=ff%>" />          </div></td>
      </tr>
      <tr>
         <td height="68"> </td>
         <td><div align="right">
            <input type="submit" name="Submit" value="提交">
         </div></td>
         <td><input type="reset" name="Submit2" value="重置"></td>
      </tr>
      </table>
      <p> </p>
      <p>       </p>
      <p> </p>
      <p>       </p>
   </form>
<p> </p></td>
  </tr>
</table>
<p> </p>
</body>
</html>
这是网页代码，请大家帮忙改下，让它好看些，谢谢了！

		自动登录	找回密码
密码			立即注册