Foxtable(狐表)用户栏目专家坐堂 → [求助]怎么读取文件夹下全部doc文件


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

主题:[求助]怎么读取文件夹下全部doc文件

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


加好友 发短信
等级:幼狐 帖子:71 积分:653 威望:0 精华:0 注册:2019/6/2 6:57:00
[求助]怎么读取文件夹下全部doc文件  发帖心情 Post By:2024/8/28 17:27:00 [只看该作者]

怎么读取文件夹下全部doc文件,并获取文件内型号后的内容

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


加好友 发短信
等级:超级版主 帖子:110443 积分:562081 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2024/8/28 17:36:00 [只看该作者]

参考:http://foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=70797&skin=0

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


加好友 发短信
等级:幼狐 帖子:71 积分:653 威望:0 精华:0 注册:2019/6/2 6:57:00
  发帖心情 Post By:2024/8/28 18:07:00 [只看该作者]

上述方法可以找到关键字,比如关键字是ABC,文件里有ABC-111和ABC-2222,怎么能输出这两个字符串

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


加好友 发短信
等级:超级版主 帖子:110443 积分:562081 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2024/8/29 8:40:00 [只看该作者]

ABC-111和ABC-2222后面是还有其它字符?还是有空格,逗号等?如果是空格等符号,取ABC后面的字符串,直接取到空格等符号即可

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


加好友 发短信
等级:幼狐 帖子:71 积分:653 威望:0 精华:0 注册:2019/6/2 6:57:00
  发帖心情 Post By:2024/8/31 1:12:00 [只看该作者]

后面是空格或直接结束了。能帮忙写个例子吗,我现在没有思路

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


加好友 发短信
等级:超级版主 帖子:110443 积分:562081 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2024/8/31 9:09:00 [只看该作者]

比如

dim range  = Doc.Content
if doc.Content.Find.Execute(FindText:="ABC") then
dim s as string = range.Paragraphs(1).Range.Text
dim a as integer = s.indexof("ABC")
id a > -1
msgbox(s.substring(a))
dim b as integer = s.indexof(" ",a)
if b > -1
msgbox(s.substring(a, b-a + 1))
end if
end if
end if

 回到顶部