تبديل متن به كد

[VirGil]

سلام دوستان.

دو تا نرم افزار زير متن رو به عدد تبديل ميكنن.

نرم افزار اول (TXT ) رو خودم نوشتم.ولي وقتي هر كاراكتر به عد تبديل ميشه فاصله بين

اعداد قرار نميگيره.(به صورت خودكار).

ولي در خرو جي نرم افزار دوم (TXT 2)بين هر كاراكتر تبديل شده به عدد يه فاصله هم قرار

ميگيره.

من هرچي به كد اين 2 تا نگاه ميكنم يه جور نوشته شدن.ولي يكي فاصله ميزاره و يكي

فاصله رو نميزاره.

حالا چون كه گذاشتن فاصله بايد حتما در نرم افزار اول هم صورت گيرد اساتيد محترم لطف


كنند و بگويند كه مشكل از كجاست؟


لطفا نرم افزار ها رو دانلود كنيد و براي اولي كد رو در تكست بنويسي و به منوي



Select Mode---Codec Text.... Encryption

بريد.براي دومي هم به منوي:

file----Encrypt as

بريد.

اگه تونستيد مشكل رو حل كنيد..

[DarkSoroush]

من نرمافزار شما رو هم تست کردم. فاصله قرار میگیره!!:

hfghllllllllllllllllllllllllllll k l;kl;kl;
'l;'
k]
p;'j;l
k
kl;kl;kl;kqwertyuiop[]asdfghjkl;'zxcvbnm,./\`13579-با کد 12:

100 106 107 100 96 96 96 96 96 96 96 96 96 96 96 96 96 96 96 96 96 96 96 96 96 96 96 96 96 96 96 96 44 103 44 96 55 103 96 55 103 96 55 6 43 96 55 43 6 103 81 6 124 55 43 102 55 96 6 103 6 103 96 55 103 96 55 103 96 55 103 125 123 105 126 120 117 121 101 99 124 87 81 109 127 104 106 107 100 102 103 96 55 43 118 116 111 122 110 98 97 32 34 35 80 108 61 63 57 59 53 33 یکبار دیگه کدتون رو تست کنید.

[samispeed]

بر اساس کدی که من دانلود کردم
اولا کد اولی که گذاشتید (خودتون نوشتید) تو encrypt فرم چرا بسته نمی شود در ضمن به طور پیش فرض آن را در c:\zzz.txt ذخیره کردید دو متن یک جور در هر دو تا نوشتم و هر دو تا یک جور جواب می دهد و با فاصله هم هست عین هم ولی قسمت decrypt شما کار نمی کند برخلاف دومین کد

[VirGil]

بر اساس کدی که من دانلود کردم
اولا کد اولی که گذاشتید (خودتون نوشتید) تو encrypt فرم چرا بسته نمی شود در ضمن به طور پیش فرض آن را در c:\zzz.txt ذخیره کردید دو متن یک جور در هر دو تا نوشتم و هر دو تا یک جور جواب می دهد و با فاصله هم هست عین هم ولی قسمت decrypt شما کار نمی کند برخلاف دومین کد

جلل خالق.

مگه میشه دوتاشون خروجیشون یکی باشه.



encrypt فرم چرا بسته نمی شود


اره.اینون راست گفتی.درستسش کردم.



طور پیش فرض آن را در c:\zzz.txt ذخیره کردید


همین جوری.میخواستم گیج کننده نشه !!



دو متن یک جور در هر دو تا نوشتم و هر دو تا یک جور جواب می دهد و با فاصله هم هست عین هم


چی میگی؟مگه میشه؟من دوباره تست کردم.اون که خودم نوشتم فاصله نمیزاره.


ولی قسمت decrypt شما کار نمی کند برخلاف دومین کد

اول بزارید Encrypt درست بشه تا برسیم به Decrypt.

من یه باره دیگه کد خودم رو میزارم .لطف کنید یه بار دیگه برام چکش کنید ببینید فاصله میزاره

یا نه؟

[ezamnejad]

كد نوشته شده را مقداري تغيير دادم . بايد درست شده باشه .


For i = 0 To (Frm1.TxtMain.Text.Length) - 1

Word = Frm1.TxtMain.Text.Substring(i, 1)

Result &= CTETxt(Word) & vbTab

Next

[VirGil]

كد نوشته شده را مقداري تغيير دادم . بايد درست شده باشه .


For i = 0 To (Frm1.TxtMain.Text.Length) - 1

Word = Frm1.TxtMain.Text.Substring(i, 1)

Result &= CTETxt(Word) & vbTab

Next



دوست عزیز.خودش باید اوتومات فاصله بزاره.دیگه دارم روانی میشم.