رفتن به مطلب
  • 0

save کردن یک فایل انتخاب شده


alimo

سوال

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

Sub Button1_Click
    Dim PicChooser As ContentChooser
    PicChooser.Initialize("PicChooser")
    PicChooser.Show("image/*", "یک عکس انتخاب کنید")
End Sub
Sub PicChooser_Result(Success As Boolean, Dir As String, FileName As String)
    If Success = True Then
        Dim inp As InputStream
        inp = File.OpenInput(Dir, FileName)
        
    Else
        ToastMessageShow("انجام نشد، دوباره تلاش کنید", True)
    End If
End Sub 
لینک ارسال
به اشتراک گذاری در سایت های دیگر

3 پاسخ به این سوال تاکنون داده شده است

ارسال های توصیه شده

سلام هموطن

اینا رو هم توی شرطط اضافه کن

این فایلت رو توی file.dirInternal کپی میکنه

کمکت میکنه احتمالا

Dim outp As OutputStream
outp = File.OpenOutput(File.DirInternal,fileName,True)
File.Copy2(inp,outp)
outp.Close
inp.Close
لینک ارسال
به اشتراک گذاری در سایت های دیگر

بایگانی شده

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

مهمان
این موضوع برای عدم ارسال قفل گردیده است.
  • کاربران آنلاین در این صفحه   0 کاربر

    • هیچ کاربر عضوی،در حال مشاهده این صفحه نیست.
×
×
  • اضافه کردن...