如何提取文件名的前缀 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 如何提取文件名的前缀

共有5930人关注过本帖树形打印复制链接主题：如何提取文件名的前缀

jinzhengbe

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：五尾狐帖子：1062 积分：9781 威望：0 精华：0 注册：2012/3/13 5:23:00

如何提取文件名的前缀 发帖心情

Post By：2013/5/6 17:00:00 [只看该作者]

如何提取文件名的前缀？

我有两个数据列一个是【图片列】一个是【商品名】

if e.datarow 图片列 then

e.datarow 商品名= 图片列的前缀（这个地方不会写，小弟学艺不精，望指点。）

end if

图片名格式为 *。jpg

[此贴子已经被作者于2013-5-6 17:00:17编辑过]

XYT

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：六尾狐帖子：1418 积分：7167 威望：0 精华：0 注册：2013/3/18 8:37:00

Post By：2013/5/6 17:02:00 [只看该作者]

Dim s As String = "asss.jpg"
s = s.SubString(0,s.LastIndexOf("."))
output.show(s)

Bin

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：贵宾帖子：35433 积分：178524 威望：0 精华：3 注册：2013/3/30 16:36:00

Post By：2013/5/6 17:06:00 [只看该作者]

如果带有文件夹

Dim str As String =Tables("表A").Current("第一列")

MessageBox.SHow((str.SubString(str.LastIndexOf("/")+1,str.length-str.LastIndexOf("/")-1)).split(".")(0))

ztmdnzc

小大 4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：二尾狐帖子：501 积分：4167 威望：0 精华：0 注册：2013/1/18 13:34:00

Post By：2013/6/11 9:42:00 [只看该作者]

如果带有文件夹还可以这样处理：

Dim s As String = Tables("表A").Current("第一列")

s=filesys.GetName(s) '得到的是 asss.jpg

s = s.SubString(0,s.LastIndexOf("."))
output.show(s)

[此贴子已经被作者于2013-6-11 10:11:51编辑过]

主题：如何提取文件名的前缀