ساخت پوشه در کارت حافةه در B4a

[pardazeshmovazi 21]

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

File.MakeDir(File.DirDefaultExternal,"mpv")

[hossein92 74]

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

File.MakeDir(File.DirRootExternal,"mpv")

و تو قسمت مانیفست اینو اضافه کن

[color=#B22222]AddPermission(android.permission.WRITE_EXTERNAL_STORAGE)[/color]

تست شد درستکار میکنه

[alireza_hsi 160]

عزیز این سوال جاش توی انجمن سورس کد بود؟؟؟؟

انجمن سوال و جواب داریم لطفا اونجا مطرح کنید

[Mohsen27 199]

سلام منم سال نو رو به شما و همه ی اساتید تبریک میگم

شما برای ایجاد پوشه این کد رو بنویسید

File.MakeDir(File.DirRootExternal,"mohsen/m-af")

توجه داشته باش که / یک پوشه دیگه داخل همون پوشه اضافه میکنه الان اگه شما این کد رو بنویسید این پوشه در حافظه گوشی ایجاد میشه mohsen>>m-af

ور برای کپی فایل در این پوشه این کد را بنویسید

File.Copy(File.DirAssets"mohsen.apk",File.DirDefaultExternal,"mohsen/m-af")

این کد که من با نام mohsen.apk نوشتم رو از داخل پوشه برنامه میگیره و داخل پوشه مورد نظر جایگذاری میکنه

موفق باشی و سر بلند

[pardazeshmovazi 21]

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

File.MakeDir(File.DirRootExternal,"ارشیو سورس ها")

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

File.Copy(File.DirAssets"player.zip",File.DirDefaultExternal,"ارشیو سورس ها")

اما در اخر باید یه سوال دیگه کنم ایا اگه من در همه ی کلید ها کد اولی در همین تاپیک رو بنویسم هر دفعه یه پوشه میسازه؟ اگر اینجوری هست بگید باید په کار کنم چون میخوام فقط یه بار این پوشه ساخته بشه و سورس ها دونه دونه برن تو این پوشه.

و لازم دونستم که تصویری از اخطار نرم افزار رو هم بزارم که دوستان راحت تر بتونن کمک کنن.

[hossein92 74]

این ارور فک کنم بخاطر فایلت زیپه نمیدونم دقیق

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

If File.Exists(File.DirRootExternal,"mpv") ThenToastMessageShow("ok",False)
Else
File.MakeDir(File.DirRootExternal,"mpv")
ToastMessageShow("sakhte shod",False)
End If

[hossein92 74]

اینم از حل مشکل کپی اینو شکل صحیح انجوریه تست شد درست کار میکنه

File.Copy(File.DirAssets,"lib.rar",File.DirRootExternal,"mpv/lib.rar")

[alireza_hsi 160]

دوست عزیز خطای سینتکس داری یعنی دستور رو درست تایپ نکردی و چیزی رو جابجا یا کم گذاشتی

یک کاما

File.Copy(File.DirAssets,"player.zip",File.DirDefaultExternal,"txt.txt

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

[moeinbabaei 0]

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

خب یعنی ما نمی توانیم خواندن فایلی ر از نوشتن ان فایل بگذاریم 

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

 

کد های مخصوص

Sub okey_Click
    File.WriteString(File.DirRootExternal,"name.txt",EditText1.Text)
    ToastMessageShow("ثبت شد",True)
End Sub

در کد بالا متنی را ذخیره کردیم و در متن پایین ان را فرا خواندیم در لیبلی به نام name

sub start_click

name.text = File .ReadString(File.DirRootExternal,"name.txt")

End Sub

امیدوارم لذت برده باشید 

[pardazeshmovazi 21]

اقا دم همتون گرم مشکل حل شد لطف کنید تاپیک رو ببندید و دوستان از این مطالب بالا خصوصا تاپیک 7 و 5 برای رفع مشکلاتتون استفاده کنید.*همینه**همینه**همینه**همینه**همینه*