| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 1452 人关注过本帖
标题:如何将“江苏十三市特色小吃.txt”数据读入Tsxc.dbf中
只看楼主 加入收藏
王咸美
Rank: 1
等 级:新手上路
帖 子:666
专家分:3
注 册:2018-1-4
结帖率:97.5%
收藏
已结贴  问题点数:20 回复次数:16 
如何将“江苏十三市特色小吃.txt”数据读入Tsxc.dbf中
现有“江苏十三市特色小吃.txt”,如何将“江苏十三市特色小吃.txt”数据读入Tsxc.dbf中,请高手赐教 ,万分感谢!!!
具体数据如下:
图片附件: 游客没有浏览图片的权限,请 登录注册

图片附件: 游客没有浏览图片的权限,请 登录注册


[江苏十三市特色小吃.txt]
苏州 南通 连云港 淮安 泰州
苏州糕团 西亭脆饼 花果山风鹅 盱眙龙虾 泰州烫干丝
卤汁豆腐干 林梓潮糕 东方对虾 淮安茶撒 黄桥烧饼
昆山奥灶面 一柱楼烧饼 文思豆腐 涟水鸡糕 靖江肉脯
苏式鲜肉月饼 金钱萝卜饼 蒸花蟹 活鱼锅贴 姜堰酥饼
糖粥 芙蓉藿香饺 蟹黄煨鱼肚 文楼汤包 泰州鱼汤面
枫镇大面 翡翠文蛤饼 小鱼煎饼 淮安阳春面 蟹黄汤包
苏州蟹壳黄 曹公面 虾婆饼 荠菜包 宣堡小馄饨
酒酿饼 如皋董糖 板浦凉粉 朝牌饼 漆潼鱼饼
苏式蜜饯 白蒲茶千 沙光鱼 淮安豆腐卷 親子粥
南京 无锡 徐州 常州
盐水鸭 酱排骨 徐州把子肉 常州大麻糕
鸭血粉丝汤 无锡小笼包 徐州辣汤 常州银丝面
龙袍蟹黄汤包 无锡三鲜馄饨 徐州烙馍 漂阳风鹅
桂花糖芋苗 无锡油面筋 八股油条 常州汤团
南京梅花糕 无锡糖芋头 羊肉滑脊 常州芝麻糖
状元豆 江阴马蹄酥 蛙鱼 常州三鲜馄饨
牛肉锅贴 萝卜丝饼 沛县冷面 常州素火腿
什锦豆腐涝 酒酿棉子圆 八义集臭豆腐 加蟹小笼包
南京板鸭 玉兰饼 贾汪盐豆 常州虾饼
盐城 扬州 镇江 宿迁
东台鱼汤面 扬州炒饭 镇江肴肉 溜素桂鱼
建湖藕粉圆 扬州烫千丝 锅盖面 膘鸡
阜宁大糕 扬州三丁包子东乡羊肉 新袁羊肉
伍佑糖麻花 黄桥烧饼 京江脐 隆贡酥
盐城鸡蛋饼 千层油糕 镇江糖醋萝卜干 大闸蟹
滨海五粮粥 翡翠烧麦 镇江糖醋蒜 擀面皮
盐城蟹黄汤包 牛皮糖 油撒子 双皮鲫鱼
大冈脆饼 扬州灌汤包 镇江蟹黄汤包 霸王别姬
野鸭灌汤包 扬州盐水鹅 延陵鸭饺 车轮饼

搜索更多相关主题的帖子: 数据 南京 txt 读入 dbf 
2023-02-05 14:20
吹水佬
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
等 级:版主
威 望:451
帖 子:10609
专家分:43210
注 册:2014-5-20
收藏
得分:0 
如果就这些数据,简单编辑一下文件加点标记,一下就可以导入DBF。
2023-02-05 14:46
pvm2000
Rank: 6Rank: 6
等 级:贵宾
威 望:24
帖 子:180
专家分:312
注 册:2022-12-22
收藏
得分:1 
这个用空格作为字段之间的分隔符就能导入。
建个表,然后:
APPEND FROM 江苏十三市特色小吃.txt DELIMITED WITH BLANK
2023-02-05 16:42
sdta
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来 自:江苏省连云港市
等 级:版主
威 望:335
帖 子:9848
专家分:27241
注 册:2012-2-5
收藏
得分:0 
笨方法
程序代码:
CREATE CURSOR tsxc (苏州 C(20),南通 C(20),连云港 C(20),淮安 C(20),泰州 C(20),南京 C(20),无锡 C(20),徐州 C(20),常州 C(20),盐城 C(20),扬州 C(20),镇江 C(20),宿迁 C(20))
FOR ln = 1 TO 9
    APPEND BLANK 
