Question

asp 批量添加数据

表
id mz
(自动编号) 名字
=========================
想用asp 语言,批量添加数据

最好是用文本区一行一个这样添加
<form action="addnew.asp" method="post">
<textarea name="mz" cols="50" rows="20" id="mz"></textarea>
<input name="提交" type="submit" value="提交" />
</form>
先付100分,成功后再加分,
如果难度较大的话,用文本字段的也行
<form action="addnew.asp" method="post">
<input name="mz" type="text" />
<input name="mz1" type="text" />
<input name="mz2" type="text" />
<input name="mz3" type="text" />
.
.
.
.
.
<input name="提交" type="submit" value="提交" />
</form>
不要随机名字,,名字是要来添加进数据库的

Answer 1

<form action="addnew.asp" method="post">
<input name="mz" type="text" />
<input name="mz" type="text" />
<input name="mz" type="text" />
<input name="mz" type="text" />
.
.
.
.
.
<input name="提交" type="submit" value="提交" />

<%
For i=1 To Request("mz").count
If Request("mz").count = 1 Then
mz = Request("mz")
Else
mz = Replace(Request("mz")(i),"'","")
End If
Conn.Execute("insert into 表名 (mz) Values ('"& mz &"')")
Next
%>

或是:

<form action="?fo=new" method="post">
<textarea name="mz" cols="80" rows="30" id="mz"></textarea>
<input name="提交" type="submit" value="提交" />
</form>
<%
mz = Split(Request("mz"),CHR(13) & CHR(10))
For i = 0 To UBound(mz)
If Not mz(i) = "" Then Conn.Execute("insert into mp3 (mz) Values ('"& mz(i) &"')")
Next
%>

Answer 2

<form action="addnew.asp" method="post">
<textarea name="mz" cols="50" rows="20" id="mz"></textarea>
<input name="提交" type="submit" value="提交" />
</form>

在文本区域输入想要添加的名字用,隔开。
在addnew.asp页面里
mzz=split(request.form("mz"),",")
for i=0 to ubound(mzz)
if mzz(i)<>"" then
Conn.execute("insert into 表名 (mz) Values ('"& mzz(i)&"')")
end if
next

Answer 3

批量添加数据
for i=1 to Request.form("Num") '从1到NUM NUM是数量
randomize
MZ=Int((57184629*rnd)) '批量添加信息名字要随机生成.不能手工输入.
set rs=server.createobject("adodb.recordset")
rs.open "select * from 表",conn,1,3
rs.addnew
rs("mz")=MZ'MZ是名字
rs.update
rs.close
next

我是用以上信息来开发学习卡号,卡号批量添加.不清楚再问我.

Answer 4

HI我，我帮你看看