Vba: how do I enforce the encoding to utf-8 when using api writefile

Question

0.00/5 (No votes)

See more:

I need to use VBA to communicate over rs232 to a module which is expecting 8 bits frames. I use filewrite from API32
. I thought it would be enough to send as single byte but I see every byte gets out on the rs232 as two bytes. Precisely one sees that I get out the original byte converted to utf-16. For instance aiming to broadcast 0x35 I will actually send 0x33 as first byte and 0x35 as second one. The receiver will then not understand what was meant.

What I have tried:

No idea yet- I am considering using methods from systemio instead

Posted 26-Oct-19 3:27am

Member 14635598

Updated 26-Oct-19 21:19pm

Add a Solution

Comments

Richard MacCutchan 26-Oct-19 10:16am

That suggests that your code is trying to send the string "35", rather than the single hex character '\x35'. Unfortunately you forgot to show us the code so that is something of a wild guess.

Patrice T 27-Oct-19 3:02am

There is a secret error in your secret code.
Solution depend on your code.

1 solution

Add a Solution

Add your solution here

Treat my content as plain text, not as HTML

Preview 0

…

Existing Members

Sign in to your account

...or Join us

Download, Vote, Comment, Publish.

Your Email
Password
Forgot your password?

Your Email
This email is in use. Do you need your password?
Optional Password

I have read and agree to the Terms of Service and Privacy Policy
Please subscribe me to the CodeProject newsletters

When answering a question please:

Read the question carefully.
Understand that English isn't everyone's first language so be lenient of bad spelling and grammar.
If a question is poorly phrased then either ask for clarification, ignore it, or edit the question and fix the problem. Insults are not welcome.
Don't tell someone to read the manual. Chances are they have and don't get it. Provide an answer or move on to the next question.

Let's work to help developers, not make them feel stupid.

This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)

RickZeeland · Answer 1 · 2019-10-26T20:47:00

Solution 1

Try using strings instead of FileWrite, see example here:
How to: Send Strings to Serial Ports in Visual Basic | Microsoft Docs[^]

Also see: How to convert VBA/VB6 Unicode strings to UTF-8[^]

Posted 26-Oct-19 20:47pm

RickZeeland

Updated 26-Oct-19 21:04pm

v2