哪位高手能帮帮忙？？

来源：百度知道 编辑：UC知道 时间：2024/05/07 12:10:27
<% @ language=vbscript %>
<html>
<head><title>Write mdb</title></head>
<body>
<%
strQuery="SELECT*FROM person"
set rs=Server.CreateObject("ADODB.recordset")
rs.open strQuery,"driver={Microsoft Access Driver(*.mdb)};DBQ=
"& Server.Mappath("test.mdb") &";",3,3
rs.AddNew
rs("Name")="honeybee"
rs("Sex")="女"
rs("Age")="20"
rs("Addr")="樱花园"
rs("Phone")="6221234"
rs.Update
rs.close
set rs=nothing
%>
<H4>
新的记录已加入test.mdb的person数据表。
</H4>
</body>
</html>

<% @ language=vbscript %>
<html>
<head><title>Write mdb</title></head>
<body>
<%
set conn=Server.CreateObject("ADODB.Connection")
DBPath = Server.MapPath("test.mdb")
conn.Open "provider=microsoft.jet.oledb.4.0;data source="&dbpath
conn.execute("insert into person(Name,Sex,Age,Addr,Phone) values('honeybee','女',20,'樱花园','6221234')")
conn.close
set conn=nothing
%>
<H4>
新的记录已加入test.mdb的person数据表。
</H4>
</body>
</html>