SchemaTable - How to read/write values out

[John McCarthy]

Dim oDT As New DataTable()
Dim oDC As New DataColumn()
Dim oDR As DataRow

From functions in a class -

(1) get the schema for tables authors - works

..Set_ActiveTableName("AUTHORS")
..Set_cmdPubsTableDirect(.Get_ActiveTableName)
oDT = .Get_odrPubs(True).GetSchemaTable
Get_odrPubs(False).Close()

(2) Write out values to screen - does not work

For Each oDR In oDT.Rows
For Each oDC In oDT.Columns
Response.Write(oDR[odc.tostring()])
Next
Next

Would someone show me the correct code for the
for loops

regards,
John McCarthy