| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 647 人关注过本帖
标题:拐弯抹角的读取简易EXCEL文件 - -。 有点问题请教
只看楼主 加入收藏
ysiso9001
Rank: 1
等 级:新手上路
帖 子:28
专家分:7
注 册:2013-4-23
结帖率:100%
收藏
已结贴  问题点数:20 回复次数:3 
拐弯抹角的读取简易EXCEL文件 - -。 有点问题请教
我看很多读取EXCEL的代码 好像都是创建一个EXCEL对象 由于接触VF不深 又无意间看到了 IMPORT这个命令
但是 论坛里有人发的 这样读取字段名会改变,所以我用ALTER来修改字段名 和 字段类型长度 然后PACK掉第一条记录

在创建数组 把字段名赋给数组时 出了点问题 - -
FILED(I) I是个变量 从1到FCOUNT()

当把这个函数的返回值赋给数组成员 MY_ARRAY(I)时会出现“函数的值操作符类型不匹配的错误”,请问是为什么- -?
FOR i = 1 TO FCOUNT()
fieldsname[i] = FIELD(i)
ENDFOR 
搜索更多相关主题的帖子: color EXCEL 
2013-06-03 17:01
sdta
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来 自:江苏省连云港市
等 级:版主
威 望:335
帖 子:9841
专家分:27213
注 册:2012-2-5
收藏
得分:20 
事先要定义数组,数组定义过后,就不会出现楼主所说的问题
程序代码:
LOCAL fieldsname(FCOUNT())
FOR i = 1 TO FCOUNT()
fieldsname[i] = FIELD(i)
ENDFOR

坚守VFP最后的阵地
2013-06-03 17:18
ysiso9001
Rank: 1
等 级:新手上路
帖 子:28
专家分:7
注 册:2013-4-23
收藏
得分:0 
回复 2楼 sdta
程序代码:
IF NOT  USED('20130516')
ELSE 
USE 20130516 IN 0
ENDIF 
GO TOP 

DIMENSION fieldsname(FCOUNT())
DIMENSION fieldsval(FCOUNT())

LOCAL i
i=1

FOR i = 1 TO FCOUNT()
STORE  FIELD(i) to fieldsname[i]
ENDFOR 


FOR i = 1 TO FCOUNT()
fieldsval[i] = EVALUATE(fieldsname[i])
ENDFOR 

FOR i = 1 TO FCOUNT()
Alter Table 20130516 Rename column EVALUATE(fieldsname[i]) to EVALUATE(fieldsval[i])
ENDFOR 

我定义过的 ,下面的代码。。。因为我很不熟悉 所以放出来有点丑- - 就只放了一部分 只做了改字段的 但还是会出现那样的情况
2013-06-03 19:23
ysiso9001
Rank: 1
等 级:新手上路
帖 子:28
专家分:7
注 册:2013-4-23
收藏
得分:0 
回复 2楼 sdta
刚看你回复过的那个帖子 - - 原来APPEND FROM 也可以的 改成CSV为什么会从第二行开始读取的- -。求指教
这个是不是字段名还有问题的?我现在没法用VF 但很想知道结果。。。
2013-06-03 19:25
快速回复:拐弯抹角的读取简易EXCEL文件 - -。 有点问题请教
数据加载中...
 
   



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

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