首先建立连接对象,并且打开数据库
<%
dim str,conn
Set conn = Server.CreateObject("ADODB.Connection")
str = "Provider = Microsoft.Jet.OLEDB.4.0;Data Source = " & Server.MapPath("db/ly.mdb") '连接数据库路径
%>
2.接着建立数据集对象,并且连接到你表单里数据所在的数据表。
set rs=Server.CreateObject("adodb.recordset")
rs.open "select name as 姓名 ,title as 标题, content as 内容 from ly from ly",conn,1,3
3.然后获取表单里面的值。利用数据集的addnew方法插入到数据表中
rs.addnew
rs("name")=Request("name")
request 获取表单中name属性为“name”的值
rs("title")=Request("title")
rs("content")=Request("content")
4.添加完成后要记得更新数据库
rs.update
上面的方法是利用数据集的addnew方法操作的,也可以利用connecting的 exeute 方法操作execute(插入数据的sql语句)
sql="INSERT INTO ly (id,name,title,content,time,ip) VALUES ('"
sql=sql & id &" ','"
& Request("name") & "','"
& Request("title") & "','" & Request("content") & "','"& now()&"','" &request.servervariables("REMOTE_ADDR") & "')"
conn.execute(sql)