رفتن به مطلب
بیسیک فور ایکس

آیا آموزش مورد پسند شما بود ؟  

5 کاربر تاکنون رای داده است

  1. 1. آیا آموزش مورد پسند شما بود ؟

    • بله
      5
    • خیر
      0


پست های پیشنهاد شده

سلام به همگی :greeting:

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

مرحله اول باید کتابخانه UploadFilePhp رو دریافت کنید. :secret2:

خب بعد از دریافت اونو به کتابخانه های بیسیکتون اضافه کنید و در پروژه خودتون فعالش کنید.

Capture_2017_09_28_18_17_49_541.png.c7955a8a2590947fb078180974883f01.png:yahoo:

خب حالا باید فایل php مون رو در هاست آپلود کنیم : upload.php

<?php
    $file_path = "uploads/";

    $file_path = $file_path . basename( $_FILES['uploaded_file']['name']);
    if(move_uploaded_file($_FILES['uploaded_file']['tmp_name'], $file_path)) {
        echo "success";
    } else{
        echo "fail";
    }
?>

مسیر فایلی که آپلود کردید رو نگه دارید برای مثال : http://yoursitename.ir/upload.php

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

Dim ufp As UploadFilePhp

حالا اولین کاری که میکنیم اونو اینشتیالایز میکنیم :secret2:

ufp.Initialize("amirUfp")

amirUfp : اسم ایونت نیم ما هستش تا از رویداد ها با خبر باشیم

حالا نوبت رسیده به آپلود کردن فایل :3d-smileys005:

Dim FileName as String="اسم فایلی که میخواهید سیو کنید"
Dim Address As String = File.DirRootExternal  ' آدرس فایل شما
Dim PhpLink as String = "http://yoursitename.ir/Upload.php" ' آدرس فایلی که در هاست آپلود کردیم
ufp.doFileUpload(Null,Null,Address&FileName,PhpLink)

خب اول اسم فایلمون رو مشخص کردیم. بعدش مسیر فایلمون رو. و بعدش هم لینک php که در ابتدای کار در هاست آپلود کردیم.

سپس با استفاده از کتابخانه فایل رو آپلود کردیم.

نکته :

به جای اولین Null  میتونید یک ProgressBar قرار بدید تا از مقدار آپلود شده با خبر باشید.

به جای دومین Null میتونید یک لیبل و یا ادیت تکست بذارید تا درصد آپلود شده رو نشون بده !

به همین راحتی فایل شروع به آپلود شدن میکنه ! :dance2::yahoo:

خب حالا کاری میکنیم که زمانی که فایل آپلود شد به ما یک پیام بده !

Sub amirUfp_statusUpload (value As String)
	If value = 100 Then
     MsgBox("فایل با موفقیت آپلود شد!!!","Aghajari")
	End If
End Sub

نکته : در اول ساب نوشتیم amirUfp که همان ایونت نیم ما بود که موقع اینشتیالایز مشخص کردیم.

 

حالا هم کاری میکنیم که وقتی کاربر برنامه رو بست همچنان فایل ما آپلود بشه و متوقف نشه !

Sub Activity_KeyPress (KeyCode As Int) As Boolean 
	If KeyCode=KeyCodes.KEYCODE_BACK Then
		ufp.UploadKill
	End If
	Return False
End Sub

 

 

این آموزش هم به پایان رسید امیدوارم مورد پسندتون باشه

:3d-smileys013:

امیرحسین آقاجری

به اشتراک گذاری این ارسال


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

سلام.

خیلی عالی بود.

واقعا آموزش ارزنده ایه.

 

منتها اگه دوتا مورد رعایت میشد، خیلی عالی میشد.

یکی اینکه میخوایم کاری کنیم که کاربر آدرس فایل آپلودی رو بده. چه جوری اکسپلور کنیم؟

دوم اینکه ای کاش کمی درمورد فایل PHP که نوشتید توضیح میدادید.

 

تشکر از زحمتتون.

🙂

به اشتراک گذاری این ارسال


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

برای ارسال دیدگاه یک حساب کاربری ایجاد کنید یا وارد حساب خود شوید

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

ایجاد یک حساب کاربری

برای حساب کاربری جدید در سایت ما ثبت نام کنید. عضویت خیلی ساده است !

ثبت نام یک حساب کاربری جدید

ورود به حساب کاربری

دارای حساب کاربری هستید؟ از اینجا وارد شوید

ورود به حساب کاربری

  • مطالب مشابه

    • توسط Assassin
      Amir_WheelView
      مشاهده فایل یک کتابخانه برای ایجاد wheel view
      امکان شخصی سازی کامل ویو
      قابلیت استفاده از Paint برای آیتم ها و بک گراند با کتابخانه رایگان Amir_Paint
      تنظیم فونت - رنگ - رنگ ایتم انتخابی و ...
      Min SDK : 15
      ارسال کننده Assassin ارسال یکشنبه, 8 بهمن 1396 دسته کتابخانه  
    • توسط Assassin
      یک کتابخانه برای ایجاد wheel view
      امکان شخصی سازی کامل ویو
      قابلیت استفاده از Paint برای آیتم ها و بک گراند با کتابخانه رایگان Amir_Paint
      تنظیم فونت - رنگ - رنگ ایتم انتخابی و ...
      Min SDK : 15
×