我想使用Pharo,Voyage和MongoDB + TeaPot构建一个相对简单的Web应用程序。在我开始这个项目之前,我做了很多研究,还有一个问题:我如何最初将一堆数据上传到MongoDB?我基本上有CSV格式的数据。我是否必须在Smalltalk中对进口商进行编程才能做到这一点?如果我在没有smalltalk的情况下这样做,它将丢失所有的对象ID等。你怎么做这样的事情?
谢谢,亨里克
如果你有CSV
格式的数据,那么我建议你创建一个简单的导入器。您可以使用NeoCSV
然后通过Pharo保存。我假设您知道如何设置Mongo存储库(@workspace):
| repository |
repository := VOMongoRepository
host: VOMongoRepository defaultHost
database: 'MyMongoDb'.
VORepository setRepository: repository.
首先为Voyage创建两个类方法:
Kid class >> isVoyageRoot
^ true "instances of this object will be root"
Kid class >> voyageCollectionName
^ 'Kids' "The collection name in MongoDB"
Kid类应该有firstName(:)
,surname(:)
,age(:)
加速器和同名的实例变量。
然后只需从CSV
读取,然后将其保存到mongoDB
:
| personalInformation readData columnName columnData aKid |
"init variable"
personalInformation := OrderedDictionary new.
"emulate CSV reading"
readData := (NeoCSVReader on: 'firstName, surname, age\John, Smith, 5' withCRs readStream) upToEnd.
columnName := readData first.
columnData := readData second.
"Repeat for as many number of columns you may have"
1 to: columnName size do: [ :index |
personalInformation at: (columnName at: index) put: (columnData at: index)
].
aKid := Kid new.
"Storing Kid object information"
personalInformation keysAndValuesDo: [ :key :value |
aKid perform: (key asString,$:) asSymbol with: value "For every column store the information into a Kid object (you have to have accessors for that)"
].
aKid save "Saving into mongoDB"
这只是为了给你粗略的想法
要在MongoDB中查询,请执行以下操作:
db.Kids.find()
您应该看到存储的信息。
免责声明:即使您的代码应该没问题,我也没有时间在mongoDB上进行实际测试。