%>
<%
dim conn,connstr
on error resume next
connstr="DBQ="+server.mappath("newsdata/#wxx!news.asp")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"
Set conn=Server.CreateObject("ADODB.CONNECTION")
conn.open connstr
%>
<!--#Include File="youxi/sql/Neeao_SqlIn.Asp"-->

解决方案 »

  1.   

    打开了一个数据库连接,是access的。
      

  2.   

    告诉我们这是个ASP连接ACCESS数据库的东西
      

  3.   


    %>
    <%
    dim conn,connstr '定义变量
    on error resume next  ' 异常处理
    connstr="DBQ="+server.mappath("newsdata/#wxx!news.asp")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};" '数据库连接字符串
    Set conn=Server.CreateObject("ADODB.CONNECTION") '创建数据库连接对象
    conn.open connstr '打开数据库连接
    %>
    <!--#Include File="youxi/sql/Neeao_SqlIn.Asp"--> '注释掉了,原来是引用外部文件
      

  4.   

    wxx!news.asp 应该是个ACCESS的数据库,改了下扩展名防下载
      

  5.   

    这段代码就是创建一个连接到Access数据库的连接对象