ENDFOR
GO TOP 
TEXT TO lcStr NOSHOW
苏州糕团 西亭脆饼 花果山风鹅 盱眙龙虾 泰州烫干丝
卤汁豆腐干 林梓潮糕 东方对虾 淮安茶撒 黄桥烧饼
昆山奥灶面 一柱楼烧饼 文思豆腐 涟水鸡糕 靖江肉脯
苏式鲜肉月饼 金钱萝卜饼 蒸花蟹 活鱼锅贴 姜堰酥饼
糖粥 芙蓉藿香饺 蟹黄煨鱼肚 文楼汤包 泰州鱼汤面
枫镇大面 翡翠文蛤饼 小鱼煎饼 淮安阳春面 蟹黄汤包
苏州蟹壳黄 曹公面 虾婆饼 荠菜包 宣堡小馄饨
酒酿饼 如皋董糖 板浦凉粉 朝牌饼 漆潼鱼饼
苏式蜜饯 白蒲茶千 沙光鱼 淮安豆腐卷 親子粥
盐水鸭 酱排骨 徐州把子肉 常州大麻糕
鸭血粉丝汤 无锡小笼包 徐州辣汤 常州银丝面
龙袍蟹黄汤包 无锡三鲜馄饨 徐州烙馍 漂阳风鹅 
桂花糖芋苗 无锡油面筋 八股油条 常州汤团
南京梅花糕 无锡糖芋头 羊肉滑脊 常州芝麻糖
状元豆 江阴马蹄酥 蛙鱼 常州三鲜馄饨
牛肉锅贴 萝卜丝饼 沛县冷面 常州素火腿
什锦豆腐涝 酒酿棉子圆 八义集臭豆腐 加蟹小笼包 
南京板鸭 玉兰饼 贾汪盐豆 常州虾饼
东台鱼汤面 扬州炒饭 镇江肴肉 溜素桂鱼 
建湖藕粉圆 扬州烫千丝 锅盖面 膘鸡
阜宁大糕 扬州三丁包子 东乡羊肉 新袁羊肉
伍佑糖麻花 黄桥烧饼 京江脐 隆贡酥
盐城鸡蛋饼 千层油糕 镇江糖醋萝卜干 大闸蟹 
滨海五粮粥 翡翠烧麦 镇江糖醋蒜 擀面皮
盐城蟹黄汤包 牛皮糖 油撒子 双皮鲫鱼
大冈脆饼 扬州灌汤包 镇江蟹黄汤包 霸王别姬
野鸭灌汤包 扬州盐水鹅 延陵鸭饺 车轮饼
ENDTEXT

ALINES(laStr, lcStr, 5, CHR(13)+CHR(10), SPACE(1))
FOR ln0 = 1 TO 3
    ln1 = ICASE(ln0=1, 45, 36)
    ln2 = 9
    lc1 = ICASE(ln0=1,"苏州, 南通, 连云港, 淮安, 泰州", ln0=2,"南京, 无锡, 徐州, 常州", "盐城, 扬州, 镇江, 宿迁")
    LOCAL la[ln1]
    FOR ln = 1 TO ln1
        la[ln] = laStr[ln]
    ENDFOR
    DIMENSION la[ln2, ln1/ln2]
    REPLACE FROM ARRAY la FIELDS &lc1 ALL 
ENDFOR 
BROWSE 

