28,391
社区成员
发帖
与我相关
我的任务
分享一个值得你关注一下的问题！！！
<% dim conn
i=0
class_value=Request.Form.Item(3)
set conn=server.createobject("adodb.connection")
conn.open "sybase"
set rs=server.createobject("adodb.recordset")
set rs = conn.Execute ("select * from "&class_value&" ")
%>
<% total=rs.fields.count
course_value=request.form.item(1)
set rs=conn.execute("insert into "&class_value&" ("&rs.fields(0).name&") values('"&request.form.item(1)&"')")
i=i+1
%>
<html>
<head>
<title>写入</title>
</head>
<body>
<% while i<total %>
<%
set rs=conn.execute("update "&class_value&" set "&rs.fields(i).name&" ='"&request.form.item(i+1)&"' where "&rs.fields(0).name&" ='"&request.form.item(1)&"'")
%>
<% i=i+1
wend%>
</body>
</html>
我根据total=rs.fields.count来读出表中字段名个数，然后用f_name=rs.fields().name 来读出各个字段名，最后输入数据 提交到数据库。当然这个表是由用户自己建立的，表中字段名也是由用户定的。现在，问题是我没办法把数据添加到数据库里正确的字段名下面，它把全部数据都添加在一个字段名下面，还请各位帮忙！！！
这段代码，不知哪里有错，第一次我试过是成功的，可是这几天我重装了一下系统，结果是不能向数据库里添数据。当然当时是不是这段，丝豪一差我也不敢肯定，还请各位帮我解决!!
i=0
class_value=Request.Form.Item(3)
set conn=server.createobject("adodb.connection")
conn.open "sybase"
set rs=server.createobject("adodb.recordset")
set rs = conn.Execute ("select * from "&class_value&" ")
%>
<% total=rs.fields.count
course_value=request.form.item(1)
set rs=conn.execute("insert into "&class_value&" ("&rs.fields(0).name&") values('"&request.form.item(1)&"')")
i=i+1
%>
<html>
<head>
<title>写入</title>
</head>
<body>
<% while i<total %>
<%
set rs=conn.execute("update "&class_value&" set "&rs.fields(i).name&" ='"&request.form.item(i+1)&"' where "&rs.fields(0).name&" ='"&request.form.item(1)&"'")
%>
<% i=i+1
wend%>
</body>
</html>
我根据total=rs.fields.count来读出表中字段名个数，然后用f_name=rs.fields().name 来读出各个字段名，最后输入数据 提交到数据库。当然这个表是由用户自己建立的，表中字段名也是由用户定的。现在，问题是我没办法把数据添加到数据库里正确的字段名下面，它把全部数据都添加在一个字段名下面，还请各位帮忙！！！
这段代码，不知哪里有错，第一次我试过是成功的，可是这几天我重装了一下系统，结果是不能向数据库里添数据。当然当时是不是这段，丝豪一差我也不敢肯定，还请各位帮我解决!!
...全文
请发表友善的回复…
发表回复
vlife 2002-11-29
- 打赏
- 举报
什么意思，还请各位指教
zykj_2000 2002-11-28
- 打赏
- 举报
这样可能是以只读方式打开的，
peilianhai 2002-11-28
- 打赏
- 举报
1. conn.open "sybase"
检查其中sybase
2.set rs = conn.Execute ("select * from "&class_value&" ")
打开类型可能不对
检查其中sybase
2.set rs = conn.Execute ("select * from "&class_value&" ")
打开类型可能不对
caoshangfei 2002-11-28
- 打赏
- 举报
干嘛弄得这么复杂。。
