只导入。jpg 文件，该怎么办？ - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 只导入。jpg 文件，该怎么办？

共有4682人关注过本帖树形打印复制链接主题：只导入。jpg 文件，该怎么办？

jinzhengbe

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

加好友

发短信

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

只导入。jpg 文件，该怎么办？ 发帖心情

Post By：2013/5/10 12:55:00 [只看该作者]

再下面这段代码中我只想导入。jpg 文件，不想导入其他文件，该怎么办？

Dim Val As String
For Each File As String In FileSys.GetFiles("f:\图片")
    Dim f As Io.FileInfo =   FileSys.GetFileInfo(File)
    Val = Val & "|" & f.Name
Next
Dim Values() As String
Values = Val.split("|")
For Index As Integer = 0 To Values.Length - 1
    Dim r As Row = Tables("newmoo_product").AddNew
    Dim s As Row = Tables("shop").AddNew
    s("商品原始图片") = Values(Index)
    r("ppp") = Values(Index)
Next