坚守VFP最后的阵地
2023-02-05 17:54
王咸美
Rank: 1
等 级:新手上路
帖 子:666
专家分:3
注 册:2018-1-4
收藏
得分:0 
非常感谢各位的热心指导!!!
2023-02-06 13:30
王咸美
Rank: 1
等 级:新手上路
帖 子:666
专家分:3
注 册:2018-1-4
收藏
得分:0 
@sdta 程序运行出错!只有“苏州 南通 连云港 淮安 泰州”特色小吃是对的,其他都不对,不知为何,还请出手相助,万分感谢!
2023-02-06 14:02
吹水佬
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
等 级:版主
威 望:451
帖 子:10609
专家分:43210
注 册:2014-5-20
收藏
得分:2 
看似是菜谱,菜谱的菜色个数不可能个个地方都是一样的吧,肯定不能用固定行列数来处理。
2023-02-06 14:10
sdta
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来 自:江苏省连云港市
等 级:版主
威 望:335
帖 子:9848
专家分:27241
注 册:2012-2-5
收藏
得分:0 
以下是引用吹水佬在2023-2-6 14:10:11的发言:

看似是菜谱,菜谱的菜色个数不可能个个地方都是一样的吧,肯定不能用固定行列数来处理。

吹版说的有道理,上面的代码就是针对楼主的具体要求写的。
程序代码:
CLEAR
CREATE CURSOR tsxc (苏州 C(20),南通 C(20),连云港 C(20),淮安 C(20),泰州 C(20),南京 C(20),无锡 C(20),徐州 C(20),常州 C(20),盐城 C(20),扬州 C(20),镇江 C(20),宿迁 C(20))
FOR ln = 1 TO 9
    APPEND BLANK 
ENDFOR
GO TOP 
TEXT TO lcStr NOSHOW
苏州糕团 西亭脆饼 花果山风鹅 盱眙龙虾 泰州烫干丝
卤汁豆腐干 林梓潮糕 东方对虾 淮安茶撒 黄桥烧饼
昆山奥灶面 一柱楼烧饼 文思豆腐 涟水鸡糕 靖江肉脯
苏式鲜肉月饼 金钱萝卜饼 蒸花蟹 活鱼锅贴 姜堰酥饼
糖粥 芙蓉藿香饺 蟹黄煨鱼肚 文楼汤包 泰州鱼汤面
枫镇大面 翡翠文蛤饼 小鱼煎饼 淮安阳春面 蟹黄汤包
苏州蟹壳黄 曹公面 虾婆饼 荠菜包 宣堡小馄饨
酒酿饼 如皋董糖 板浦凉粉 朝牌饼 漆潼鱼饼
苏式蜜饯 白蒲茶千 沙光鱼 淮安豆腐卷 親子粥
盐水鸭 酱排骨 徐州把子肉 常州大麻糕
鸭血粉丝汤 无锡小笼包 徐州辣汤 常州银丝面
龙袍蟹黄汤包 无锡三鲜馄饨 徐州烙馍 漂阳风鹅 
桂花糖芋苗 无锡油面筋 八股油条 常州汤团
南京梅花糕 无锡糖芋头 羊肉滑脊 常州芝麻糖
状元豆 江阴马蹄酥 蛙鱼 常州三鲜馄饨
牛肉锅贴 萝卜丝饼 沛县冷面 常州素火腿
什锦豆腐涝 酒酿棉子圆 八义集臭豆腐 加蟹小笼包 
南京板鸭 玉兰饼 贾汪盐豆 常州虾饼
东台鱼汤面 扬州炒饭 镇江肴肉 溜素桂鱼 
建湖藕粉圆 扬州烫千丝 锅盖面 膘鸡
阜宁大糕 扬州三丁包子 东乡羊肉 新袁羊肉
伍佑糖麻花 黄桥烧饼 京江脐 隆贡酥
盐城鸡蛋饼 千层油糕 镇江糖醋萝卜干 大闸蟹 
滨海五粮粥 翡翠烧麦 镇江糖醋蒜 擀面皮
盐城蟹黄汤包 牛皮糖 油撒子 双皮鲫鱼
大冈脆饼 扬州灌汤包 镇江蟹黄汤包 霸王别姬
野鸭灌汤包 扬州盐水鹅 延陵鸭饺 车轮饼
ENDTEXT

