关于数据窗口另存为txt文件的问题

[mmliyouzhi]

程序如下：

string docname, named
integer value,value1,li_filenum
if dw_1.rowcount()<1 then return
value = GetFilesaveName("另存为", docname,named,"doc", "Text Files (*.TXT),*.TXT,")
IF value = 1 THEN
value1=dw_1.SaveAsAscii(docname)
if value1 = -1 then messagebox('失败','导出到 '+docname+' 不成功')//判断一下有没有成功
end if



程序执行后，TXT文件没有任何内容（数据窗口有数据），不知何故，望高手解答。

[kkbgp]

你试试在pb中对dw_1进行retrieve后，进行save看能不能有正确结果

[shengjinbo]

用messagebox('',string(value))显示一下value的值，是不是1。

[dingzhaofeng]

1.你的数据窗口的数据是检索出来的还是人工添加的，如果是人工添加的，保存前先使用AcceptText()

2.使用saveas（）试一下？

[xiaoxuw]

可能性都让楼上的给列出来了!

[xlhl]

先这样看有没有问题
value1=dw_1.SaveAsAscii("c:\test.txt")
if value1 = -1 then messagebox('失败','导出到 '+docname+' 不成功')//判断

[xlhl]

string docname,named
GetFilesaveName("另存为", docname,named,"doc", "Text Files (*.TXT),*.TXT,")
messagebox(named,docname)
dw_1.SaveAsAscii(docname)

没问题

[shengjinbo]

ls_fname="c:\book.txt"
dw_1.saveas(ls_fname,text!,TRUE)

ls_fname可以用一个静态文本框获得。
好不好用？