mohammada 22 ارسال شده در 18 اردیبهشت، ۱۳۹۴ اشتراک گذاری ارسال شده در 18 اردیبهشت، ۱۳۹۴ سلام و خسته نباشید خدمت اساتید گل خودم! دوستان دنبال یه مثال برای ساخت پوشه و ذخیره ی فایل درون پوشه ی داخل کارت حافظه بودم که به این کد برخوردم ولی راستش خیلی سر در نیوردم و نمی دونم چجوری میشه استفاده کرد! اگه امکان داره راهنمایی کنید بعد تبدیلش کنیم به سورس همه استفاده کنن! باز هم بسیار سپاسگذارم.. *like* [color=#0000FF]Private Sub [/color][color=#000000]StartAStream ([/color][color=#0000FF]In[/color][color=#0000FF]As[/color][color=#008B8B]InputStream[/color][color=#000000], out [/color][color=#0000FF]As[/color][color=#008B8B]OutputStream[/color][color=#000000]) [/color][color=#0000FF]Log[/color][color=#000000]([/color][color=#800000]"StartAStream"[/color][color=#000000]) astream.InitializePrefix([/color][color=#0000FF]In[/color][color=#000000], [/color][color=#0000FF]True[/color][color=#000000], out, [/color][color=#800000]"astream"[/color][color=#000000]) [/color][color=#0000FF]If[/color][color=#0000FF]File[/color][color=#000000].IsDirectory([/color][color=#800000]"/mnt/extSdCard"[/color][color=#000000], [/color][color=#800000]""[/color][color=#000000]) = [/color][color=#0000FF]True[/color][color=#0000FF]Then[/color][color=#008000]' SD Card on Galaxy Note 10.1 & Galaxy Phone [/color][color=#0000FF]If[/color][color=#0000FF]File[/color][color=#000000].IsDirectory([/color][color=#800000]"/mnt/extSdCard"[/color][color=#000000], [/color][color=#800000]"FileTransferBT"[/color][color=#000000]) = [/color][color=#0000FF]False[/color][color=#0000FF]Then[/color][color=#000000] [/color][color=#0000FF]File[/color][color=#000000].MakeDir([/color][color=#800000]"/mnt/extSdCard"[/color][color=#000000], [/color][color=#800000]"FileTransferBT"[/color][color=#000000]) [/color][color=#0000FF]End[/color][color=#0000FF]If[/color][color=#000000] astream.StreamFolder = [/color][color=#800000]"/mnt/extSdCard/FileTransferBT"[/color][color=#000000] [/color][color=#0000FF]Else[/color][color=#0000FF]If[/color][color=#0000FF]File[/color][color=#000000].IsDirectory([/color][color=#800000]"/mnt/sdcard0"[/color][color=#000000], [/color][color=#800000]""[/color][color=#000000]) = [/color][color=#0000FF]True[/color][color=#0000FF]Then[/color][color=#008000]' On-board storage Galaxy Note 10.1 [/color][color=#0000FF]If[/color][color=#0000FF]File[/color][color=#000000].IsDirectory([/color][color=#800000]"/mnt/sdcard0"[/color][color=#000000], [/color][color=#800000]"FileTransferBT"[/color][color=#000000]) = [/color][color=#0000FF]False[/color][color=#0000FF]Then[/color][color=#000000] [/color][color=#0000FF]File[/color][color=#000000].MakeDir([/color][color=#800000]"/mnt/sdcard0"[/color][color=#000000], [/color][color=#800000]"FileTransferBT"[/color][color=#000000]) [/color][color=#0000FF]End[/color][color=#0000FF]If[/color][color=#000000] astream.StreamFolder = [/color][color=#800000]"/mnt/sdcard0/FileTransferBT"[/color][color=#000000] [/color][color=#0000FF]Else[/color][color=#0000FF]If[/color][color=#0000FF]File[/color][color=#000000].IsDirectory([/color][color=#800000]"/mnt/sdcard"[/color][color=#000000], [/color][color=#800000]""[/color][color=#000000]) = [/color][color=#0000FF]True[/color][color=#0000FF]Then[/color][color=#008000]' On-board storage Galaxy Phone [/color][color=#0000FF]If[/color][color=#0000FF]File[/color][color=#000000].IsDirectory([/color][color=#800000]"/mnt/sdcard"[/color][color=#000000], [/color][color=#800000]"FileTransferBT"[/color][color=#000000]) = [/color][color=#0000FF]False[/color][color=#0000FF]Then[/color][color=#000000] [/color][color=#0000FF]File[/color][color=#000000].MakeDir([/color][color=#800000]"/mnt/sdcard"[/color][color=#000000], [/color][color=#800000]"FileTransferBT"[/color][color=#000000]) [/color][color=#0000FF]End[/color][color=#0000FF]If[/color][color=#000000] astream.StreamFolder = [/color][color=#800000]"/mnt/sdcard/FileTransferBT"[/color][color=#000000] [/color][color=#0000FF]Else[/color][color=#000000] [/color][color=#0000FF]Msgbox[/color][color=#000000]([/color][color=#800000]"Storage space not available ..."[/color][color=#000000], [/color][color=#800000]"Unable to transfer"[/color][color=#000000]) [/color][color=#0000FF]End[/color][color=#0000FF]If[/color][color=#000000] [/color][color=#0000FF]End Sub[/color] لینک ارسال به اشتراک گذاری در سایت های دیگر تنظیمات بیشتر اشتراک گذاری ...
مجید آرتا 5,874 ارسال شده در 18 اردیبهشت، ۱۳۹۴ اشتراک گذاری ارسال شده در 18 اردیبهشت، ۱۳۹۴ سلام همونظور که میبینید دوست عزیز این یک تابع هست واسه کپی کردن که 2تا آرگومان داره یکی ورودی یعنی مبدا و یکی خروجی که مقصد هستش که از نوع InputStream و OutputStream هستش. و میاد چک میکنه توی SD که پوشه ی مورد نظر وجود داره یا نه و اگه نداره میاد میسازتش.و اینجا از متغییر AsyncStream که مربوط به کتاابخانه RandomAccessFile هستش استفاده کرده. لینک ارسال به اشتراک گذاری در سایت های دیگر تنظیمات بیشتر اشتراک گذاری ...
mohammada 22 ارسال شده در 18 اردیبهشت، ۱۳۹۴ سازنده اشتراک گذاری ارسال شده در 18 اردیبهشت، ۱۳۹۴ بسیار سپاسگذارم از توجهتون ... امکان داره تا ساخت یه پوشه داخل کارت حافظه کاملش کنید؟ لینک ارسال به اشتراک گذاری در سایت های دیگر تنظیمات بیشتر اشتراک گذاری ...
مجید آرتا 5,874 ارسال شده در 18 اردیبهشت، ۱۳۹۴ اشتراک گذاری ارسال شده در 18 اردیبهشت، ۱۳۹۴ بنده الان در حال حاضر بیسیک ندارم تا کد درستی بزارم یکی از دوستان زحمتشو بکشه. لینک ارسال به اشتراک گذاری در سایت های دیگر تنظیمات بیشتر اشتراک گذاری ...
mohammada 22 ارسال شده در 20 اردیبهشت، ۱۳۹۴ سازنده اشتراک گذاری ارسال شده در 20 اردیبهشت، ۱۳۹۴ کسی نیس کمک کنه؟!*bye* لینک ارسال به اشتراک گذاری در سایت های دیگر تنظیمات بیشتر اشتراک گذاری ...
milad19 113 ارسال شده در 20 اردیبهشت، ۱۳۹۴ اشتراک گذاری ارسال شده در 20 اردیبهشت، ۱۳۹۴ سلام کد برای ساخت یک فولدر در sd card file.MakeDir(file.DirRootExternal,"namefolder") لینک ارسال به اشتراک گذاری در سایت های دیگر تنظیمات بیشتر اشتراک گذاری ...
mohammada 22 ارسال شده در 22 اردیبهشت، ۱۳۹۴ سازنده اشتراک گذاری ارسال شده در 22 اردیبهشت، ۱۳۹۴ دوست عزیز این کد داخل حافظه داخلی گوشی فولدر میسازه مثلا اگه شما یه مدل گوشی داشته باشی که 16 گیگ حافظه داخلی داره روی اون 16 گیگ میسازه... لینک ارسال به اشتراک گذاری در سایت های دیگر تنظیمات بیشتر اشتراک گذاری ...
nofeel 15 ارسال شده در 22 اردیبهشت، ۱۳۹۴ اشتراک گذاری ارسال شده در 22 اردیبهشت، ۱۳۹۴ میتونی یه button بسازی و از کد استفاده کنی private StartAStream as InAsInputStream, out AsOutputStream میتونی این کد رو داخل global قرار بدی و end sub رو حذف کنی و ما بقی کد رو داخل sub btn1_click قرار بدی فکر کنم کارت راه بیافته البته من دقیق متوجه نشدم میخواید چه کاری انجام بدید لینک ارسال به اشتراک گذاری در سایت های دیگر تنظیمات بیشتر اشتراک گذاری ...
shahab.msb 326 ارسال شده در 25 اردیبهشت، ۱۳۹۴ اشتراک گذاری ارسال شده در 25 اردیبهشت، ۱۳۹۴ سلام این کد رو خودم نوشتم که یک پوشه خاص رو میخونه و فایلهای داخل پوشه رو توی لیست ویو نمایش میده تشکر یادتون نره [/b] If File.IsDirectory(File.DirRootExternal,"newshahab/") = True Then Dim ll As List ll.Initialize Try ll = File.ListFiles(File.DirRootExternal & "/newshahab/") For i= 0 To ll.Size-1 ListView1.AddTwoLinesAndBitmap(ll.Get(i),"",LoadBitmap(File.DirAssets,"audio_cd.png")) ' Log(ll.Get(i)) Next Catch End Try Else ToastMessageShow("پوشه newshahab در سیستم وجود ندارد",False) Return End If Else If File.IsDirectory(File.DirInternal,"newshahab/") = True Then Dim ll As List ll.Initialize Try ll = File.ListFiles(File.DirInternal & "/newshahab/") For i= 0 To ll.Size-1 ListView1.AddTwoLinesAndBitmap(ll.Get(i),"",LoadBitmap(File.DirAssets,"audio_cd.png")) ' Log(ll.Get(i)) Next Catch End Try Else ToastMessageShow("پوشه newshahab در سیستم وجود ندارد",False) Return End If[b] لینک ارسال به اشتراک گذاری در سایت های دیگر تنظیمات بیشتر اشتراک گذاری ...
ارسالهای توصیه شده
بایگانی شده
این موضوع بایگانی و قفل شده و دیگر امکان ارسال پاسخ نیست.