附件文件地址路径 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

这是原来的写法

'DataTables("订单表").DataCols("空间设计图").DefaultFolder = dz & "订单文件"

'DataTables("订单表").DataCols("空间设计图").SourceFolder= "D:\"

'DataTables("订单表").DataCols("原始户型图").DefaultFolder = dz & "订单文件"

'DataTables("订单表").DataCols("原始户型图").SourceFolder= "D:\"

'DataTables("订单表").DataCols("产品定位图").DefaultFolder = dz & "订单文件"

'DataTables("订单表").DataCols("产品定位图").SourceFolder= "D:\"

想换成下面的写法怎么组织好搞不通了

Select Case e.DataCol.Name

Case "空间设计图","原始户型图","产品定位图"

e.DataCol.DefaultFolder = dz & "订单文件"

e.DataCol .SourceFolder= "D:\"

End Select

主题：附件文件地址路径