FileSystem.FileOpen 方法

定义

命名空间:

Microsoft.VisualBasic

程序集:

Microsoft.VisualBasic.Core.dll

Source:

FileSystem.vb

打开一个文件以进行输入或输出。 相比 FileOpen，My 功能可使文件 I/O 操作的效率更高、性能更好。 有关详细信息，请参阅 FileSystem。

public static void FileOpen (int FileNumber, string FileName, Microsoft.VisualBasic.OpenMode Mode, Microsoft.VisualBasic.OpenAccess Access = Microsoft.VisualBasic.OpenAccess.Default, Microsoft.VisualBasic.OpenShare Share = Microsoft.VisualBasic.OpenShare.Default, int RecordLength = -1);

static member FileOpen : int * string * Microsoft.VisualBasic.OpenMode * Microsoft.VisualBasic.OpenAccess * Microsoft.VisualBasic.OpenShare * int -> unit

Public Sub FileOpen (FileNumber As Integer, FileName As String, Mode As OpenMode, Optional Access As OpenAccess = Microsoft.VisualBasic.OpenAccess.Default, Optional Share As OpenShare = Microsoft.VisualBasic.OpenShare.Default, Optional RecordLength As Integer = -1)

参数

FileNumber

Int32

必需。 任何有效文件数。 可使用 FreeFile 函数获取下一个可用的文件号。

FileName

String

必需。 一个指定文件名的字符串表达式，其中可包含目录或文件夹以及驱动器。

Mode

OpenMode

必需。 指定文件模式的枚举：Append、Binary、Input、Output 或 Random。 有关更多信息，请参见OpenMode。

Access

OpenAccess

可选。 一个枚举，它指定对打开的文件所允许进行的操作：Read、Write 或 ReadWrite。 默认为 ReadWrite。 有关更多信息，请参见OpenAccess。

Share

OpenShare

可选。 一个枚举，它指定不允许其他进程对打开的文件所进行的操作：Shared、Lock Read、Lock Write 和 Lock Read Write。 默认为 Lock Read Write。 有关更多信息，请参见OpenShare。

RecordLength

Int32

可选。 小于或等于 32,767（字节）的数字。 对于为进行随机访问而打开的文件，此值是记录的长度。 对于顺序文件，此值是缓冲的字符数。

例外

ArgumentException

记录长度是负数（并且不等于 -1）。

IOException

FileName 已经打开，或 FileName 无效。

示例

此示例演示函数的各种 FileOpen 用法，以启用文件的输入和输出。

以下代码在Input模式下打开文件TestFile。

FileOpen(1, "TESTFILE", OpenMode.Input)
' Close before reopening in another mode.
FileClose(1)

本示例仅在 Binary 模式下打开文件以执行写入操作。

FileOpen(1, "TESTFILE", OpenMode.Binary, OpenAccess.Write)
' Close before reopening in another mode.
FileClose(1)

以下示例在 Random 模式下打开文件。 文件包含结构 Person的记录。

Structure Person
    <VBFixedString(30)> Dim Name As String
    Dim ID As Integer
End Structure
Public Sub ExampleMethod()
    ' Count 30 for the string, plus 4 for the integer.
    FileOpen(1, "TESTFILE", OpenMode.Random, , , 34)
    ' Close before reopening in another mode.
    FileClose(1)
End Sub

此代码示例在 Output 模式下打开文件;任何进程都可以读取或写入文件。

FileOpen(1, "TESTFILE", OpenMode.Output, OpenAccess.Default, OpenShare.Shared)
' Close before reopening in another mode.
FileClose(1)

此代码示例在 Binary 读取模式下打开文件;其他进程无法读取文件。

FileOpen(1, "TESTFILE", OpenMode.Binary, OpenAccess.Read,
   OpenShare.LockRead)

注解

提供 FileOpen 函数是为了向后兼容，可能会影响性能。 对于非旧应用程序，对象 My.Computer.FileSystem 提供更好的性能。 有关详细信息，请参阅 Visual Basic 中的文件访问。

必须先打开文件，然后才能对该文件执行任何 I/O 操作。 FileOpen 为文件分配用于 I/O 的缓冲区，并确定要与缓冲区一起使用的访问模式。

重要

写入文件时，如果应用程序尝试写入的文件不存在，则应用程序可能必须创建文件。 为此，它需要具有在其中创建文件的目录的权限。 但是，如果 指定的 FileName 文件确实存在，则应用程序只需要 Write 对文件本身具有权限。 为了帮助提高安全性，请在部署期间创建文件，并仅向该文件授予权限，而不是向整个目录授予 Write 权限。 为了帮助提高安全性，请将数据写入用户目录，而不是写入根目录或 Program Files 目录。

可以使用 函数找到要打开的 FreeFile() 通道。

重要

函数 FileOpen 需要 Read 从 FileIOPermissionAccess 枚举访问，这可能会影响其在部分信任情况下的执行。 有关详细信息，请参阅 FileIOPermissionAccess。

另请参阅

• FileClose(Int32[])
• FreeFile()
• 从文件读取 (Visual Basic)
• 写入文件 (Visual Basic)