现有Access数据库sdb.mdb中一简单空表stable,有id和stext两个字段。使用ASP技术,写出在网页中如何利用ADO对象与数据库进行连接,并要求使用ADO写出具体语句一次性对该表插入”101”,”asp”和”102”,”ado”两记录,然后再在网页中显示这两行内容。
參考答案:<%
dim conn,
Set conn = Server.CreateObject("ADODB.Connection")
conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq="&Server.MapPath("sdb.mdb")
sql1 = "insert into table1 (id,stext) values('101','asp')"
conn.Execute(sql1)
sql2 = "insert into table1 (id,stext) values('102','ado')"
conn.Execute(sql2)
'因为上边说stale是一个空表,也就是说执行完插入记录后,表中只有你刚才插入的那两条记录。
Set rs = Server.CreateObject("ADODB.RecordSet")
sql = "select * from stable"
rs.open sql,conn,1,1
Do While Not rs.Eof
Response.Write ("<p>id:"&rs("id")&" stext:"&rs("stext")&"</p>")
rs.MoveNext
Loop
rs.Close
Set rs = Nothing
conn.Close
Set conn = Nothing
%>