从二进制文件读取可变大小的字符串（VB6与C＃）

Question

我有一个包含以下内容的二进制文件：

以下代码用于在旧的VB6程序中读取此内容：

Private Type tpClient
    Firstname As String
    LastName As String
    Birth As String
    Adres As String
    Geslacht As String
    IDNummer As Long
    SSNummer As String
    DatabaseID As Long
    Telefoon1 As String
    Telefoon2 As String
End Type

Open strFilePath For Random Access Read As #intFileNumber
Get #intFileNumber, 1, ClientData ' ClientData is of type tpClient

现在，我尝试使用新的C＃程序阅读此内容：

[StructLayout(LayoutKind.Sequential, Pack = 1)]
public struct PatientStruct
{
    [MarshalAs(UnmanagedType.BStr)]
    public string FirstName;

    [MarshalAs(UnmanagedType.BStr)]
    public string LastName;

    [MarshalAs(UnmanagedType.BStr)]
    public string BirthDate;

    [MarshalAs(UnmanagedType.BStr)]
    public string Address;

    [MarshalAs(UnmanagedType.BStr)]
    public string Gender;

    [MarshalAs(UnmanagedType.BStr)]
    public string IdNumber;

    [MarshalAs(UnmanagedType.BStr)]
    public string SsNumber;

    [MarshalAs(UnmanagedType.BStr)]
    public string DatabaseId;

    [MarshalAs(UnmanagedType.BStr)]
    public string Telephone1;

    [MarshalAs(UnmanagedType.BStr)]
    public string Telephone2;
}

byte[] buffer = new byte[stream.Length];
stream.Read(buffer, 0, (int)stream.Length);
GCHandle handle = GCHandle.Alloc(buffer, GCHandleType.Pinned);
T stuff = (PatientStruct)Marshal.PtrToStructure(handle.AddrOfPinnedObject(), typeof(T));
handle.Free();

但是，我在调用Marshal.PtrToStructure时收到AccessViolationException。

有什么建议么？

Answer 1

Marshal.PtrToStructure期望buffer充满指向字符串的指针。 我认为Marshal不能用来做你想做的事。

相反，您需要确定二进制文件格式，并为此手工编写代码。 看一下BinaryReader类。

编辑：如果遇到问题，可以添加对Microsoft.VisualBasic.dll的引用，并使用FileSystem.FileGetObject方法。 此行为与VB6中的Get关键字相同。

Answer 2

首先，您的结构根本不应该是结构，而应该是一个类。 结构旨在用于表示单个值的小型不变类型。

完全按照您的需要编组数据类型确实很棘手，而且由于您没有进行互操作，所以您实际上根本不需要编组数据。 仅使用BinaryReader从文件读取数据会更容易。

可以直接读取简单的数据类型，并可以像这样读取字符串：

string value = reader.ReadChars(reader.ReadShort());

打开阅读器时，请指定适当的单字节编码，例如Windows-1252。