asp表单数据库

Ⅰ ASP中表单直接提交到数据库的代码怎么写

首先是连接到数据库
其次是对数据的操作
最后是关闭数据库

具体例子网上很多这里我就转一个别人的：

sqlstr="select * from message" ---- >(message为数据库中的一个数据表，即你要显示的
数据所存放的数据表)
rs.open sqlstr,conn,1,3 ---- >(表示打开数据库的方式) rs.addnew 新增加一条记录
rs("name")="xx" 将xx的值传给name字段 rs.update 刷新数据库
------------------------------------------------------ rs.close
conn.close 这几句是用来关闭数据库 set rs=nothing set conn=nothing
------------------------------------------------------- % >
.<4 >删除一条记录
删除数据库记录主要用到rs.delete,rs.update
< !--#include file=conn.asp-- > (包含conn.asp用来打开bbs\db1\目录下的user.mdb数据 库) < %
dim name name="xx"
set rs=server.CreateObject("adodb.recordset") (建立recordset对象)
sqlstr="select * from message" ---- >(message为数据库中的一个数据表，即你要显示的数据所存放的数据表)
rs.open sqlstr,conn,1,3 ---- >(表示打开数据库的方式) ------------------------------------------------------- while not rs.eof
if rs.("name")=name then rs.delete
rs.update 查询数据表中的name字段的值是否等于变量name的值"xx"，如果符合就执行删 除，
else 否则继续查询,直到指针到末尾为止 rs.movenext emd if wend
------------------------------------------------------ ------------------------------------------------------ rs.close
conn.close 这几句是用来关闭数据库 set rs=nothing set conn=nothing
------------------------------------------------------- % >

http://wenku..com/link?url=vya_shXfg3kgqbPvq--9LsgXWUpQ7FmEuN_a95gWD0cChMqPneQFyaHVgMK

Ⅱ asp表单信息提交数据库

数据库权限的问题
1、
办法：打开我的电脑，然后点菜单上的“文件夹选项”--->查看，然后把“使用简单文件夹共享(推荐)”前面的钩去掉，然后点“确认”；接下来回到需要打开权限的文件夹（数据库存放的文件夹），右键---> 属性--->安全,然后点“添加”--->"高级"--->立即查找--->然后在下面的地方选择“everyone”--->确定--->点刚才加入的"everyone"，然后在下面的大框编辑everyone权限为完全控制，保存即可。

2、修改temp（临时文件夹）权限
打开：windows\temp，单击右键选择-属性，你就会看到一个叫做“安全”的选项，添加一个everyone,权限设置为完全控制，再将你正在使用windows的用户也设置为完全控制.

Ⅲ ASP中怎么将表单中的数据提交到连接的数据库中

以数据库ACCESS为例
比如你数据库里有一个表AAA，里面有字段b1、b2、b3
链接数据库代码
<%
Response.CodePage = 936
dim conn
dim connstr
on error resume next
connstr="DBQ="+server.mappath("数据库路径")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"
set conn=server.createobject("ADODB.CONNECTION")
conn.open connstr
%>
表单:
<form name="form" method="post" action="?tj=y">
<input type="text" name="b1">
<input type="text" name="b2">
<input type="text" name="b3">
<input type="submit" value="提交">
</form>
提交表单，把表单的数据写入所连接的数据库的处理程序：
<%
if trim(requet("tj"))="y" then

set rs=server.createobject("adodb.recordset")
sql="select * from AAA"
rs.open sql,conn,1,3
rs.addnew
rs("b1")=trim(requet("b1"))
rs("b2")=trim(requet("b2"))
rs("b3")=trim(requet("b3"))
rs.update
response.write"<script language=javascript>alert('提交成功!');window.location.href='?'</script>"
end if

%>

Ⅳ asp表单内容提交数据库

a.asp
<form action="b.asp">
<input name="text" type="text" value="要传的值"/>
<input type="submit" name="Submit" value="提交">
</form>

b.asp
<%
response.Write(request.Form("text"))
%>
<form action="c.asp">
<input name="text1" type="text" value="<% =request.Form("text")%>"/>
<input type="submit" name="Submit" value="提交">
</form>

c.asp
<%
dim conn,dbpath,rs
set conn=server.CreateObject("adodb.connection")
dbpath=server.MapPath("数据库名")
conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & DBPath
set rs=server.CreateObject("adodb.recordset")
rs.cursortype=1
rs.locktype=3
rs.open"select* from 表",conn
rs.addnew
rs("字段名")=request.Form("text1")
rs.update
rs.close
conn.close
set rs=nothing
set conn=nothing
%>