當前位置:首頁 » 文件管理 » vbnet刪除文件夾及文件夾

vbnet刪除文件夾及文件夾

發布時間: 2022-02-28 14:11:39

1. vb.net 創建文件夾和刪除文件夾

Private Sub btnRemovePath_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnRemovePath.Click
Try
' 先建立目錄以便用於後續的刪除示範。
If Not Directory.Exists("D:\網易") Then
Directory.CreateDirectory(" D:\網易 \Test1")
Directory.CreateDirectory(" D:\網易 \Test2")
Directory.CreateDirectory(" D:\網易 \Test3")
End If
' 刪除子目錄 Test1。
Directory.Delete(" D:\網易 \Test1", True)
' 刪除子目錄 Test2。
Dim myDirectoryInfo As New DirectoryInfo(" D:\網易 \Test2")
myDirectoryInfo.Delete(True)
' 將目錄 C:\AlexDirDemo 及其以下的文件和子目錄全數刪除。
Directory.Delete(" D:\網易 ", True)
Catch ex As Exception
MessageBox.Show(ex.Message)
Exit Sub
End Try
' 啟動 Windows 資源管理器。
Process.Start("explorer.exe", "D:\")
End Sub

2. vb.net刪除文件

PrivateSubbtnRemovePath_Click(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)HandlesbtnRemovePath.Click
Try
'先建立目錄以便用於後續的刪除示範。
IfNotDirectory.Exists("D:網易")Then
Directory.CreateDirectory("D:網易Test1")
Directory.CreateDirectory("D:網易Test2")
Directory.CreateDirectory("D:網易Test3")
EndIf
'刪除子目錄Test1。
Directory.Delete("D:網易Test1",True)
'刪除子目錄Test2。
("D:網易Test2")
myDirectoryInfo.Delete(True)
'將目錄C:AlexDirDemo及其以下的文件和子目錄全數刪除。
Directory.Delete("D:網易",True)
CatchexAsException
MessageBox.Show(ex.Message)
ExitSub
EndTry
'啟動Windows資源管理器。
Process.Start("explorer.exe","D:")
EndSub

3. ASP.NET中如何實現刪除文件夾

界面布置主界面設計中有個「刪除」按鈕,其(ID)為btnDelete。用戶在目錄瀏覽中選中要刪除的項後,單擊該按鈕就可以完成刪除工作。代碼實現在「設計」面板中雙擊「刪除」按鈕,為其添加事件處理程序如下: private void BtnDelete_Click(object sender, System.EventArgs e) { DeleteThings(FileList.SelectedItem.Text); } private void DeleteThings(string FullPath) { if(FullPath.IndexOf(".")>0) //刪除文件{ File.Delete(FullPath); LoadDir(CurrentPath); //重新載入當前目錄} else //刪除目錄{ Directory.Delete(FullPath); LoadDir(CurrentPath); //重新載入當前目錄} } 刪除時首先判斷選中的是文件還是文件夾。如果是文件,則調用File.Delete()方法;反之則調用Directory.Delete()方法。刪除成功後再調用LoadDir()方法顯示更改後的目錄內容。

4. .NET下怎麼刪除一個文件夾下的所有文件

一個的話是 File.Delete(「路徑」)

5. vb如何刪除指定目錄下的全部文件

文件都是有結構的,不能憑空創造一個,目錄倒是可以(例如:mkdir
"c:\mulu")
以下代碼在c:\mulu下建立一個記事本文件1.txt:
private
sub
form_click()
mkdir
"c:\mulu"
open
"c:\mulu\1.txt"
for
output
as
#121
print
#121,
"內容"
close
#121
end
sub
當然你也可以修改此文件的信息,後綴等

6. .net刪除指定的文件

stringPath;//路徑
if(System.IO.Directory.Exists(Path))
{
//Searchthedirectory
DirectoryInfodi=newDirectoryInfo(Path);
FileInfo[]f=di.GetFiles("*.xls");//文件夾下的.xls文件
//FileInfo[]f=di.GetFiles();//文件夾下所有文件
foreach(FileInfomyFileinf)
{
myFile..Delete()//刪除這個文件就可以了
}
}

7. .net 如何刪除文件及目錄

Directory.Delete("路徑",true);//刪除路徑及以下所有文件

8. vb.net怎麼強制刪除文件

先殺進程再刪除文件

Visual Basic code

//殺進程代碼
PrivateSubKillProcess(ByValprocessNameAsString)
DimmyprocAsSystem.Diagnostics.Process=NewSystem.Diagnostics.Process
Try
.GetProcessesByName(processName)
If(Notthisproc.CloseMainWindow())Then
thisproc.Kill()
EndIf
Next
Catch
EndTry
EndSub

9. c#+asp.net如何刪除指定路徑下的文件和文件夾

.net提供了一個靜態類Directory 用以處理文件夾相關操作 要刪除指定路徑下的文件和文件夾的話 可以使用Directory.Exists方法判斷該路徑是否存在 如果存在使用Directory.GetDirectories獲取該路徑下所有子文件夾 通過遍歷使用Directory.Delete方法刪除 再通過Directory.GetFiles獲取該路徑下所有文件 遍歷使用File.Delete方法刪除 具體代碼如下

if(Directory.Exists(yourPath))
{
//獲取指定路徑下所有文件夾
string[]folderPaths=Directory.GetDirectories(yourPath);

foreach(stringfolderPathinfolderPaths)
Directory.Delete(folderPath,true);
//獲取指定路徑下所有文件
string[]filePaths=Directory.GetFiles(yourPath);

foreach(stringfilePathinfilePaths)
File.Delete(filePath);
}


如果你需要連你指定的文件夾一起刪除 就簡單的多 如下

if(Directory.Exists(yourPath))
Directory.Delete(yourPath,true);

上述兩例中的yourPath應為指定文件夾的路徑 如: D: est 第一例則會刪除test文件夾下的所有子項 第二例則是test文件夾及其子項一起刪除 需要注意的是Directory.Delete方法有兩個重載 舉例說明:

Directory.Delete(yourPath);//如果yourPath有子項則刪除失敗拋出異常
Directory.Delete(yourPath,true);//第二個為bool類型參數表示是否需要使用遞歸刪除

補充說明 如果只是需要刪除文件 就使用File類 如下

if(File.Exists(filePath))
File.Delete(filePath)

上例中的filePath為文件的完整路徑 如: C: est est.txt

10. 用VB.NET 刪除文件夾 連帶這子目錄一起刪除怎麼處理

看看這個,有刪除的
Public strPath As String '要導出的文件夾路徑
Public NewFile As String '文件保存用
'創建文件夾
Public Sub CreatemyFolder(str As String)
Dim Mybook As Workbook
Dim f
Dim mypath As String
'Dim NewFile As String
Dim strPathFolder$
Dim abc As Object
NewFile = str
'強制覆蓋保存時,不讓確認框彈出?
Application.DisplayAlerts = False
Set Mybook = ThisWorkbook '把當前工作簿定義為變數Mybook
mypath = ThisWorkbook.Path & "\"
strPathFolder = mypath & NewFile
strPath = strPathFolder & "\"

On Error Resume Next
Set abc = CreateObject("Scripting.FileSystemObject")
If abc.FolderExists(strPathFolder) = True Then
'===刪除文件夾==========
Set f = abc.GetFolder(strPathFolder)
f.Delete
abc.CreateFolder (strPathFolder)
'===刪除文件夾==========
Exit Sub
Else
abc.CreateFolder (strPathFolder)
End If

Set abc = Nothing
End Sub

熱點內容
微軟安卓編譯軟體 發布:2024-10-28 12:16:05 瀏覽:564
蘋果軟體如何關閉存儲 發布:2024-10-28 12:08:57 瀏覽:625
ie設置代理伺服器地址 發布:2024-10-28 11:52:37 瀏覽:657
如何製作一個好的伺服器 發布:2024-10-28 11:45:07 瀏覽:401
python核心編程第2版 發布:2024-10-28 11:40:34 瀏覽:504
雲伺服器如何搭建手游服務端 發布:2024-10-28 11:39:36 瀏覽:834
python讀取漢字 發布:2024-10-28 11:32:32 瀏覽:558
文件夾運行cmd 發布:2024-10-28 11:22:34 瀏覽:206
我的世界空島伺服器地址 發布:2024-10-28 11:22:17 瀏覽:550
備課系統源碼 發布:2024-10-28 11:15:23 瀏覽:191