hur.cn - 华软网

 热门搜索

请问大家pb如何将数据导出成txt文件?(急!小女在线等)

  作者:未知    来源:网络    更新时间:2018/6/13
请问我的程序是这样的需要把查询后的数据窗口对象里数据
导出成txt的文件?如何实现呢?
请给我大侠赐教,多谢各位了!!
------华软网友回答------
dw_cx.SaveAsAscii("H:\Q2\RESULTS.TXT","&","'")
------华软网友回复------
小MM的问题我喜欢亲手指导  

在这里交流可能效果不好 :-0)
------华软网友回复------
dw_1.saveas()

------华软网友回复------
dw_1.saveas()

------华软网友回复------
dw_1.saveas("你的文件路径",text! ,true)  text!是你存储文件的类型. true 类型是否代标题头
------华软网友回复------
......................
------华软网友回复------
string named,s_grxh,gs_pathname
int  excelok,li_net
long li_count,i
Boolean lb_suc
Long ll_apphandle


oleobject excelserver
excelserver=create oleobject 
excelok=excelserver.connecttonewobject("excel.application") 

//检查返回值,以确保已成功地连接到了Excel
if excelok <> 0 then 
messagebox("信息提示","连接EXCEL失败,请检查计算机中是否安装了EXCEL!") 
return -1
end if 
li_net = GetFileOpenName("选择文件", gs_pathname,named,"xls","Excel文件(*.xls),*.xls") 

if li_net > 0 then
dw.settransobject(sqlca)
dw.reset()
excelserver.workbooks.open(gs_pathname) 
excelserver.activesheet.cells.copy
li_count = dw.importclipboard()  //导入数据 
clipboard("") 

excelserver.quit() 
excelserver.disconnectobject() 

destroy excelserver 
return 1
else
messagebox('信息提示','没有指定导入文件!')
return -1
end if
默认状态下,导为EXCEL格式
将:li_net = GetFileOpenName("选择文件", gs_pathname,named,"xls","Excel文件(*.xls),*.xls")
修改为:
li_net = GetFileOpenName("选择文件", gs_pathname,named,"txt","Excel文件(*.txt),*.txt")
导出TXT格式。
------华软网友回复------
多谢大家了,我去试试      
华软声明:本内容来自网络,如有侵犯您版权请来信指出,本站立即删除。