[AccessD] Cyrillic to English character translation

Edward Zuris edzedz at comcast.net
Sun Nov 1 17:11:04 CST 2009


 Thanks Doug. . .  I'll look at your sites.

 I guess I'll need the unicode for Cyrillic and English


-----Original Message-----
From: accessd-bounces at databaseadvisors.com
[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Doug Steele
Sent: Sunday, November 01, 2009 10:23 AM
To: Access Developers discussion and problem solving
Subject: Re: [AccessD] Cyrillic to English character translation


further to my previous reply, the following site may help with
converting multibyte code:

http://www.motobit.com/tips/detpg_binarytostring/

Doug

2009/11/1 Doug Steele <dbdoug at gmail.com>

> The first few words read:
>
> ED
> JUST FOR FUN I DECIDED TO SEE....
>
> It's kind of a crude phonetic substitution - for example, the J in 
> 'JUST' is made up of two letters: a D sound and a sort of SH that I 
> can't spell out in English.
>
> You could use the table here as a start: 
> http://5ko.free.fr/en/cyr.htmland just do a letter by letter 
> substitution.  That would make it readable, I think.
>
> Doug
>
> 2009/11/1 Edward Zuris <edzedz at comcast.net>
>
>
>>  Does anyone have a Cyrillic to English
>>  character translation VBA snippet I could
>>  please study ?
>>
>>  I did some ASCII and EBCDIC translation
>>  some 25 years ago.
>>
>>  However, Unicode is something I am new
>>  to and wonder how that would work.
>>
>>  Here is what I am hopeing to convert to
>>  English.
>>
>>  I am told this is not Russian, but American
>>  English displayed in Cyrillic.
>>
>>  It should be a C# program, plus some snide
>>  comments.
>>
>>  Any suggestions ?
>>
>>  Thanks.
>>
>>  ===================================================
>>                     Start  
>> ===================================================
>>
>> ЭД
>> ДЖЮCT ФОP ФЮН И ДЭЧИДЭД TО CЭЭ HЬОУО ФЭУО ЛИНЭC ОФ ЧОДЭ И'Д HЬАВЭ TО 
>> УОPИTЭ TО ЧОНВЭPT ЧPЁPИЛЛИЧ TО ЭНГЛИCHЬ АНД ВИЧЭ-ВЭPCА.
>>
>> И'М PЭАЛЛЁ QЮИTЭ CTЮННЭД THЬАT А ЧАПАбЛЭ ПPОГPАММЭP CЮЧHЬ АC ЁОЮPCЭЛФ

>> УООЮЛДН'T HЬАВЭ АППЛИЭД THЬИC CОЛЮTИОН TО THЬЭ ПPОбЛЭМ А ЛОНГ TИМЭ 
>> АГО.
>>
>> АНЁУОАЁ И УОАC АбЛЭ TО ДО ИT ИН НИНЭ ЛИНЭC:
>>
>> ЮCИНГ CЁCTЭМ;
>> ЮCИНГ CЁCTЭМ.ЧОЛЛЭЧTИОНC.ГЭНЭPИЧ;
>> ЮCИНГ CЁCTЭМ.TЭXT;
>> ЮCИНГ CЁCTЭМ.ИО;
>> ЮCИНГ CЁCTЭМ.ДИАГНОCTИЧC;
>>
>> НАМЭCПАЧЭ TPАНCЛАTОP
>> {
>>            ЧЛАCC ПPОГPАМ
>>            {
>>                        CTАTИЧ ВОИД МАИН(CTPИНГ[] АPГC)
>>                        {
>>                                    ИНTЭPОЧИTЭP XЛT = НЭУО 
>> ИНTЭPОЧИTЭP();
>>                                    CTPИНГ T;
>>                                    ЮCИНГ (CTPЭАМPЭАДЭP CP = НЭУО
>> CTPЭАМPЭАДЭP("Ч:\TЭCT.TXT")) T = CP.PЭАДTОЭНД();
>>                                    ЮCИНГ(CTPЭАМУОPИTЭP CУО = НЭУО
>> CTPЭАМУОPИTЭP("Ч:\\ОЮTПЮTФИЛЭ.TXT")) ФОP(ИНT И=0; И<T.ЛЭНГTHЬ;И++) 
>> CУО.УОPИTЭ(XЛT.XЛАTЭ(T.CЮбCTPИНГ(И,1).TОЮППЭP()));
>>                        }
>>            }
>>            ЧЛАCC ИНTЭPОЧИTЭP:CОPTЭДЛИCT<CTPИНГ,CTPИНГ>
>>            {
>>                        ПЮбЛИЧ ИНTЭPОЧИTЭP()
>>                        {
>>                                    CTPИНГ[] АЛПHЬАбЭT;
>>                                    ЮCИНГ(CTPЭАМPЭАДЭP CP = НЭУО
>> CTPЭАМPЭАДЭP("Ч:\\TPАНCЛАTЭTАбЛЭ.TXT")) АЛПHЬАбЭT = 
>> CP.PЭАДTОЭНД().CПЛИT(НЭУО ЧHЬАP[] {'\Н'});
>>                                    ФОP(ИНT И=0;И<АЛПHЬАбЭT.ЛЭНГTHЬ -
>> 1;И++) бАCЭ.АДД(АЛПHЬАбЭT[И].CПЛИT(НЭУО ЧHЬАP[] { '\t' 
>> })[1].CЮбCTPИНГ(0,1),АЛПHЬАбЭT[И].CПЛИT(НЭУО ЧHЬАP[] { '\t' })[0]);
>>                        }
>>                        ПЮбЛИЧ CTPИНГ XЛАTЭ(CTPИНГ C) {ИФ
>> (бАCЭ.ЧОНTАИНCКЭЁ(C)) PЭTЮPН бАCЭ[C]; ЭЛCЭ PЭTЮPН C;}
>>            }
>>  }
>>
>> ФАЧT ИC, ИФ ЁОЮ'PЭ ГОИНГ ПPЭTЭНД THЬАT ЁОЮ КНОУО ЭВЭPЁTHЬИНГ, ЁОЮ 
>> МИГHЬT ГЭT ЧАЮГHЬT.  THЬЭ бЭCT THЬИНГ TО ДО АT THЬАT ПОИНT, ИC АДМИT 
>> THЬЭ TPЮTHЬ, бЮT НОT ЁОЮ, НО CИP.
>>
>> ЁОЮ CTИЛЛ PЭФЮCЭ TО АДМИT THЬАT ЁОЮ PЭАЛЛЁ ДОН'T КНОУО THЬЭ ЧЁPИЛЛИЧ 
>> АЛПHЬАбЭT.
>>
>> МЁ ФPЮCTPАTИОН УОИTHЬ ЁОЮ ИC THЬАT THЬИC АЛCО АППЛИЭC TО МАНЁ ОTHЬЭP 
>> THЬИНГC ЁОЮ ЧОНCTАНTЛЁ АCCЭPT.  CЮЧHЬ АC АЛЛ PЭПЮбЛИЧАНC АPЭ PАЧИCT, 
>> НАЗИ, HЬОМОCЭXЮАЛC УОHЬО "ЁОЮ ДЖЮCT ДОН'T КНОУО УОHЬАT THЬЭЁ УОАНT 
>> ФОP THЬИC ЧОЮНTPЁ" ИНCИНЮАTИНГ ОН TОП ОФ ИНCЮЛT THЬАT THЬЭЁ АPЭ АЛCО 
>> ЮН АМЭPИЧАН.  ЁОЮ НЭВЭP CTОП TО THЬИНК THЬАT THЬИC ЧОЮЛД бЭ 
>> ИНЧPЭДИбЛЁ ИНCЮЛTИНГ TО ОTHЬЭPC, ЭXTPЭМЭЛЁ PАЧИCT, АНД бИГОTЭД.
>>
>> THЬЭН ЁОЮ КЭЭП TЭЛЛИНГ МЭ THЬЭ CАМЭ ЛИЭC, ОВЭP АНД ОВЭP, ДЭCПИTЭ ФАЧT

>> ПИЛЭД ОН TОП ОФ ФАЧT, бЭЧАЮCЭ THЬЭCЭ ЛИбЭPАЛ "TPЮTHЬC" АPЭ TО бЭ 
>> бЭЛИЭВЭД ИН THЬЭ ФАЧЭ ОФ АЛЛ ЭВИДЭНЧЭ TО THЬЭ ЧОНTPАPЁ.
>>
>> CО, И АМ КЭЭПИНГ ЁОЮ TО ЁОЮP УООPД.  ЁОЮ ПPЭTЭНДЭД TО КНОУО 
>> ЧPЁPИЛЛИЧ, THЬЭPЭФОPЭ ЁОЮ ДО, УОHЬЭTHЬЭP ИT ИC TPЮЭ ОP НОT, АНД И 
>> PЭФЮCЭ TО бЭЛИЭВЭ АНЁTHЬИНГ ЭЛCЭ.  ИН АбОЮT CИX ЁЭАPC (АбОЮT АC ЛОНГ 
>> АC И'ВЭ HЬАД TО ЭНДЮPЭ THЬЭ "НЭУО ЭД") THЬЭН И МИГHЬT ЧHЬАНГЭ бАЧК TО

>> ЭНГЛИCHЬ, ИФ И ФЭЭЛ ЛИКЭ ИT, бЮT УОHЬЁ CHЬОЮЛД И?
>>
>> ЁОЮ УООН'T ЧHЬАНГЭ ЁОЮP МИНД ОН АНЁ ОФ THЬЭ ЛИбЭPАЛ ФАНTАCИЭC.
>>
>> НО МАTTЭP УОHЬАT HЬАППЭНC.
>>
>> CО И ЧАН бЭ ДЖЮCT АC CTЮббОPН АC ЁОЮ, бЮT И ДОН'T THЬИНК И ЧАН ЭВЭP 
>> бЭ АC PАЧИCT АНД МЭАН АC ЁОЮ АPЭ.  НОT бЁ А ЛОНГ CHЬОT.
>>
>>
>>  ===================================================
>>                     End  
>> ===================================================
>>
>>
>> --
>> AccessD mailing list
>> AccessD at databaseadvisors.com 
>> http://databaseadvisors.com/mailman/listinfo/accessd
>> Website: http://www.databaseadvisors.com
>>
>
>
-- 
AccessD mailing list
AccessD at databaseadvisors.com
http://databaseadvisors.com/mailman/listinfo/accessd
Website: http://www.databaseadvisors.com




More information about the AccessD mailing list