% @language="vbscript" %> <% Set news_conn = Server.CreateObject("ADODB.Connection") DBPath = Server.MapPath("data/news.mdb") news_conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & DBPath %>
5