Hi

I have a problem here. I want to extract the details out for preparation to email these details out. However, when I use the datareader, everything turns weird. Below are my codes, please advice.

Dim selectedDate As DateTime
        Dim selectedCompany As String
        'Dim htmlcodes As String

        selectedDate = ddlDateCreated.SelectedValue
        selectedCompany = ddlCompany.SelectedValue.ToString

        MsgBox(selectedDate + " " + selectedCompany)

        Dim dbconn As OleDbConnection
        Dim sql As String
        Dim dbcomm As OleDbCommand
        Dim dataAdap As OleDbDataAdapter
        Dim ds As DataSet
        Dim dr As OleDbDataReader

        dbconn = New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0; data source=" & Server.MapPath("App_Data/DB.mdb"))
        dbconn.Open()
        sql = "SELECT ID, acct, number, FullName FROM table WHERE comp LIKE '" + selectedCompany + "%'" + " and DateCreated LIKE '" + selectedDate + "%'"

        dbcomm = New OleDbCommand(sql, dbconn)

        dataAdap = New OleDbDataAdapter(dbcomm)


        ds = New DataSet
        Try
                    Ã‚  Â
            dataAdap.Fill(ds)
            GridView1.DataSource = ds
            GridView1.DataBind()

            dr = dbcomm.ExecuteReader
            While dr.Read
                Dim account As String = dr("acct")
                Dim empno As String = dr("number")
                Dim name As String = dr("FullName")

                MsgBox(account + " " + empno + " " + name)
            End While

        Catch ex As Exception
            MsgBox("No records found for " + selectedCompany + " and of date " + selectedDate, MsgBoxStyle.OkOnly, "No Records Found")
        End Try

the datareader always ends with exception error even though there is a record existing in the data base.

Please advice me on which part of the codes I'm wrong in.
Thank you

hi there.. what error do you receive???, can you just change the generic exception to one that will tell you what the error is???

HTH

Gonzalo

================================================== =========
Read this if you want to know how to get a correct reply for your question:
http://www.catb.org/~esr/faqs/smart-questions.html
^^Took that from dparsons signature and he Took that from planoie's profile
================================================== =========
My programs achieved a new certification (can you say the same?):
WORKS ON MY MACHINE
http://www.codinghorror.com/blog/archives/000818.html
================================================== =========
I know that CVS was evil, and now i got the proof:
http://worsethanfailure.com/Articles...-Hate-You.aspx
================================================== =========