数据表中的 memo 自动转化成为字符型字段。 - VFP论坛

楼主

已结贴√ 问题点数：100 回复次数：3

数据表中的 memo 自动转化成为字符型字段。

我用的是下面的代码：

主要功能：导出sql中的数据表并保存为对应的csv格式的文件。

问题点：导出数据后发现有部分数据是memo型的。而针对memo型字段在copy to d:\hyz type csv 时被自动忽略掉。

程序代码：

PUBLIC m.name 
b =DATETIME()

SET DEFAULT TO SYS(5)-'\kq\prg\hyz'

nCon=SQLSTRINGCONNECT("driver=SQL Server;Server=192.168.1.250;Uid=xx;pwd=xx;database=xxx") 
CLOSE TABLES 
USE prg
SCAN FOR cfm ='y'
    m.prg=ALLTRIM(prrg)
    m.name=ALLTRIM(book)
    ndd=SQLEXEC(nCon,m.prg,m.name)
    COPY TO 'd:\hyz\'-m.name  TYPE CSV 
*    do (m.name) 
ENDSCAN

搜索更多相关主题的帖子: 数据表　

第 2 楼

得分:0

以下是引用sdta在2014-8-27 17:45:49的发言：

贴上MEMO中的内容看看，如果其中有回车换行，数据转换也不会完整的。

这里涉及到23张表都是一次性从SQL中导出来的，memo字段的内容各不相同。

数据不完整没关系，只要能取到数就行。

以下是引用TonyDeng在2014-8-27 22:05:36的发言：

memo字段实际上就是字符串，只不过是突破254字符限制的内存型字符串而已（字段型字符串才限制长度）。要转换为某种外部文件的格式，关键是对方的数据协议是否支持这种超长字符串数据。对转换技术来说，根本就没什么问题。

转换的函数是cast ( 原字段 as c(180)) .

但问题是这里涉及到23张表可能更多，能不能自动帮忙搜索字段，看看哪些是备注型的，然后我们用replace m.name set memo字段 = cast(memo字段 as c（120））

以下是引用qingfameng在2014-8-28 02:32:11的发言：

**（仅供参考其中的形式 vfp 9.0）
close all
trq=DATE()
create cursor bb(a1 i,a2 c(20),a3 t,a4 m)
insert into bb values(1001,'第一',trq+1,'备注文字_1')
insert into bb values(1002,'第二',trq+2,'备注文字_2')
insert into bb values(1003,'第三',trq+3,'备注文字_3')
insert into bb values(1004,'第四',trq+4,'备注文字_4')
**********************************************************

zsj=''
scan
zsj=zsj+STR(a1)+',"'+a2+'","'+DTOS(a3)+'","'+a4+'"'
endscan
go bottom
replace a4 with zsj
copy memo a4 to txt.csv
close all
modify file txt.csv && 打开文件游览

你好，谢谢你的回复，可是我比较笨，不一定明白，还请帮忙，谢谢。

第 3 楼

得分:0

以下是引用sdta在2014-8-28 09:01:47的发言：

上传相关原始数据表，要对症下药。

rwd.zip (1.8 KB)

像这样的数据表比较多，这套程序运行下来大概有二十多个，每一个表的memo字段都不同。

第 4 楼

得分:0

以下是引用sdta在2014-8-28 09:19:28的发言：

至少要2个以上

rwd.rar (2.09 KB)

item.rar (1.4 KB)

这里准备了连个附档，压缩文件里面有具体的数据表，还有用该数据表直接copy to d:\item type csv来导出的csv文件。

谢谢你的回复。