各位大大请帮忙看一下，此问题困扰我很久了，希能得到各位的指点。
我在以下程序中，在F8翻页后屏幕看到的内容更新了，但使用此脚本读屏的内容却没有更新，两次读屏的内容都是一样的，不知是什么问题，请指点。谢谢了！！！！！
Sub main
Dim QTY As String
Dim writing As String
Dim reading1 As String
Dim reading2 As String

emulation "telnet"
filewrite "C:\xhx\po.xls", QTY & Chr(9) & "订单号"
   emreadscreen reading, 14, 8, 2
  writing = QTY & Chr(9) & reading
  fileappend writing
'使用F8翻页
emsendkey "[19~"
  emreadscreen reading, 14, 8, 2
  writing = QTY & Chr(9) & reading
  fileappend writing
End Sub