% set conn = server.createobject ("adodb.connection") conn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;" & _ "Data Source=" & Server.MapPath("./file2004/newsletter/CompanyInternet.mdb") conn.open set RSIssues = conn.execute("select IssueID,IssueYear,MainArticleTitle from CIIssues " _ & " order by IssueID DESC") set RSIssues1 = conn.execute("select IssueID,IssueYear,MainArticleTitle from CIIssues " _ & " order by IssueID DESC") %>
|