ALINES(laStr, lcStr, 5, CHR(13)+CHR(10), SPACE(1))
ln3 = 1
FOR ln0 = 1 TO 3
    ln1 = ICASE(ln0=1, 45, 36)
    ln2 = 9
    lc1 = ICASE(ln0=1,"苏州, 南通, 连云港, 淮安, 泰州", ln0=2,"南京, 无锡, 徐州, 常州", "盐城, 扬州, 镇江, 宿迁")
    LOCAL la[ln1]
    FOR ln = ln3 TO ln1 + ln3 - 1
        la[ln - ln3 + 1] = laStr[ln]
    ENDFOR
    ln3 = ln
    DIMENSION la[ln2, ln1/ln2]
    REPLACE FROM ARRAY la FIELDS &lc1 ALL 
ENDFOR 
BROWSE 

图片附件: 游客没有浏览图片的权限,请 登录注册

坚守VFP最后的阵地
2023-02-06 14:46
王咸美
Rank: 1
等 级:新手上路
帖 子:666
专家分:3
注 册:2018-1-4
收藏
得分:0 
@Sdta 非常感谢!!!
2023-02-06 15:21
王咸美
Rank: 1
等 级:新手上路
帖 子:666
专家分:3
注 册:2018-1-4
收藏
得分:0 
各位大侠,能不改变文本文件: 江苏十三市特色小吃.txt,并将数据读入Tsxc.dbf中,请赐教,谢谢!!!
江苏十三市特色小吃.txt
苏州 南通 连云港 淮安 泰州
苏州糕团 西亭脆饼 花果山风鹅 盱眙龙虾 泰州烫干丝
卤汁豆腐干 林梓潮糕 东方对虾 淮安茶撒 黄桥烧饼
昆山奥灶面 一柱楼烧饼 文思豆腐 涟水鸡糕 靖江肉脯
苏式鲜肉月饼 金钱萝卜饼 蒸花蟹 活鱼锅贴 姜堰酥饼
糖粥 芙蓉藿香饺 蟹黄煨鱼肚 文楼汤包 泰州鱼汤面
枫镇大面 翡翠文蛤饼 小鱼煎饼 淮安阳春面 蟹黄汤包
苏州蟹壳黄 曹公面 虾婆饼 荠菜包 宣堡小馄饨
酒酿饼 如皋董糖 板浦凉粉 朝牌饼 漆潼鱼饼
苏式蜜饯 白蒲茶千 沙光鱼 淮安豆腐卷 親子粥
南京 无锡 徐州 常州
盐水鸭 酱排骨 徐州把子肉 常州大麻糕
鸭血粉丝汤 无锡小笼包 徐州辣汤 常州银丝面
龙袍蟹黄汤包 无锡三鲜馄饨 徐州烙馍 溧阳风鹅
桂花糖芋苗 无锡油面筋 八股油条 常州汤团
南京梅花糕 无锡糖芋头 羊肉滑脊 常州芝麻糖
状元豆 江阴马蹄酥 蛙鱼 常州三鲜馄饨
牛肉锅贴 萝卜丝饼 沛县冷面 常州素火腿
什锦豆腐涝 酒酿棉子圆 八义集臭豆腐 加蟹小笼包
南京板鸭 玉兰饼 贾汪盐豆 常州虾饼
盐城 扬州 镇江 宿迁
东台鱼汤面 扬州炒饭 镇江肴肉 溜素桂鱼
建湖藕粉圆 扬州烫千丝 锅盖面 膘鸡
阜宁大糕 扬州三丁包子 东乡羊肉 新袁羊肉
伍佑糖麻花 黄桥烧饼 京江脐 隆贡酥
盐城鸡蛋饼 千层油糕 镇江糖醋萝卜干 大闸蟹
滨海五粮粥 翡翠烧麦 镇江糖醋蒜 擀面皮
盐城蟹黄汤包 牛皮糖 麻油撒子 双皮鲫鱼
大冈脆饼 扬州灌汤包 镇江蟹黄汤包 霸王别姬
野鸭灌汤包 扬州盐水鹅 延陵鸭饺 车轮饼


[此贴子已经被作者于2023-2-7 16:17编辑过]

2023-02-07 15:06
快速回复:如何将“江苏十三市特色小吃.txt”数据读入Tsxc.dbf中
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.071882 second(s), 9 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved