kprashan
Sep 19th, 2002, 12:23 AM
OK, I am trying to get to an ACCESS DB with a DataReader but my code just doesnt want to work
Dim MyConnection as OLEDBConnection
MyConnection = New OleDBConnection("Provider=Microsoft.Jet.OLEDB.4.0;User ID=Admin;Data Source=" & fDir.AppDomainAppPath & "CTDBv1.mdb;")
Dim DeleteBUSADD As String = "SELECT * FROM BUSADD"
Dim catCMD2 As OleDbCommand = New OleDbCommand(DeleteBUSADD, MyConnection)
Dim custReader2 As OleDbDataReader = catCMD2.ExecuteReader()
Do While custReader2.Read()
Message.InnerHtml = "WHAZZUP"
Message.Style("color") = "red"
Loop
custReader2.Close
MyConnection.Close
I have 2 records in my database, but my code just doesn't get into the Do Loop. Any pointers???
I have imported System.Data and System.Data.OLeDb too.
Dim MyConnection as OLEDBConnection
MyConnection = New OleDBConnection("Provider=Microsoft.Jet.OLEDB.4.0;User ID=Admin;Data Source=" & fDir.AppDomainAppPath & "CTDBv1.mdb;")
Dim DeleteBUSADD As String = "SELECT * FROM BUSADD"
Dim catCMD2 As OleDbCommand = New OleDbCommand(DeleteBUSADD, MyConnection)
Dim custReader2 As OleDbDataReader = catCMD2.ExecuteReader()
Do While custReader2.Read()
Message.InnerHtml = "WHAZZUP"
Message.Style("color") = "red"
Loop
custReader2.Close
MyConnection.Close
I have 2 records in my database, but my code just doesn't get into the Do Loop. Any pointers???
I have imported System.Data and System.Data.OLeDb too.