conn.asp

asp程序,自动投稿系统,也可以用来学生交作业,原创程序.

<%
Set conn = Server.CreateObject("ADODB.Connection")
conn.open "DBQ=" & server.mappath("worker.mdb")&";DRIVER={Microsoft Access Driver (*.mdb)};"
Set rs = Server.CreateObject("ADODB.Recordset")
Set rs1 = Server.CreateObject("ADODB.Recordset")
Set rs2 = Server.CreateObject("ADODB.Recordset")
Set rs3 = Server.CreateObject("ADODB.Recordset")
Set rs4 = Server.CreateObject("ADODB.Recordset")
Set rsuser = Server.CreateObject("ADODB.Recordset")
%>