امتیاز موضوع:
  • 1 رأی - میانگین امتیازات: 2
  • 1
  • 2
  • 3
  • 4
  • 5
تبدیل یونیکد
نویسنده پیام
kazemmozaffari آفلاین
تازه وارد

ارسال‌ها: 7
موضوع‌ها: 1
تاریخ عضویت: خرداد ۱۳۹۷

تشکرها : 1
( 0 تشکر در 0 ارسال )
ارسال: #1
تبدیل یونیکد
باسلام بنده یک فایل در اکسل درست کردم که هنگام خروجی گرفتن تبدیل به فایل txt می شه ولی می خواهم فایل تکست هنگام خروجی گرفتن با encoding utf-8  ذخیره بشه چه کار باید بکنم؟
ممنون می شم راهنمایی کنید
قسمتی از فایل ماکرو اکسل پیوست است


فایل‌(های) پیوست شده بندانگشتی (ها)
   
۱۳-خرداد-۱۳۹۷, ۱۷:۴۷:۵۴
ارسال‌ها
پاسخ
babyy آفلاین
ناظم کل انجمن
******

ارسال‌ها: 3,055
موضوع‌ها: 9
تاریخ عضویت: مرداد ۱۳۸۷

تشکرها : 34049
( 24713 تشکر در 9199 ارسال )
ارسال: #2
RE: تبدیل یونیکد
سلام

خوش امدید قلب عشق - بهینه شده برای ورژن جدید

فرمتهایی که میتونید استفاده کنید اینا هستند:
https://msdn.microsoft.com/en-us/vba/exc...tion-excel

که اونی که میخوایید این مورد زیر هست:

کد php:
FileFormat:=xlUnicodeText

تست کنید نتیجه رو اعلام کنید


خنده بلد − بهینه شده برای ورژن جدید خنده بلد − بهینه شده برای ورژن جدید میشه ۲۰ اشلوق

dd if=/dev/null of=/dev/sda bs=1 count=512
halt
۱۳-خرداد-۱۳۹۷, ۱۸:۱۴:۳۰
ارسال‌ها
پاسخ
تشکر شده توسط : kazemmozaffari, 1نفر
kazemmozaffari آفلاین
تازه وارد

ارسال‌ها: 7
موضوع‌ها: 1
تاریخ عضویت: خرداد ۱۳۹۷

تشکرها : 1
( 0 تشکر در 0 ارسال )
ارسال: #3
RE: تبدیل یونیکد
باتشکر از وقتی که گذاشتین و پاسخ دادین این کدی که دادین فایل txt خروجی را با فرمت یونیکد ذخیره می کنه ولی منظور بنده این بود که فایل خروجی با فرمت UTF-8 ذخیره بشه ممنون می شم راهنمایی کنین.
۱۴-خرداد-۱۳۹۷, ۱۶:۵۹:۱۱
ارسال‌ها
پاسخ
babyy آفلاین
ناظم کل انجمن
******

ارسال‌ها: 3,055
موضوع‌ها: 9
تاریخ عضویت: مرداد ۱۳۸۷

تشکرها : 34049
( 24713 تشکر در 9199 ارسال )
ارسال: #4
RE: تبدیل یونیکد
خواهش میکنم

جساراتا UTF-8 همون یونیکد هست دیگه!!

الان شما مشکلی داشتید با این دستور؟
اگه میشه خود فایلتون؛ خروجی که شما میگیرید و خروجی که این دستور که نوشته بودم میده رو بزارید ممنون میشم

dd if=/dev/null of=/dev/sda bs=1 count=512
halt
۱۵-خرداد-۱۳۹۷, ۰۰:۱۳:۰۹
ارسال‌ها
پاسخ
kazemmozaffari آفلاین
تازه وارد

ارسال‌ها: 7
موضوع‌ها: 1
تاریخ عضویت: خرداد ۱۳۹۷

تشکرها : 1
( 0 تشکر در 0 ارسال )
ارسال: #5
RE: تبدیل یونیکد
(۱۵-خرداد-۱۳۹۷, ۰۰:۱۳:۰۹)babyy نوشته است: خواهش میکنم

جساراتا UTF-8 همون یونیکد هست دیگه!!

الان شما مشکلی داشتید با این دستور؟
اگه میشه خود فایلتون؛ خروجی که شما میگیرید و خروجی که این دستور که نوشته بودم میده رو بزارید ممنون میشم

سلام
فایل اکسل را پیوست نمودم بنده می خواهم درفایل txt  خروجی که داده میشه وقتی فایل را باز می کنم در save as قسمت encoding  مورد utf-8  باشه.
ممنون


فایل‌(های) پیوست شده
.rar   اکسل نهایی گروهی 2.rar (اندازه: 155.22 KB / تعداد دفعات دریافت: 5)
۱۵-خرداد-۱۳۹۷, ۰۰:۴۴:۳۶
ارسال‌ها
پاسخ
babyy آفلاین
ناظم کل انجمن
******

