Question

asp中将数据保存到access数据库

Answer 1

set rs=server.CreateObject("adodb.recordset")
rs.Open "select * from 表",conn,1,3
rs.AddNew
rs("字段")=int(request.form("字段")) '数字型
rs("字段")=trim(request.form("字段")) '文本型
下同
rs.Update
rs.close
set rs=nothing
conn.close
set conn=nothing
response.Write "<script language='javascript'>alert('添加成功！');location.href='跳转的页面文件名';</script>"
response.End

Answer 2

sqlnowin2="insert into ContraventionMan(CTVTMRuselt,CTVTMManGangW,CTVTMMan,CTVTMPoint,CTVTMURLID,CTVTMName,CTVTMType,CTVTMURL,CTVTMTime,CTVTMAddMan,ContraventionMIsOK,nsttyid,CTVTMManClass,CTVTMresan) values('"&nowinresZoneID&"','"&thisCTVTMManGangW&"',"&thisCTVTMMan&","&thisCTVTMPoint&","&thisCTVTMURLID&",'"&thisCTVTMName&"',"&thisCTVTMType&",'"&thisCTVTMURL&"',#"&now()&"#,"&thisCTVTMAddMan&",true,"&rs_bigclass("nsttyid")&","&nowclassid&",'"&nowinnaofenx&"')"
conn.execute(sqlnowin2)