<%
set objconn=server.createobject("ADODB.connection")
provider="provider=Microsoft.Jet.OLEDB.4.0;"
dbpath="Data Source=" & Server.Mappath("c1.mdb")
objconn.open provider & dbpath
response.write ("<p>连接成功")
session("objjc")=recordcount
function addwords(a,b,c)
dim mysql
mysql="insert into c_1(c_number,c_class,c_chengji)values('"&a&"','"&b&"','"&c&"',)"
objconn.execute mysql
end function
if recordcount>session("objjc") then
response.write "添加成功"
else
response.write "添加失败"
end if
%>




就是没有添加进数据库~~帮帮忙~~(初学者)