حسینh 50 ارسال شده در 6 فروردین، ۱۳۹۶ اشتراک گذاری ارسال شده در 6 فروردین، ۱۳۹۶ با سلام به دوستان گل انجمن به نظرتان راهی هست بشه روی یک فایل(مثل عکس و...)بیایم بایک روشی رمزنگاری کنیم (مثل رمزنگاری AES) واقعا الان نیاز دارم ممنون میشم کمکم کنید لینک ارسال به اشتراک گذاری در سایت های دیگر تنظیمات بیشتر اشتراک گذاری ...
محمد رشوند 1,208 ارسال شده در 6 فروردین، ۱۳۹۶ اشتراک گذاری ارسال شده در 6 فروردین، ۱۳۹۶ در 1 ساعت قبل، حسینh گفته است : با سلام به دوستان گل انجمن به نظرتان راهی هست بشه روی یک فایل(مثل عکس و...)بیایم بایک روشی رمزنگاری کنیم (مثل رمزنگاری AES) واقعا الان نیاز دارم ممنون میشم کمکم کنید سلام دو محصول زیر حتماً مشکل شمارو برطرف خواهد کرد محصول اول محصول دوم لینک ارسال به اشتراک گذاری در سایت های دیگر تنظیمات بیشتر اشتراک گذاری ...
حسینh 50 ارسال شده در 6 فروردین، ۱۳۹۶ سازنده اشتراک گذاری ارسال شده در 6 فروردین، ۱۳۹۶ در 33 دقیقه قبل، basic4roid گفته است : سلام دو محصول زیر حتماً مشکل شمارو برطرف خواهد کرد محصول اول محصول دوم نمی دونم درست منظورم روفهمیده باشید میخوام با AESیک فایل آهنگ یا عکس رو رمزنگاری کنم این دو محصول بالا استرینگ رو رمز نگاری میکنن فک کنم لینک ارسال به اشتراک گذاری در سایت های دیگر تنظیمات بیشتر اشتراک گذاری ...
محمد رشوند 1,208 ارسال شده در 7 فروردین، ۱۳۹۶ اشتراک گذاری ارسال شده در 7 فروردین، ۱۳۹۶ در 10 ساعت قبل، حسینh گفته است : این دو محصول بالا استرینگ رو رمز نگاری میکنن فک کنم محصول دوم فایل رو فشرده میکنه روی فایل فشرده رمز با الگوریتم Aes رمز گذاری میکنه من درست منظورتون رو نمیفمم میخواین فایل های دیر است رو رمز بزارین روش یا فایلی که داخل اکسترناله چون هردوی اینارو محصول دوم انجام میده شا یه فایل رو به صورت زیپ غیر قابل دسترسی میکنید با رمز گذاری روی خود فایل فرقی نمیکنه ولی اگه منظورتون رمز گذاری روی خود فایله که فکر کنم روشش اینطوری باشه این کد روی یک فایل چند رسانه ای یا همون ویدیو این کارو کرده Sub Process_Globals Dim password As String password = 123456 End Sub Sub Globals Dim Decrypt As Button Dim Encrypt As Button End Sub Sub Activity_Create(FirstTime As Boolean) If File.Exists(File.DirRootExternal, "splash.mp4") = False Then File.Copy(File.DirAssets, "splash.mp4", File.DirRootExternal, "splash_copied.mp4") End If Activity.LoadLayout("layout") End Sub Sub EncryptFunction Dim InputStream1 As InputStream InputStream1 = File.OpenInput(File.DirRootExternal, "splash_copied.mp4") Dim OutputStream1 As OutputStream OutputStream1.InitializeToBytesArray(1000) File.Copy2(InputStream1, OutputStream1) Dim Buffer() As Byte Buffer = OutputStream1.ToBytesArray Dim output As RandomAccessFile output.Initialize(File.DirRootExternal, "splash_en.mp4", False) output.WriteEncryptedObject(Buffer, "password", output.CurrentPosition) InputStream1.Close OutputStream1.Close output.Close ToastMessageShow("Done!", False) End Sub Sub DecryptFunction Dim raf As RandomAccessFile raf.Initialize(File.DirRootExternal, "splash_en.mp4", False) Dim text1 As String text1 = raf.ReadEncryptedObject(password, raf.CurrentPosition) Log(text1) raf.Close Dim input As RandomAccessFile Dim Buffer() As Byte input.Initialize(File.DirRootExternal, "splash_en.mp4", True) Buffer = input.ReadEncryptedObject("password", input.CurrentPosition) Dim InputStream1 As InputStream InputStream1.InitializeFromBytesArray(Buffer, 0, Buffer.Length) InputStream1.Close input.Close ToastMessageShow("Done!", False) End Sub Sub Encrypt_Click EncryptFunction End Sub Sub Decrypt_Click DecryptFunction End Sub لینک ارسال به اشتراک گذاری در سایت های دیگر تنظیمات بیشتر اشتراک گذاری ...
سوال
حسینh 50
با سلام به دوستان گل انجمن به نظرتان راهی هست بشه روی یک فایل(مثل عکس و...)بیایم بایک روشی رمزنگاری کنیم (مثل رمزنگاری AES) واقعا الان نیاز دارم ممنون میشم کمکم کنید
لینک ارسال
به اشتراک گذاری در سایت های دیگر
3 پاسخ به این سوال تاکنون داده شده است
ارسالهای توصیه شده
بایگانی شده
این موضوع بایگانی و قفل شده و دیگر امکان ارسال پاسخ نیست.