支援圖書館教育局
。支持庫iext
數據庫連接1。連接到SQLServer(,,)。
記錄集1。設置連接(數據庫連接1)
記錄集1。Open("從表中選擇列",#SQL語句,)
。計數循環頭(記錄集1。記錄數量,n1)
記錄集1。閱讀文本(“列”,臨時)
超級列表框1。插入表格項目(n1,臨時,,,)
。計數周期尾部()
。計數循環頭(超級列表框1。取條目數(),n2)
寫入文件(" XX.txt ",超級列表框1。取題(n2,)。