精華|資料|資料庫|數組|原創 asp中利用數組實現資料庫記錄的批量錄入方法(原創)
示範：http://www.zwtd.com/1/yanek/n/needdj2.asp
<%
rem 文章題目 asp中利用數組實現資料庫記錄的批量錄入方法(原創)
作者：yanek
聯絡email:aspboy@263.net
%>
包括兩個檔案
1。allneeddj.asp：實現表單的產生
2. allneeddjresult.asp 處理表單批量錄入
3.hbedu.mdb :資料庫檔案
其資料庫結構如下
provinceid:省份編號 數值型
dytaocount:打樣套數 數值型
papertaocount:紙樣套數 數值型
cpcontent:出片內容 數值型
filename:檔案名稱 文本型
beizhu:備忘 備忘型
本例子中以10條記錄，每條記錄6個欄位說明.
1。allneeddj.asp
<html>
<head>
<meta http-equiv="Content-Language" content="zh-cn">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta name="GENERATOR" content="Microsoft FrontPage 4.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<title>需求登記</title>
</head>
<body>
<%
set conn=server.createobject("adodb.connection")
conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & _
Server.MapPath("hbedu.mdb")
%>
<form method="POST" action="allneeddjresult.asp">
<div align="center">
<center>
<table border="1" width="700" bordercolorlight="#FFFFFF">
<tr>
<td width="660" colspan="6">
<p align="center">需求登記</td>
</tr>
<tr>
<td width="54" align="center">省份</td>
<td width="66" align="center">打樣張數</td>
<td width="66" align="center">紙樣張數</td>
<td width="66" align="center">出片內容</td>
<td width="80" align="center">檔案名稱</td>
<td width="328" align="center">
<p align="center">備忘</td>
</tr>
<%
rem 通過迴圈動態產生不同名稱表單域
for i=1 to 10
%>
<%
set rs=server.createobject("adodb.recordset")
sql="select * from provinceinfo "
rs.open sql,conn,1,1
set rs1=server.createobject("adodb.recordset")
sql1="select * from filename "
rs1.open sql1,conn,1,1
%>
<tr>
<td width="54"><select name="<% response.write"data1"&i %>"
size="1">
<%
do while not rs.eof
if province=cstr(rs("id")) then
sel="selected"
else
sel=""
end if
