作者:达通兴电脑科技公司(www.study01job.com) 郭宝利
问题的提出:
[求助]datawindow的saveas()怎么样才能把抬头的中文名称也保存下来
用datawindow的saveas()时,导出带头的文本或者是excel文件时,总是把抬头替换成了数据库里的英文列名,有什么办法能把数据窗口里抬头上的中文名称也一并保存下来吗?谢谢各位指教!如果很麻烦通过本人QQ:10110611或者邮箱:heshizhen@163.com联系也可,谢谢!
我的解答:
思路如下:
1、获取汉字信息:
For li_index = 1 to integer(dw_1.object.DataWindow.Column.Count)
ls_ColNam = dw_1.Describe('#' + String(li_index) + '.name')
ls_ColName = dw_1.Describe(ls_ColName + '_t.text')
ls_Chinese = ls_ColName + '~t' + ls_ColName
next
if Len(ls_Chinese) > 1 then ls_Chinese = Right(ls_Chinese,len(ls_Chinese) - 1)
2、保存数据:
dw_1.SaveAs(.....................
3、将汉字信息写入到该文件。这是很简单的问题,不重复了。
时间: 2024-11-08 19:16:29