asp中利用数组实现数据库记录的批量录入方法

悔悔悔改

悔悔悔改

2016-01-29 19:36

asp中利用数组实现数据库记录的批量录入方法,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
  response.write "<option " & sel & " value='"+CStr(rs("id"))+"'>"+rs("province")+"</option>"+chr(13)+chr(10)
  rs.movenext
  loop
  set rs=nothing
  %> </select></td>
  <td width="66"><input type="text" name="<% response.write"data2"&i %>" size="8"></td>
  <td width="66"><input type="text" name="<% response.write"data3"&i %>" size="8"></td>
  <td width="66"><select size="1" name="<% response.write"data4"&i %>">
  <option value="1">改动部分</option>
  <option value="2">全部内容</option>
  </select></td>
  <td width="80"><s
展开更多 50%)
分享

猜你喜欢

asp中利用数组实现数据库记录的批量录入方法

ASP
asp中利用数组实现数据库记录的批量录入方法

用数组实现数据记录的批量录入方法

ASP
用数组实现数据记录的批量录入方法

s8lol主宰符文怎么配

英雄联盟 网络游戏
s8lol主宰符文怎么配

asp实现批量录入数据的实现

ASP
asp实现批量录入数据的实现

VB数据库多字段记录的录入

编程语言 网络编程
VB数据库多字段记录的录入

lol偷钱流符文搭配推荐

英雄联盟 网络游戏
lol偷钱流符文搭配推荐

asp中通过getrows实现数据库记录分页的一段代码

ASP
asp中通过getrows实现数据库记录分页的一段代码

读取数据库中数据到数组的类

ASP
读取数据库中数据到数组的类

lolAD刺客新符文搭配推荐

英雄联盟
lolAD刺客新符文搭配推荐

The Linux BootPrompt-HowTo 中译版

The Linux BootPrompt-HowTo 中译版

server push具体实现(转)

server push具体实现(转)
下拉加载更多内容 ↓