如何用最简单的语句提交大量表单对象的值存储到数据库

如何用最简单的语句提交大量表单对象的值存储到数据库

如何用最简单的语句提交大量表单对象的值存储到数据库？说道这个问题可能大家经常遇到，感到很头痛，但是又没办法，只能慢慢写，笔者以提交一张应聘表单的提交为例给大家介绍如何用最简短的语句来达到目的 
脚本运行通过环境环境： 
iis5.0+sqlserver2000（当然也可以access2000等）

如有任何问题或建议请发email：chenxingbai@21cn.com 
生成表结构的脚本 
if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[yingpin]') and OBJECTPROPERTY(id, N'IsUserTable') = 1) 
drop table [dbo].[yingpin] 
GO

CREATE TABLE [dbo].[yingpin] ( 
[id] [int] IDENTITY (1, 1) NOT NULL , 
[yp_ name] [varchar] (20) COLLATE Chinese_PRC_CI_AS NULL , 
[sex] [varchar] (4) COLLATE Chinese_PRC_CI_AS NULL , 
[birthday] [varchar] (15) COLLATE Chinese_PRC_CI_AS NULL , 
[health] [varchar] (10) COLLATE Chinese_PRC_CI_AS NULL , 
[hunyin] [varchar] (10) COLLATE Chinese_PRC_CI_AS NULL , 
[zhengzhi] [varchar] (10) COLLATE Chinese_PRC_CI_AS NULL , 
[xueli] [varchar] (10) COLLATE Chinese_PRC_CI_AS NULL , 
[zhicheng] [varchar] (10) COLLATE Chinese_PRC_CI_AS NULL , 
[english] [varchar] (10) COLLATE Chinese_PRC_CI_AS NULL , 
[email] [varchar] (50) COLLATE Chinese_PRC_CI_AS NULL , 
[phone] [varchar] (50) COLLATE Chinese_PRC_CI_AS NULL , 
[yp_ address] [varchar] (100) COLLATE Chinese_PRC_CI_AS NULL , 
[zip] [varchar] (10) COLLATE Chinese_PRC_CI_AS NULL , 
[colledge] [varchar] (50) COLLATE Chinese_PRC_CI_AS NULL , 
[zhuanye] [varchar] (50) COLLATE Chinese_PRC_CI_AS NULL , 
[bumen] [varchar] (50) COLLATE Chinese_PRC_CI_AS NULL , 
[gangwei1] [varchar] (50) COLLATE Chinese_PRC_CI_AS NULL , 
[gangwei2] [varchar] (50) COLLATE Chinese_PRC_CI_AS NULL , 
[x_shijian] [varchar] (500) COLLATE Chinese_PRC_CI_AS NULL , 
[x_address] [varchar] (500) COLLATE Chinese_PRC_CI_AS NULL , 
[x_zhiwu] [varchar] (500) COLLATE Chinese_PRC_CI_AS NULL , 
[g_shijian] [varchar] (500) COLLATE Chinese_PRC_CI_AS NULL , 
[g_address] [varchar] (500) COLLATE Chinese_PRC_CI_AS NULL , 
[g_zhiwu] [varchar] (500) COLLATE Chinese_PRC_CI_AS NULL , 
[h_name] [varchar] (500) COLLATE Chinese_PRC_CI_AS NULL , 
[h_guanxi] [varchar] (500) COLLATE Chinese_PRC_CI_AS NULL , 
[h_danwei] [varchar] (500) COLLATE Chinese_PRC_CI_AS NULL , 
[h_zhiwu] [varchar] (500) COLLATE Chinese_PRC_CI_AS NULL , 
[pingjia] [varchar] (500) COLLATE Chinese_PRC_CI_AS NULL , 
[shexiang] [varchar] (500) COLLATE Chinese_PRC_CI_AS NULL , 
[beizhu] [varchar] (500) COLLATE Chinese_PRC_CI_AS NULL , 
[shijian] [varchar] (50) COLLATE Chinese_PRC_CI_AS NULL 
) ON [PRIMARY] 
GO

ALTER TABLE [dbo].[yingpin] WITH NOCHECK ADD 
CONSTRAINT [DF_yingpin_shijian] DEFAULT (getdate()) FOR [shijian], 
CONSTRAINT [PK_yingpin] PRIMARY KEY CLUSTERED 
( 
[id] 
) ON [PRIMARY] 
GO

Asp脚本addyp.asp

<!--#include file="lib/config1.asp"--> 
<% 
if request("action")="add" then 
dim str,strvalue,strname,i,str1 
str="yp_name,sex,birthday,health,hunyin,zhengzhi,xueli,zhicheng,english,email,phone,yp_address,zip,colledge,zhuanye,bumen,gangwei1,gangwei2,x_shijian,x_address,x_zhiwu,g_shijian,g_address,g_zhiwu,h_name,h_guanxi,h_danwei,h_zhiwu,pingjia,shexiang,beizhu"
str1="x_shijian,x_address,x_zhiwu,g_shijian,g_address,g_zhiwu,h_name,h_guanxi,h_danwei,h_zhiwu" 
strname=split(str,",")

for i=lbound(strname) to ubound(strname) 
if i<>ubound(strname) then 
if instr(str1,strname(i))=0 then 
if trim(request.Form(strname(i)))="" then 
response.write "<script>alert('发生错误，请将数据填写完整！');history.back(1);</script>" 
response.End() 
end if 
sql=sql&"'"&trim(request.Form(strname(i)))&"'," 
else 
j=1 
much=trim(request.Form(cstr(strname(i)&j))) 
for j=2 to 5 
much

%>