1、创建测试表,create table test_batch(id number, v_date date)
2、先看插入原始表数据select t.*, rowid from test_day t
3、批量插入测试数据,insert into test_batch select * from test_daycommit
4、查询表的记录,select t.*, rowid from test_batch t可以发现数据一致。批量添加数据完成。
<%textarea=Request("textarea")'获取输入框的内容
If inStr(textarea,chr(13)&chr(10))>0 then'判断是否有换行符
textarea=Split(textarea,chr(13)&chr(10), -1, 1)'用换行符把内容分割成数组
For i=0 to UBound(textarea)'循环数组
Conn.Execute "Insert Into [表名] (username,shuju,password) Values ('username值','"&textarea(i)&"','password值')" '写入数据库
Next
End If
%>
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)