谁能看看下边的代码啊,,,

来源:百度知道 编辑:UC知道 时间:2024/05/15 17:00:18
<%
Set conn = Server.CreateObject("ADODB.Connection")
conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq="&Server.MapPath("sj.mdb")
Set rs = Server.CreateObject("ADODB.RecordSet")
sql = "select * from table1"
rs.open sql,conn,1,1
Do While Not rs.Eof
'<input type="button" value="aaaa">
Response.Write ("<p>姓名:"&rs("name")&" E-mail:"&rs("pass")&"</p>")
rs.MoveNext
Loop
rs.Close
Set rs = Nothing
conn.Close
Set conn = Nothing
%>
就这点了,,这个怎么不生成按钮啊,,还有啊,,怎么让它生成到表单form2里???

<%
Set conn = Server.CreateObject("ADODB.Connection")
conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq="&Server.MapPath("sj.mdb")
Set rs = Server.CreateObject("ADODB.RecordSet")
sql = "select * from table1"
rs.open sql,conn,1,1
Response.Write "<form name='form2' method='post' action=''>"
'输出form
Do While Not rs.Eof
'Response.Write ("<p>姓名:"&rs("name")&" E-mail:"&rs("pass")&"</p>")
'先注释掉上面的,看看下面一句:输出到文本框里,
Response.Write "<p>姓名:<input type='text' value='"&rs("name")&"'> E-mail:<input type='text' value='"&rs("pass")&"'>"
rs.MoveNext
Loop
Response.write "<input type='button' value='aaaa'>"
'输出按钮