主题：文件路径

If e.Col.name = "编号" AndAlso e.Row.isnull("编号") = False Then

        If FileSys.DirectoryExists(ProjectPath & e.Row("编号")) = False Then '如果目录不存在

            FileSys.CreateDirectory(ProjectPath & e.Row("编号") & "\1-订单") '则创建之

            FileSys.CreateDirectory(ProjectPath & e.Row("编号") & "\2-图纸") '则创建之

endif

endif

新路径：\\192.168.1.113\wood\四川沃德\订单评审\订单信息

谢谢！