![]() |
#2
ljroger7282008-06-25 09:24
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<% dim conn set conn=server.CreateObject("adodb.connection") conn.open "provider=microsoft.jet.oledb.4.0; data source=" & server.MapPath("infor.mdb") %> <% dim rs,sql set rs=server.CreateObject("adodb.recordset") sql="select * from book wherer 条件" rs.open sql,conn,1,1 %> <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www. <html> <head> <meta http-equiv="Content-Type" content="text/html; charset=gb2312"> <title>无标题文档</title> </head> <body> <form name="form1" method="post" action="要提交的页面"> <table width="400" border="1" align="center" cellpadding="0" cellspacing="0" bordercolor="green"> <tr> <td>姓名</td> <td>培训成绩</td> <td>考核得分</td> </tr> <tr> <% do while not rs.eof %> <td><% =rs("相应字段名") %></td> <td><input name="textfield" type="text" value="<% =rs("相应字段名") %>"></td> <td><input name="textfield2" type="text" value="<% =rs("相应字段名") %>"></td> </tr> <tr> <td> </td> <td><input type="submit" name="Submit" value="提交"> <input type="reset" name="Submit2" value="重置"></td> <td> </td> </tr> <% rs.movenext loop %> </table> </form> <% rs.close set rs=nothing 释放空间 conn.close set conn=nothing %> </body> </html> |
在页面中从数据库提取符合条件的记录,形成数据表格,其中培训成绩、考核得分是可录入或可编辑的项目,所有记录录入完成后,统一提交。请问这样的网页如何实现?
如下面的形式:
姓名 培训成绩 考核得分
张三 (文本框可录数据) (文本框可录数据)
李四 (文本框可录数据) (文本框可录数据)
王五 (文本框可录数据) (文本框可录数据)
赵六 (文本框可录数据) (文本框可录数据)
...
提交 重置