if upcount<>"0" then while i<CInt(upcount) i=i+1 set rs1=server.createobject("adodb.recordset") sql1="select * from 相关人员" rs1.open sql1,connstr,3,2 rs1.addnew rs1("姓名")=request.Form("aboutname"&i&"") rs1("职务")=request.Form("aboutzw"&i&"") rs1("办公电话")=request.Form("aboutphone"&i&"") rs1("个人邮箱")=request.Form("aboutmail"&i&"") rs1("手机")=request.Form("aboutsj"&i&"") rs1("classid")=rs2("id") rs1.update rs1.close set rs1=nothing wend end if

"upcount"这个的值是字符串 你们说的函数根本转不过来

看一下哪里有错误啊 我使用了这段语句后 数据库加了很多数据 循环停不下来了

[此贴子已经被作者于2004-12-01 17:45:14编辑过]

这位老兄

虽然我不是什么高手

但是我觉得你的程序很乱

就是这种感觉

if upcount<>"0" then while i<CInt(upcount) 问题可能在这,,出在你这个字符串上,,,代码上面我看出不哪错,,呵呵,昨天没有时间,

你以后添数据最好不要用循环,,,自己好好看目的吧

你把

set rs1=server.createobject("adodb.recordset") sql1="select * from 相关人员" rs1.open sql1,connstr,3,2

提到循环外边，把 i 赋个值。看看。

实在不行，用DO 。。。。LOOP 这个结构更强，我一直都用这个循环。

1、数据库连接、关闭代码应该提到循环外面

2、你说upcount是字符串，那么while i<CInt(upcount)语句应该会有出错提示才对！！因为CInt()函数的参数其类型不能为字符型