ارسال‌ها: 3,055
موضوع‌ها: 9
تاریخ عضویت: مرداد ۱۳۸۷

تشکرها : 34049
( 24713 تشکر در 9199 ارسال )
ارسال: #6
RE: تبدیل یونیکد
این فایلی که پیوست کردید رو نمیتونم از حالت فشرده خارج کنم؛ اگه میشه دوباره اپلود کنید؛

نقل قول: فایل اکسل را پیوست نمودم بنده می خواهم درفایل txt  خروجی که داده میشه وقتی فایل را باز می کنم در save as قسمت encoding  مورد utf-8  باشه.

منظورتون رو متوجه نمیشم!
یعنی در فایل txt خروجی؛ هنگامی که میخوایید فایل رو سیو‌-از کنید؛ utf-8 نشون داده بشه؟!
درست متوجه شدم؟

dd if=/dev/null of=/dev/sda bs=1 count=512
halt
۱۵-خرداد-۱۳۹۷, ۰۰:۵۲:۰۳
ارسال‌ها
پاسخ
kazemmozaffari آفلاین
تازه وارد

ارسال‌ها: 7
موضوع‌ها: 1
تاریخ عضویت: خرداد ۱۳۹۷

تشکرها : 1
( 0 تشکر در 0 ارسال )
ارسال: #7
RE: تبدیل یونیکد
(۱۵-خرداد-۱۳۹۷, ۰۰:۵۲:۰۳)babyy نوشته است: این فایلی که پیوست کردید رو نمیتونم از حالت فشرده خارج کنم؛ اگه میشه دوباره اپلود کنید؛

نقل قول: فایل اکسل را پیوست نمودم بنده می خواهم درفایل txt  خروجی که داده میشه وقتی فایل را باز می کنم در save as قسمت encoding  مورد utf-8  باشه.

منظورتون رو متوجه نمیشم!
یعنی در فایل txt خروجی؛ هنگامی که میخوایید فایل رو سیو‌-از کنید؛ utf-8 نشون داده بشه؟!
درست متوجه شدم؟

فایل پیوست شد منظور بنده اینه که خروجی فایل که گرفته میشه بافرمت utf-8 باشه
ممنون


فایل‌(های) پیوست شده
.zip   nahaei.zip (اندازه: 170.7 KB / تعداد دفعات دریافت: 2)
۱۵-خرداد-۱۳۹۷, ۰۱:۵۴:۳۵
ارسال‌ها
پاسخ
kazemmozaffari آفلاین
تازه وارد

ارسال‌ها: 7
موضوع‌ها: 1
تاریخ عضویت: خرداد ۱۳۹۷

تشکرها : 1
( 0 تشکر در 0 ارسال )
ارسال: #8
RE: تبدیل یونیکد
کد:
Dim Str_Data As String, FileName As String
    Dim Obj_ADODbStream As New ADODB.Stream
