Converting System.Type To OleDbType?

Using the code

Dim dr As OleDbDataReader
Dim dbconn As New OleDbConnection
dbconn.ConnectionString =
"Provider=Microsoft.Jet.OLEDB.4.0;Data source=" & "C:MyData.mdb"

[code]....

I can extract

ColumnName = Item
ColumnSize = 80
DataType = System.String

But to write a Parameter I need to convert this to

UpDateCmd.Parameters.Add("Item", OleDbType.BSTR, 80).Value

Is there an easier way of converting DataType = System.String to OleDbType.BSTR than having to make a list with Select Case?Or is there a method to find OleDbType.BSTR rather than reading DataType = System.String?I also tried

SchemaTable = dbconn.GetOleDbSchemaTable(System.Data.OleDb.
OleDbSchemaGuid.Columns, New Object() {Nothing, Nothing, "Auction"})
Dim RowCount As Int32

[code]....

But that also returns DataType = System.String.