主题：动态路径 不会写

If e.DataCol.Name = "项目名称" Then
    If e.NewValue > "" Then
        Dim ftp1 As new ftpclient
        ftp1.host="192.168.1.102"
        ftp1.Account = "city"
        ftp1.password = "city"
        If ftp1.DirExists("/" & e.NewValue & "'"\"客户文件") = False Then
            ftp1.MakeDir("/" & e.NewValue & "'"\"客户文件")

我想在项目文件下多键一个子目录客户文件   不会写了  上面的代码 高手看看怎么改才对。