Wierd Dec expected error on OledbConnection.Open

[qwert231]

The line

objConn.Open()

is getting a 'Declaration expected' error. I cannot see what would need to be declared. Here is the code. So far I haven't been getting much response for my questions here. Please help?

<%@ Control Language=&quot;VB&quot; %>

<%@ import Namespace=&quot;System.Data&quot; %>
<%@ import Namespace=&quot;System.Data.OleDb&quot; %>
<script runat=&quot;server&quot;>

    Public strReq As String
    Public cnt As Integer
    Dim strResult, fldF As String
    Dim objConn As New OledbConnection(Application(&quot;dbAccess&quot;))
    Dim objComm As New OledbCommand (strReq, objConn)
    Dim objRead As OledbDataReader
    
    objConn.Open()
    objRead = objComm.ExecuteReader()
    
    strResult = &quot;<table><tr>&quot;
    Do While objRead.Read()
     For Each fldF in objRead.Fields
      strResult += &quot;<td>&quot; & fldF & &quot;</td>&quot;
     Next
    Loop
    strResult += &quot;<table><tr>&quot;
    objRead.Close()
    objConn.Close()
    
</script>    
<%= strResult %>

 

[qwert231]

Wanted to add, I am using this as an ascx file. Here is how I'm using it in my file:

<%@ Register TagPrefix=&quot;UserControl&quot; TagName=&quot;testTable&quot; Src=&quot;colData.ascx&quot; %>
...
<USERCONTROL:testTable id=&quot;testTable&quot; strReq=&quot;SELECT * FROM Customers&quot; cnt=&quot;2&quot; runat=&quot;Server&quot;></USERCONTROL:Head>