无法将System.Collections.Hashtable强制转换为类型System.Collections.Generic.IDictionary

Question

我正在使用Enterprise library 5.0，实际上是日志块。在某些情况下，我处理异常下面如果与远程端点连接不是全成：

Public Function Connect(ByVal sender As Socket) As Integer 
    Dim result As Integer 

    result = -1 

    Try 
     ' Connect the socket to the remote endpoint. 
     sender.Connect(remoteEP) 

     Logger.Write("Socket connected to remote endpoint {0}", _ 
        sender.RemoteEndPoint.ToString()) 

     result = 0 

    Catch ... another exception 
    Catch ... another exception 

    Catch ex As System.Net.Sockets.SocketException 
     Using New Tracer(Common.LOGGING_SOCKETCONNECTIONERROR) 
      Dim contextInfo As IDictionary = New Hashtable() 
      contextInfo.Add("Additional Info (Stack Trace)", ex.StackTrace) 

      Dim provider As DebugInformationProvider = New DebugInformationProvider() 
      provider.PopulateDictionary(contextInfo) 

      Dim logEntry As LogEntry = New LogEntry() 
      logEntry.Categories.Add(Common.LOGGING_CRITICAL_ERRORS_CATEGORY) 
      logEntry.Message = String.Format("An error occurred when attempting to access the socket: {0}", ex.Message) 
      logEntry.ExtendedProperties = contextInfo 

      Logger.Write(logEntry) 
     End Using 

    End Try 

    Return result 
End Function 

当异常以上燃煤我行得到一个转换错误：

provider.PopulateDictionary(contextInfo) 

的转换误差为以下：

System.InvalidCastException was unhandled 
    Message="Unable to cast object of type 'System.Collections.Hashtable' to type 'System.Collections.Generic.IDictionary`2[System.String,System.Object]'." 

我在做什么错？

Answer 1

更改：

Dim contextInfo As IDictionary = New Hashtable() 

由：

Dim contextInfo As IDictionary = New Dictionary(Of String, Object) 

解决了这个问题。