VB.Net怎么創(chuàng)建文件

舉個例子：

創(chuàng)新互聯(lián)公司專注于固安企業(yè)網(wǎng)站建設(shè),自適應(yīng)網(wǎng)站建設(shè),電子商務(wù)商城網(wǎng)站建設(shè)。固安網(wǎng)站建設(shè)公司,為固安等地區(qū)提供建站服務(wù)。全流程定制開發(fā)，專業(yè)設(shè)計，全程項目跟蹤，創(chuàng)新互聯(lián)公司專業(yè)和態(tài)度為您提供的服務(wù)

先引入命名空間：

Imports

System.IOImports

System.Security.AccessControl

代碼：

Dim

sec

As

DirectorySecurity

=

New

DirectorySecurityDim

rule

As

FileSystemAccessRule

=

New

FileSystemAccessRule("Administrator",

FileSystemRights.Delete,

AccessControlType.Allow)sec.AddAccessRule(rule)Directory.CreateDirectory("C:\test",

sec)

這段代碼就是以

Administrator

帳戶

在

C:\

創(chuàng)建

test

文件夾。

VB.NET 創(chuàng)建文件夾

用Directory.CreateDirectory即可創(chuàng)建文件夾：

'?建立目錄

If?Not?Directory.Exists("C:\負屃\"??TextBox1.Text)?Then?'檢查文件夾是否存在

Directory.CreateDirectory("C:\負屃\"??TextBox1.Text)??'不存在，創(chuàng)建文件建夾

End?If

你的例子是因為少了一個"\"引起的，正確的如下：

Dim?fsotest?As?New?FileSystemObject

If?fsotest.FileExists("C:\負屃\"??TextBox1.Text)?=?False?Then

fsotest.CreateFolder("C:\負屃\"??TextBox1.Text) '這里你少了一個\

End?If

MsgBox("創(chuàng)建成功")

請問如何使用VB.NET創(chuàng)建臨時文件

臨時文件通常用于臨時性的數(shù)據(jù)存儲和操作，比如在存儲用戶數(shù)據(jù)、參數(shù)選擇、會話信息、應(yīng)用程序緩存等類型的信息。

為了在VB.NET中獲取臨時文件的文件名，我建議使用Path類的GetTempFileName方法，盡管創(chuàng)建臨時文件的方法有很多種，但是最佳的方案是使用System.IO.Path，因為它可以在當前用戶的臨時目錄中返回唯一的文件名，您可以使用該文件名命名的文件來存儲臨時信息。

需要注意的是，如果多次調(diào)用該方法，那么每次都會生成不同的文件名，即使您沒有使用這些文件名。這樣做是為了防止不同的應(yīng)用軟件之間的沖突。

在列表A的示例代碼中，我定義了字符串變量sTempFileName，并將System.IO.Path.GetTempFileName方法的返回值賦值給該變量，這樣我就擁有了一個可以使用的臨時文件名，然后我創(chuàng)建一個FileStream對象——fsTemp，同時向系統(tǒng)發(fā)出請求來創(chuàng)建文件，這個臨時文件使用的正是sTempFileName中所存儲的文件名。文件創(chuàng)建完成之后，我就開始向文件中添加數(shù)據(jù)（例子中沒有展示這部分代碼），然后將這個文件關(guān)閉。

vb.net 創(chuàng)建文件夾和刪除文件夾

Private Sub btnRemovePath_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnRemovePath.Click

Try

' 先建立目錄以便用于后續(xù)的刪除示范。

If Not Directory.Exists("D:\網(wǎng)易") Then

Directory.CreateDirectory(" D:\網(wǎng)易 \Test1")

Directory.CreateDirectory(" D:\網(wǎng)易 \Test2")

Directory.CreateDirectory(" D:\網(wǎng)易 \Test3")

End If

' 刪除子目錄 Test1。

Directory.Delete(" D:\網(wǎng)易 \Test1", True)

' 刪除子目錄 Test2。

Dim myDirectoryInfo As New DirectoryInfo(" D:\網(wǎng)易 \Test2")

myDirectoryInfo.Delete(True)

' 將目錄 C:\AlexDirDemo 及其以下的文件和子目錄全數(shù)刪除。

Directory.Delete(" D:\網(wǎng)易 ", True)

Catch ex As Exception

MessageBox.Show(ex.Message)

Exit Sub

End Try

' 啟動 Windows 資源管理器。

Process.Start("explorer.exe", "D:\")

End Sub

當前文章：vb.net中創(chuàng)建文件,VBNET教程
分享地址：http://aaarwkj.com/article18/hchedp.html

成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián)，為您提供自適應(yīng)網(wǎng)站、響應(yīng)式網(wǎng)站、服務(wù)器托管、品牌網(wǎng)站制作、品牌網(wǎng)站建設(shè)、移動網(wǎng)站建設(shè)

廣告

聲明：本網(wǎng)站發(fā)布的內(nèi)容（圖片、視頻和文字）以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主，如果涉及侵權(quán)請盡快告知，我們將會在第一時間刪除。文章觀點不代表本網(wǎng)站立場，如需處理請聯(lián)系客服。電話：028-86922220；郵箱：631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載，或轉(zhuǎn)載時需注明來源： 創(chuàng)新互聯(lián)