Question

我有一个将ASCII编码文件转换为EBCDIC编码文件的应用程序。我的问题是，每当我尝试使用其他转换工具（EBCDIC到ASCII）时，我都遇到了问题。

这是我获取代码http://support.microsoft.com/kb/216399

的地方

CS？NTPRC？37-MAY MTLAW 4RY？ - 这应该是结果。

CcCs @@ CnCtCp $$ CrCc @@ C？C？-CmCaCy CmCtClCaCw C？$$ CrCy @@ CmCtClCaCw $$ - 我的档案内容。

Answer 1

不要使用该代码，在.NET中支持处理不同的编码：

Imports System.IO
Imports System.Text

Module Conversions
    Public Sub ConvertAsciiToEbcdic(ByVal inpath As String, ByVal outpath As String)
        Using sr As New StreamReader(inpath, Encoding.ASCII)
            Using sw As New StreamWriter(outpath, False, Encoding.GetEncoding(37))
                Do
                    Dim line = sr.ReadLine()
                    If line Is Nothing Then Exit Do
                    sw.WriteLine(line)
                Loop
            End Using
        End Using
    End Sub
End Module

如果你想以相反的方式转换，只需交换编码。

VB.Net/C# - ASCII到EBCDIC

1 个答案: