How to write invisible characters into a text file?

[Edward1981]

I'm going to convert a ASCII text file into a EBCDIC text file.
The convertion can't be achieved by FTP, because the ASCII text file includes both SBCS and DBCS and I want to leave those DBCS unconverted.
I failed to write EBCDIC characters(invisible in ASCII coding) into file.
Here is my vba code, &HC1 stands for character 'A' in EBCDIC

Public Sub test()
strTemp = ChrB(Val("&HC1"))

fileThis = "D:\workshop\test.txt"
On Error Resume Next
Kill (fileThis)
On Error GoTo 0

Open fileThis For Output As #1
Print #1, strTemp
Close #1
End Sub

After execution, test.txt file only contains a CRLF.
This code can work with visible character,eg &H41. How can I write invisible character into file? Thanks.

 

[Richard Schollar]

Hi

If you want to write double byte characters to a file you effectively need to be writing to a unicode file - you can do this using the Scripting Runtime lib. Check this post for a brief example of how to do this:

http://www.mrexcel.com/forum/showthread.php?t=338526&highlight=unicode

Hopefully this will resolve your problem.

 

[Edward1981]

Thanks to Richard Schollar.
I can't figure it out using unicode.

I've found out a freak solution at last:
If the character I'm writing is greater than 124 in value, I'll write it together with the next character.For example: Chr(Val("&HC1C1")), which stands for "AA" in EBCDIC.
Previous code works well with character whic is less than 124.

I guess there may be some validation in & funcion.