select top 100 from "数据库名" where customerID >400 order by customerID desc
sqlstr="select top 100 from XXX where ID>=400 order by ID ASC" set datagrid1.datasource=rs datagrid1.refresh 因为datagrid中的记录就是rs中的记录,所以只要将rs中的记录导出就行了。open "d:\myrcordset.txt" as #1 for i=0 to rs.recordcount-1 for j=0 to rs.Fields.Count-1 print #1 rs.fields(j) print # ";" next j next i close
2.用循环语句读出数据然后写入文件。
例:
open "1.txt" as #1
for i=0 to ?(“你自己定“)
print #1 mydata(i)
close
set datagrid1.datasource=rs
datagrid1.refresh
因为datagrid中的记录就是rs中的记录,所以只要将rs中的记录导出就行了。open "d:\myrcordset.txt" as #1
for i=0 to rs.recordcount-1
for j=0 to rs.Fields.Count-1
print #1 rs.fields(j)
print # ";"
next j
next i
close