Welcome to ShenZhenJia Knowledge Sharing Community for programmer and developer-Open, Learning and Share
menu search
person
Welcome To Ask or Share your Answers For Others

Categories

currently I have a ancient VB6 procedure that open text file as follow

Public Function ApriFile(sFile As String, iCanale As Integer) As Boolean
  On Error GoTo ApriFileErr
  ApriFile = False
  NumberError = 0
  sErrore = ""

  Close #iCanale

  'Apertura archivio di input
  Open sFile For Input As #iCanale

  ApriFile = True
  Exit Function

ApriFileErr:
  ApriFile = False
  'Errore nell'apertura del file
  If Err.Number <> 0 Then
    NumberError = Err.Number
    sErrore = Err.Description
  End If

End Function

How can use the UTF8 charset?

I need to open the file, read line by line using the UTF-8 charset and then write on another file always with the same charset.

See Question&Answers more detail:os

与恶龙缠斗过久,自身亦成为恶龙;凝视深渊过久,深渊将回以凝视…
thumb_up_alt 0 like thumb_down_alt 0 dislike
509 views
Welcome To Ask or Share your Answers For Others

1 Answer

Waitting for answers

与恶龙缠斗过久,自身亦成为恶龙;凝视深渊过久,深渊将回以凝视…
thumb_up_alt 0 like thumb_down_alt 0 dislike
Welcome to ShenZhenJia Knowledge Sharing Community for programmer and developer-Open, Learning and Share
...