savenewrecord.asp

SmartCity远程数据库管理系统 本系统可使您不打开Microsoft Access也能在线轻松操作Access数据库

<!-- #include file="connmdb.asp" -->
<%
	dim tablename
	tablename = request("tablename")

	rs.close
	sql = "select * from ["&tablename&"]"
	rs.open sql,conn,1,3

	rs.addnew
	for each field in rs.fields
		if request(field.name) = "on" then
			rs(field.name) = true
		else 
			if request(field.name) = "" then
				rs(field.name) = false
			else
				rs(field.name) = request(field.name)
			end if
		end if
	next
	rs.update

	rs.close
	conn.close
	set rs = nothing
	set conn = nothing	
	
	response.redirect "recordlist.asp?tablename="&tablename&""
%>