none
한국이 제대로 나오지 않아요 RRS feed

  • 질문

  • Using Reader As New  _
                Microsoft.VisualBasic.FileIO.TextFieldParser("C:\Documents and Settings\user\바탕 화면\2011김성석업무\2012예금압류\엄궁농산물신용정보120508.txt")
                Reader.TextFieldType = _
                Microsoft.VisualBasic.FileIO.FieldType.FixedWidth
                Reader.SetFieldWidths(1, 10, 13, 30, 20, 8, 10, 2, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 9, 9, 9, 3, 3, 3, -1)

                Dim currentRow As String()
                Dim 구분 As String, 순번 As String, 주민번호 As String, 이름 As String, 고객번호 As String, 날짜 As String, 스코어 As String
                Dim 결과 As String, 배제1 As String, 배제2 As String, 배제3 As String, 사유1 As String, 사유2 As String, 사유3 As String
                Dim 사유4 As String, 사유5 As String, 사유6 As String, 평점 As String, 등급 As String, 결과값1 As String, 결과값2 As String
                Dim 결과값3 As String, code1 As String, code2 As String, code3 As String, nn As String
                Dim sql As String, ssql As String

     

    엄궁농산물신용정보120508.txt 파일을 불러서 mdb에 저장할려고 하는데 한글이 정상적으로 나오지 않습니다.

    예금들면 : 파일을 보면 김성석이라고 나오는데  VB에서 불러 올 때는 □ □ □ 이런식으로 나옵니다. 도와 주십시요

    2012년 5월 9일 수요일 오전 4:59

모든 응답

  • 안녕하십니까? 김성석 님,
    Microsoft TechNet의Forum 사이트를 방문해 주셔서 감사합니다.

    현재 문의 하신 ”한국이 제대로 나오지 않아요" 대해 답변을 드리겠습니다.

    제 생각에는 StreamReader 클래스를 사용하여 UTF 올바른 인코딩을 지정해야 합니다 또는 UTF 인코딩을 사용하여 텍스트 파일을 저장해야 합니다.

    다음 예제에서는 UTF 인코딩을 사용하여 텍스트 파일을 읽는 방법을 보여 줍니다.
    이 예제에서는 시스템의 현재 ANSI 코드 페이지에 해당하는 인코딩 System.Text.Encoding.Default 속성을 사용합니다.

    Imports System
    Imports System.IO
    Module module1
        Sub Main()
            Dim sr As StreamReader = New StreamReader("c:\tmp\TestFile.txt", System.Text.Encoding.Default)
            Dim line As String
            ' Read and display the lines from the file until the end
            ' of the file is reached.
            Do
                line = sr.ReadLine()
                Console.WriteLine(line)
            Loop Until line Is Nothing
            sr.Close()

        End Sub
    End Module

    [참조자료]
    StreamReader Class

    제시해 드린 답변이 도움이 되었기를 바랍니다.

    답변이 문제 해결에 도움이 되었다면 답변으로 채택을 부탁드립니다.
    하지만 문제 해결이 되지 않아서 정확한 답변을 원하는 경우에는 문제의 정보를 더 자세하게 답변으로 제공해주시기 바랍니다.

    2012년 5월 9일 수요일 오전 5:48
    중재자