# NOT RUN {
query_iterate <- Query(Session, "collection('TestDB/Test.xml')")
while (More(query_iterate)) {
iterResult <- c(iterResult, Next(query_iterate))
}
print(query_iterate)
## Return "0d" "<Line_1 line=\"1\">Content 1</Line_1>"
"0d" "<Line_2 line=\"2\">Content 2</Line_2>"
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab