تبدیل متن معمولی به چنین متنی: %D8%B5%D8%A7%D9%

[niksalehi]

سلام دوستان، میخواستم ببینم چطوری میتونم با وی بی همچین کاری کنم؟
مثلا کلمه ی صالحی به عبارت %D8%B5%D8%A7%D9%84%D8%AC%DB%8C تبدیل میشه!
این چطوری اینطوری میشه؟ :لبخند:
و من میخوام عبارت های دیگه رو هم به این صورت بنویسم! ممنون میشم اگه راهنمایی کنین.

[Mr'Jamshidy]

خیلی ساده

شما باید کد اسکی این ها رو بدونید که البته من قبلا به این موضوع برخورد کردم دقیقا کد اسکی استفاده شده بر چه مبنایی هست

در مرحله دوم با فرمان Hex اون عدد رو به کد Hex تبدیل میکنید

در مرحله سوم یک علامت % هم به اولش اضافه میکنید

در مرحه چهارم کنار هم میزاریدشون

در مرحله پنجم حالشو میبرید

[امین مستانی]

سلام علیکم

از این تابع که یکی از دوستان زحمتشو کشیده و اسمشونو بخاطر نمیاورم می تونید استفاده کنید

Function C2U(r As String)


r = Replace(r, "Ç", "%d8%a7")
r = Replace(r, "Â", "%d8%a2")
r = Replace(r, "È", "%d8%a8")
r = Replace(r, "", "%d9%be")
r = Replace(r, "Ê", "%d8%aa")
r = Replace(r, "Ë", "%d8%ab")
r = Replace(r, "Ì", "%d8%ac")
r = Replace(r, "", "%da%86")
r = Replace(r, "Í", "%d8%ad")
r = Replace(r, "Î", "%d8%ae")
r = Replace(r, "Ï", "%d8%af")
r = Replace(r, "Ð", "%d8%b0")
r = Replace(r, "Ñ", "%d8%b1")
r = Replace(r, "Ò", "%d8%b2")
r = Replace(r, "Ž", "%da%98")
r = Replace(r, "Ó", "%d8%b3")
r = Replace(r, "Ô", "%d8%b4")
r = Replace(r, "Õ", "%d8%b5")
r = Replace(r, "Ö", "%d8%b6")
r = Replace(r, "Ø", "%d8%b7")
r = Replace(r, "Ù", "%d8%b8")
r = Replace(r, "Ú", "%d8%b9")
r = Replace(r, "Û", "%d8%ba")
r = Replace(r, "Ý", "%d9%81")
r = Replace(r, "Þ", "%d9%82")
r = Replace(r, "˜", "%da%a9")
r = Replace(r, "", "%da%af")
r = Replace(r, "á", "%d9%84")
r = Replace(r, "ã", "%d9%85")
r = Replace(r, "ä", "%d9%86")
r = Replace(r, "æ", "%d9%88")
r = Replace(r, "å", "%d9%87")
r = Replace(r, "í", "%db%8c")
r = Replace(r, "Æ", "%d8%a6")
r = Replace(r, "Á", "%d8%a1")
r = Replace(r, "É", "%d8%a9")
r = Replace(r, "Ä", "%d8%a4")
r = Replace(r, "Å", "%d8%a5")
r = Replace(r, "Ã", "%d8%a3")
r = Replace(r, "¿", "%d8%9f")
r = Replace(r, "¡", "%d8%8c")
r = Replace(r, "º", "%d8%9b")
r = Replace(r, "Ü", "%d9%80")
r = Replace(r, "«", "%c2%ab")
r = Replace(r, "»", "%c2%bb")
r = Replace(r, "ó", "%d9%8e")
r = Replace(r, "ð", "%d9%8b")
r = Replace(r, "ñ", "%d9%8c")
r = Replace(r, "ò", "%d9%8d")
r = Replace(r, "õ", "%d9%8f")
r = Replace(r, "ö", "%d9%90")
r = Replace(r, "ø", "%d9%91")
r = Replace(r, ",", "%2c")
r = Replace(r, " ", "+")

C2U = r
End Function

در ضمن کلمه صالحی به این صورت است %d8%b5%d8%a7%d9%84%d8%ad%db%8c که شما اشتباه نوشته بودید

موفق باشید

[m.4.r.m]

می تونی از روش کد گذاری یا همون Encrypt , Decrypt استفاده کنی

[just4froum]

این دقیقا ساختار فایل utf-8 هست.

در انجمن قبلا بحث شده جستجو کنید پیدا می کنید.

[setroyd]

اگر منظور شما کد کردنه سعی کنید از الگوریتم های ستاندارد استفاده کنید که با یه جستجو در اینجا پیدا میکنید .

[niksalehi]

ایــــــــــنجا مشکلو حل کردن! (http://barnamenevis.org/showthread.php?347646-%D8%AA%D8%A8%D8%AF%DB%8C%D9%84-%D9%85%D8%AA%D9%86-%D9%81%D8%A7%D8%B1%D8%B3%DB%8C-%D8%A8%D9%87-%DB%8C%D9%88%D9%86%DB%8C-%DA%A9%D8%AF/page3&highlight=utf8)

ممنون از دوستان