UC知道刚学ASP没多久！帮忙写一段很简单的代码?在线等
来源：百度知道 编辑：UC知道 时间：2024/05/26 18:16:21
链接数据库的代码是这样的:
<%
db1="/data/sitesdata"
Set conn = Server.CreateObject("ADODB.Connection")
conn.CommandTimeOut = 120
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & server.mappath(db1)
conn.mode = 3
conn.Open connstr
请问如何写写入的代码：
数据库里有值：name txt mail qq
请各位达人帮帮忙！
<%
db1="/data/sitesdata"
Set conn = Server.CreateObject("ADODB.Connection")
conn.CommandTimeOut = 120
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & server.mappath(db1)
conn.mode = 3
conn.Open connstr
请问如何写写入的代码：
数据库里有值：name txt mail qq
请各位达人帮帮忙！
db1="/data/sitesdata"
（要指名数据库的名称和扩展名，例如：/data/sitesdata.mdb）
Set conn = Server.CreateObject("ADODB.Connection")
conn.CommandTimeOut = 120
（数据库连接最好不要限定时间）
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & server.mappath(db1)
conn.Open connstr
（你连接了数据库，但没有连接到数据表，下面是数据表的连接语句）
set rs = Server.CreateObject("ADODB.Recordset")
strSQL = "select * form 数据表名称"
(这里的数据表名称必须是数据库存在的表)
rs.open strSQL,conn,2,3
（数据表已经连接，可以进行数据操作了）
1、读取：
变量1=rs("字段1")
变量2=rs("字段2")
........
2、增加内容：
rs.addnew
rs("字段1")=变量1
rs("字段2")=变量2
........
rs.update
3、修改：
rs("字段1")=变量1
rs("字段2")=变量2
........
rs.update
4、删除：
（条件选择删除的记录）
if rs("字段X")=某变量 then
rs.delete
end if
Dim strSQL
strSQL="INSERT INTO 你的数据表名 (name,txt,mail,