请教各位几个问题，希望大家快点帮帮忙！

[badfly]

我的代码：
<%Set rs=Server.CreateObject("ADODB.RecordSet")
sql="select * from 动物数据 where 地市='山东省' and 日期='"+sdate+"'"
rs.open sql,session("sqlconnect"),1,1
if not rs.eof then
for i = 0 to rs.recordcount - 1%>
<%response.write "字段"&i&"："&rs.fields(i).name%>:
<input type="text" name="txt(i)" value=<%=rs.fields(i)%>><br>
<%next
rs.close
set rs=nothing
end if
%>
为什么我只能显示数据库的前两个字段？
如果把for i = 0 to rs.recordcount - 1换成for i = 0 to rs.fieldcount - 1
说是不支持，好象是conn没有定义，如何解决？
如果用rs.recordcount的话怎么显示所有的字段名称呢？
如果要把修改后文本框的内容添加到数据库中，覆盖原来的记录要怎么写代码？
问题有些多，谢谢各位解答

[ib915]

如果要把修改后文本框的内容添加到数据库中，覆盖原来的记录要怎么写代码？

<%
………………
set rs=Server.CreateObject("ADODB.Recordset")
sql="update 表名 set 字段=修改的值 where XX=XXX"
conn.execute sql
set rs=nothing
set conn=nothing
Response.Redirect "updateok.asp"
%>

[badfly]

如果要把文本框的内容依次添加到数据库中
是sql="update 表名 set rs.fields(i)=txt(i).value where XX=XXX"
是这样写么？

前面几个问题呢？
关于conn我不明白，怎么定义conn并使用它

up

[ib915]

1、你定义了conn,链接数据库没有？
rs.open sql,conn,1,1

2、你表单内要显示的内容是什么字段，你的数据表内的字段有什么呀？
3、name="txt(i)" //写法错误
变为
name="txt<%=i%>"

4、字段值可以这样写<%rs("字段名")%>

[ib915]

4点有点错误：
<%=rs("字段名")%>

[babycoolku]

conn的例子，可以专门做一个CONN.asp文件，做数据库连接。

<%@LANGUAGE="VBSCRIPT"%>
<%
option explicit
dim startime,endtime,conn,connstr,db
startime=timer()
'更改数据库名字
db="data.mdb"
Set conn = Server.CreateObject("ADODB.Connection")
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(db)
'如果你的服务器采用较老版本Access驱动，请用下面连接方法
'connstr="driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath(db)
conn.Open connstr
function CloseDatabase
Conn.close
Set conn = Nothing
End Function
%>

[flying310]

<%Set rs=Server.CreateObject("ADODB.RecordSet")
sql="select * from 动物数据 where 地市='山东省' and 日期='"+sdate+"'"
rs.open sql,session("sqlconnect"),1,1
if not rs.eof then
while not rs.eof
<%response.write "字段"&i&"："&rs.fields(i).name%>:
<input type="text" name="txt(i)" value=<%=rs.fields(i).value%>><br>
<%
rs.movenext
wend
rs.close
set rs=nothing
end if
%>

[babycoolku]

是不是你数据库里的只有两个满足你定的查询条件的记录啊~~你用的是and了，试试&&呢！

[badfly]

to 林林
表里没有符合条件的数据的时候，没有问题，有符合条件的数据的时候，出现错误提示如下：

项目在所需的名称或序数中未被发现。

[badfly]

其他问题解决
如何把修改的文本框内容依次添加到数据库中，覆盖原来相应的记录呢？

[badfly]

有两个按钮
一个查询一个查询后修改
不知如何写
现在点两个按钮都是查询的作用

[badfly]

我做了两个表单了
查询写好了，不知怎么写修改
其他问题解决
如何把修改的文本框内容依次添加到数据库中，覆盖原来相应的记录呢？

[babycoolku]

我觉得应该做两个界面或是两个表单的~~~一个查询用，一个修改用啊~~