UTF8 to ASCII

Dear all experts,

i encounter a problem when converting a UTF8 file to ASCII
coz my txt file has some chinese word, i try to use ado to read as ascii format character

Dim rs As ADODB.Recordset
      Set rs = New ADODB.Recordset
      Dim conn As ADODB.Connection
      Set conn = New ADODB.Connection
     
        conn.Open "DRIVER={Microsoft Text Driver (*.txt; *.csv)};" _
            & "DBQ=C:\;" _
            & "HDR=NO;FMT=Delimited;"
      rs.Open "select * from temp.txt", conn, adOpenStatic, _
                  adLockReadOnly, adCmdText
    Do While Not rs.EOF
        Debug.Print rs.Fields.Item(0)
    rs.MoveNext
    Loop
    Set rs = Nothing
    Set conn = Nothing

but the output still utf-8, how can i solve this problem by using VB programming lang ?
Thanks