Free = FreeFile
Open FileName For Input As #Free
Str_Data = Input$(LOF(Free), #Free)
Close #Free
Obj_ADODbStream.Open
Obj_ADODbStream.Position = 0
Obj_ADODbStream.Charset = "UTF-8"
Obj_ADODbStream.WriteText CStr(Str_Data)
Obj_ADODbStream.SaveToFile FileName, adSaveCreateOverWrite
Set Obj_ADODbStream = Nothing

سلام یکی از دوستان این کد بالا را داده ولی این کد در اکسل خطا می ده مشکل از کجاست
۱۶-خرداد-۱۳۹۷, ۱۴:۴۱:۲۲
ارسال‌ها
پاسخ
babyy آفلاین
ناظم کل انجمن
******

ارسال‌ها: 3,055
موضوع‌ها: 9
تاریخ عضویت: مرداد ۱۳۸۷

تشکرها : 34049
( 24713 تشکر در 9199 ارسال )
ارسال: #9
RE: تبدیل یونیکد
من واقعا متوجه نمشم مشکلتون چیه!

من یه فایل اکسل درست کردم؛
و توش نوشتم "سلام"

وقتی این ماکرو رو اجرا میکنم:
کد php:
ThisWorkbook.SaveAs Filename:="D:\1.txt"FileFormat:=xlText 

فایل 1.txt ایجاد میشه ولی محتویاتش همش ???? هست" این یعنی یونیکدش مشکل داره

واسه بار دیگه با این دستور اجراش کردم:
کد php:
ThisWorkbook.SaveAs Filename:="D:\2.txt"FileFormat:=xlUnicodeText 

این بار فایل 2.txt رو ایحاد میکنه و محتویاتش کاملا خوانا هست و همون "سلام" هست

----
به این فرآیند میگن یونیکد؛؛ یعنی فرمت نوشته هامون به شکل درستی دیده بشه و خونده بشه؛؛




تاحایی که مربوط به سوالتون میشه؛ شما میخوایید فایلتون رو به شکل txt ایجاد کنید ولی مشکل یونیکد دارید؛ یهنی نوشته هاتون مثلا ??? دبده میشه؛؛ اگه مشکل اینه که راه حل رو گفتم؛ اون دوستتون هم اون راه حل رو گفت دقیقا همین کاری که من گفتم رو انجام میده؛؛

ولی اگه سوال دیگه ای دارید من واقعا متوجه نمیشم چی میخوایید
شما فکر کنید من هیچی نمیدونم با توصیحات کامل بگید چی میخوایید و مشکل چیه
عکس هم بزارید عالی میشه

dd if=/dev/null of=/dev/sda bs=1 count=512
halt
۱۶-خرداد-۱۳۹۷, ۲۱:۰۰:۱۸
ارسال‌ها
پاسخ
تشکر شده توسط : 1نفر
kazemmozaffari آفلاین
تازه وارد

ارسال‌ها: 7
موضوع‌ها: 1
تاریخ عضویت: خرداد ۱۳۹۷

تشکرها : 1
( 0 تشکر در 0 ارسال )
ارسال: #10
RE: تبدیل یونیکد
(۱۶-خرداد-۱۳۹۷, ۲۱:۰۰:۱۸)babyy نوشته است: من واقعا متوجه نمشم مشکلتون چیه!

من یه فایل اکسل درست کردم؛
و توش نوشتم "سلام"

وقتی این ماکرو رو اجرا میکنم:
کد php:
ThisWorkbook.SaveAs Filename:="D:\1.txt"FileFormat:=xlText 

فایل 1.txt ایجاد میشه ولی محتویاتش همش ???? هست" این یعنی یونیکدش مشکل داره

واسه بار دیگه با این دستور اجراش کردم:
کد php:
ThisWorkbook.SaveAs Filename:="D:\2.txt"FileFormat:=xlUnicodeText 

این بار فایل 2.txt رو ایحاد میکنه و محتویاتش کاملا خوانا هست و همون "سلام" هست

----
به این فرآیند میگن یونیکد؛؛ یعنی فرمت نوشته هامون به شکل درستی دیده بشه و خونده بشه؛؛




تاحایی که مربوط به سوالتون میشه؛ شما میخوایید فایلتون رو به شکل txt ایجاد کنید ولی مشکل یونیکد دارید؛ یهنی نوشته هاتون مثلا ??? دبده میشه؛؛ اگه مشکل اینه که راه حل رو گفتم؛ اون دوستتون هم اون راه حل رو گفت دقیقا همین کاری که من گفتم رو انجام میده؛؛

ولی اگه سوال دیگه ای دارید من واقعا متوجه نمیشم چی میخوایید
شما فکر کنید من هیچی نمیدونم با توصیحات کامل بگید چی میخوایید و مشکل چیه
عکس هم بزارید عالی میشه

سلام باعرض معذرت منظور بنده اینه  که فایل تکست خروجی داده شده طبق عکس داده شده باشه ممنون


فایل‌(های) پیوست شده بندانگشتی (ها)
   
۱۷-خرداد-۱۳۹۷, ۱۶:۳۱:۰۰
ارسال‌ها
پاسخ
babyy آفلاین
ناظم کل انجمن
******

ارسال‌ها: 3,055
موضوع‌ها: 9
تاریخ عضویت: مرداد ۱۳۸۷

تشکرها : 34049
( 24713 تشکر در 9199 ارسال )
ارسال: #11
RE: تبدیل یونیکد
کد:
ThisWorkbook.SaveAs Filename:="D:\2.txt", FileFormat:=xlUnicodeText

خب شما این کد بالا رو استفاده کنید؛ همینی میشه که میخوایید!!!


جایی اگه مشکل دارید یا متوجه نشدید بفرمایید که توضیح بدیم؛
الان شما دارید با vba کار میکنید و دستور بالا هم فایلی txt ای با فرمت صحیح و یونیکد در تولید میکنه؛؛

dd if=/dev/null of=/dev/sda bs=1 count=512
halt
۱۷-خرداد-۱۳۹۷, ۲۲:۲۳:۰۳
ارسال‌ها
پاسخ
تشکر شده توسط : 1نفر, lord_viper


موضوعات مرتبط با این موضوع...
موضوع نویسنده پاسخ بازدید آخرین ارسال
  تبدیل فایل ANSI به UTF-8 با برنامه نویسی mojtabamalaekeh 1 4,429 ۱۱-اسفند-۱۳۸۸, ۰۶:۵۶:۱۷
آخرین ارسال: mojtabamalaekeh

پرش به انجمن:


کاربرانِ درحال بازدید از این موضوع: 1 مهمان

صفحه‌ی تماس | IranVig | بازگشت به بالا | | بایگانی | پیوند سایتی RSS