如何检查文件夹名称是在另一个文件夹内

-1

我需要能够检查网络上的计算机上的文件夹内的文件夹的名称，然后如果它被命名为一种方式相应地设置我的按钮。所以例如我有2个按钮，一个说训练，一个说生产，他们所做的一切就是将网络上的计算机上的文件夹重命名为正确的名称，以便训练其DEV以及用于生产其DEVx。所以当应用程序加载时，我希望它禁用当前设置的那个按钮。所以如果该文件夹被命名为DEV，那么它将禁用训练按钮，如果它的DEVx禁用了生产按钮。如何检查文件夹名称是在另一个文件夹内

这是我到目前为止所有代码的Visual Basic

Public Class Form1 

    Private Sub SetTraining227_Click(sender As Object, e As EventArgs) Handles SetTraining227.Click 
     My.Computer.FileSystem.RenameDirectory("\\amti-0321\c$\temp\DEVx", "DEV") 
     My.Computer.FileSystem.RenameDirectory("\\amti-0448\c$\temp\DEVx", "DEV") 
     My.Computer.FileSystem.RenameDirectory("\\amti-0207\c$\temp\DEVx", "DEV") 
     My.Computer.FileSystem.RenameDirectory("\\amti-0304\c$\temp\DEVx", "DEV") 
     My.Computer.FileSystem.RenameDirectory("\\amti-0005\c$\temp\DEVx", "DEV") 
     My.Computer.FileSystem.RenameDirectory("\\amti-0227\c$\temp\DEVx", "DEV") 
     My.Computer.FileSystem.RenameDirectory("\\amti-0134\c$\temp\DEVx", "DEV") 
     My.Computer.FileSystem.RenameDirectory("\\amti-0295\c$\temp\DEVx", "DEV") 
     My.Computer.FileSystem.RenameDirectory("\\amti-0387\c$\temp\DEVx", "DEV") 
     My.Computer.FileSystem.RenameDirectory("\\amti-0210\c$\temp\DEVx", "DEV") 
     My.Settings.lastSet227 = "training" 
     My.Settings.Save() 
     setting227.Text = "Training" 
     setprod227.Enabled = True 
     SetTraining227.Enabled = False 

    End Sub 

    Private Sub setprod227_Click(sender As Object, e As EventArgs) Handles setprod227.Click 
     My.Computer.FileSystem.RenameDirectory("\\amti-0321\c$\temp\DEV", "DEVx") 
     My.Computer.FileSystem.RenameDirectory("\\amti-0448\c$\temp\DEV", "DEVx") 
     My.Computer.FileSystem.RenameDirectory("\\amti-0207\c$\temp\DEV", "DEVx") 
     My.Computer.FileSystem.RenameDirectory("\\amti-0304\c$\temp\DEV", "DEVx") 
     My.Computer.FileSystem.RenameDirectory("\\amti-0005\c$\temp\DEV", "DEVx") 
     My.Computer.FileSystem.RenameDirectory("\\amti-0227\c$\temp\DEV", "DEVx") 
     My.Computer.FileSystem.RenameDirectory("\\amti-0134\c$\temp\DEV", "DEVx") 
     My.Computer.FileSystem.RenameDirectory("\\amti-0295\c$\temp\DEV", "DEVx") 
     My.Computer.FileSystem.RenameDirectory("\\amti-0387\c$\temp\DEV", "DEVx") 
     My.Computer.FileSystem.RenameDirectory("\\amti-0210\c$\temp\DEV", "DEVx") 
     My.Settings.lastSet227 = "prod" 
     My.Settings.Save() 
     setting227.Text = "Production" 
     setprod227.Enabled = False 
     SetTraining227.Enabled = True 
    End Sub 

    Private Sub QuitToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles QuitToolStripMenuItem.Click 
     End 
    End Sub 
End Class

所以我把它保存其当前状态每个按钮加载时间和设置等按钮被禁用，但由于其他用户将会使用这个系统，它会更好地根据文件夹名称的当前状态设置禁用哪个按钮。

来源

2014-12-13 Kass Eisenmenger

[Directory.GetDirectories（）]（http://msdn.microsoft.com/en-us/library/c1sez4sc%28v=vs.110%29.aspx）？ – TyCobb 2014-12-13 01:20:49

您可以检查“\ amti-0321 \ c $ \ temp \ DEV”是否存在Directory.Exists或Directory.GetDirectories，并适当设置按钮状态。

但是，这可能不是确定培训或生产状态的最佳方式，因为它假设只存在一组目录。另外，为路径使用字符串常量以外的内容会很好。

来源

2014-12-13 03:20:13 xpda

那么只有一个文件夹在那里，或者应该只有一个文件夹。这个切换的应用程序仅检查训练文件夹是否作为DEV存在，如果是这样，则将它从服务器中取出的服务器设置为训练服务器，以便它可以被重命名为任何东西，然后它将使用生产服务器 – 2014-12-13 03:29:13

如何检查文件夹名称是在另一个文件夹内

回答

相关问题