Mongodb异常无法从vb.net获取下一个数据

我有一个从数据库mongodb获取数据的程序，但我无法获取下一个数据

此代码

Dim listOfBusiness = New Generic.List(Of Business)
Dim mongo As MongoServer = MongoServer.Create(otherComputerToServerSafeUpdate)
mongo.Connect()
Dim db = mongo.GetDatabase("namedatabase")
Using mongo.RequestStart(db)
    Dim collection = db.GetCollection(Of BsonDocument)("tablebusiness")
    Dim queryPlaces = query.WithinRectangle("LongitudeLatitude", (Longitude - minimumBlock), (Latitude - minimumBlock), (Longitude + minimumBlock), (Latitude + minimumBlock))
    Dim ListCollectionBusinessCursor = collection.Find(queryPlaces)
    For Each ReturnedDocument In ListCollectionBusinessCursor
        Dim aBusiness = New Business(ReturnedDocument)
        listOfBusiness.Add(aBusiness)
    Next ReturnedDocument   'Got exception here
End Using

这是我的例外

Mongodb查询异常

QueryFailure flag was assertion db\key.cpp:409 (response was { "$err" : "assertion db\\key.cpp:409" })

我在mongodb shell中尝试queryplace，得到了13个结果

Queryplace="{ "LongitudeLatitude" : { "$within" : { "$box" : [[-80.293072110482868, 26.29], [-80.213072110482855, 26.369999999999997]] } } }"

---

问题是什么？为什么会发生这种情况？这种情况偶尔发生一次。

我收到了此错误消息，解决方案是修复数据库

mongod——修理