组合代码编写求助 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 组合代码编写求助

共有4202人关注过本帖树形打印复制链接主题：组合代码编写求助

yifan3429	小大 1楼 \| 信息 \| 搜索 \| 邮箱 \| 主页 \| UC
加好友发短信等级：九尾狐帖子：2483 积分：22965 威望：0 精华：0 注册：2011/3/29 17:14:00	组合代码编写求助 Post By：2014/7/1 11:23:00 [只看该作者] 用户已被锁定

有点甜

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

加好友

发短信

等级：版主帖子：85326 积分：427815 威望：0 精华：5 注册：2012/10/18 22:13:00

Post By：2014/7/1 11:26:00 [只看该作者]

Case "配图_A","配图_竖A","配图_横A"
    e.SubFolder = dr("文件归档") & "\" & "帮助配图"


Case "配图_A附件","配图_竖A附件","配图_横A附件"
    SystemReady = False
    e.SubFolder =dr("文件归档") & "\" & "帮助配图"
    dr(e.DataCol.name) = iif(dr.IsNull(e.DataCol.name), e.SubFolder & "\" & e.FileName, dr(e.DataCol.name) & chr(13) & e.SubFolder & "\" & e.FileName)
    SystemReady = True

zyqzyy

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

加好友

发短信

等级：四尾狐帖子：823 积分：5902 威望：0 精华：0 注册：2013/7/29 12:00:00

Post By：2014/7/1 11:29:00 [只看该作者]

‘楼主试一下： "\"后面跟的是文件夹，“/”后面跟的是文件名

dr("配图_A","配图_竖A","配图_横A") = iif(dr.IsNull("配图_A","配图_竖A","配图_横A"), e.SubFolder & "/" & e.FileName, dr("配图_A","配图_竖A","配图_横A") & chr(13) & e.SubFolder & "/" & e.FileName)

下一主题 >> << 上一主题

主题：组合代码编写 求助

主题：组合代码编写求助