Connecting To A Database

I'm having trouble with a connection to my database. Which I think its the connect, because I can't see information from on database in my table.

<%Dim connCCOL, strQueryString, rsBooks, intLoopCount%>
<!-- create and open the database connection object -->

<%Set connCCOL = Server.CreateObject("ADODB.Connection")%>
<%connCCOL.Open "Driver={Microsoft Access Driver (*.mdb)};" & _
"DBQ=("../CCOL2.mdb")%>

<!-- create querystring to retrieve books -->
<% strQueryString = "SELECT Title, Aut_num, Publisher, ISBN " & _
"FROM Fiction " %>

<% Set rsBooks = connCCOL.Execute(strQueryString) %>