易表在线答疑技术与交流用户社区 → [求助]ImportTextFile的使用问题


  共有5690人关注过本帖树形打印复制链接

主题:[求助]ImportTextFile的使用问题

帅哥哟,离线,有人找我吗?
zi008
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:论坛游民 帖子:56 积分:0 威望:0 精华:0 注册:2009/10/12 9:18:00
[求助]ImportTextFile的使用问题  发帖心情 Post By:2009/11/30 11:48:00 [只看该作者]

ImportTextFile("c:\abc.txt", ",", Char(13), 0)
合并文件c:\abc.txt,行分隔符为逗号,列分隔符为回车符,包括所有行。

我现在不要所有行,只要指定的某一行,其他的全部剔除掉该怎么改这函数啊,比如只要15行:
ImportTextFile("c:\abc.txt", ",", Char(13), 15,15)这样吗?好象不行哦


 回到顶部
帅哥哟,离线,有人找我吗?
smileboy
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:8672 积分:1734 威望:0 精华:0 注册:2006/8/11 10:52:00
  发帖心情 Post By:2009/11/30 11:59:00 [只看该作者]

试试ImportTextFile("c:\abc.txt", ",", Char(13),15)
不行的话,只能采用过渡表来操作了

 回到顶部
帅哥哟,离线,有人找我吗?
zi008
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:论坛游民 帖子:56 积分:0 威望:0 精华:0 注册:2009/10/12 9:18:00
  发帖心情 Post By:2009/11/30 13:38:00 [只看该作者]

不行,那是抓取15行以下所有行

 回到顶部
帅哥哟,离线,有人找我吗?
zi008
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:论坛游民 帖子:56 积分:0 威望:0 精华:0 注册:2009/10/12 9:18:00
  发帖心情 Post By:2009/11/30 13:45:00 [只看该作者]

请问有抓取所导入的文本文档的文件名这个函数吗?

 回到顶部
帅哥哟,离线,有人找我吗?
smileboy
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:8672 积分:1734 威望:0 精华:0 注册:2006/8/11 10:52:00
  发帖心情 Post By:2009/11/30 14:07:00 [只看该作者]

GetFileName
利用文件对话框获得一个文件名。

语法:

GetFileName(Filter, Title, Mode)

Filter
过滤器,指定在对话框的文件列表框中显示的文件的类型。
过滤器由description和fifter组成,中间使用使用符号“|”隔开。例如,选择过滤器为Text Files|*.txt,就显示所有的文本文件,前面的Text Files是description,后面的*.txt是fifter,fifter可以有多个文件类型组成,不同的文件类型用分号(;)隔开。
可以同时提供多个过滤器,这样话框显示时将出现一个过滤器列表,用它可以进行选择文件类型,过滤器之间同样使用符号“|”隔开。下列代码给出一个过滤器的例子,该过滤器允许选择文本文件或含有位图和图标的图形文件:
Text Files|*.txt|Pictures Files|*.bmp;*.ico

Tiltle   对话框标题

Mode     对话框类型,0为打开方式,1为保存方式

例子:
1、备份当前文件,备份文件的名称和位置由用户自己确定,可以增加一个按钮或菜单项,将其公式设为:
Save() And BackupFile(GetFileName("易表文件|*.egd","备份",1))

2、假定有一个照片列,希望由用户通过对话框选择照片填入到照片列,公式为:
SetCellText(GridName,Row,"照片",GetFileName("图形文件|*.jpg;*.bmp","选择照片",0))

需要注意的是,GetFileName和某些函数之间可能存在函数嵌套问题,解决办法参考函数嵌套问题


 回到顶部