اجرای بازی

[Abolfazl Moshtaghi 0]

سلام دوستان

من میخواستم تو بیسیک ادرس ی دیتا بازی رو دانلود کنم و توی گوشی ذخیره کنه و اجرا کنه

کسی در این زمینه میتونه راهنمایی کنه یا نمونه سورس کد اماده بده ببینم ساختارش چجوریه

تشکر

[Amir01 612]

سلام،

دوست گرامی باید از کتابخانه httputils استفاده کنید.ابتدا اونو تیک بزنید.

سپس یک متغیر از نوع HttpJob تعریف و Initialize کنید.

سپس متد download رو صدا بزنید.(ابتدا نام متغیرتون رو که از نوع httpjob هست بنویسد و بعد دات بنویسید و سپس متد دانلود رو صدا کنید و لینک تون رو بصورت استرینگ بهش بدید.

بعدش sub زیر رو بین دوتا sub دیگه قرار بدین:

Sub jobdone(job As HttpJob)
If job.Success=True Then
Dim save1 As OutputStream 
save1 = File.OpenOutput(File.DirRootExternal,"نام فایل جهت ذخیره شدن",False) 
File.Copy2(job.GetInputStream, save1)
save1.Close 
job.Release 
ToastMessageShow("دانلود و ذخیره سازی انجام شد",true)
End Sub
'نکته: در قسمت«نام فایل جهت ذخیره شدن» پسوند فایل یادتون نره

 

[DexterFstone 399]

فکنم با استفاده از JobDone بشه همچین کاری کرد

نمونه کد هم توی سایت زیاد هست

[Abolfazl Moshtaghi 0]

در در 6 اسفند 1399 در 19:05، امیرحسین قاسمی گفته است :

سلام،

دوست گرامی باید از کتابخانه httputils استفاده کنید.ابتدا اونو تیک بزنید.

سپس یک متغیر از نوع HttpJob تعریف و Initialize کنید.

سپس متد download رو صدا بزنید.(ابتدا نام متغیرتون رو که از نوع httpjob هست بنویسد و بعد دات بنویسید و سپس متد دانلود رو صدا کنید و لینک تون رو بصورت استرینگ بهش بدید.

بعدش sub زیر رو بین دوتا sub دیگه قرار بدین:

Sub jobdone(job As HttpJob)
If job.Success=True Then
Dim save1 As OutputStream 
save1 = File.OpenOutput(File.DirRootExternal,"نام فایل جهت ذخیره شدن",False) 
File.Copy2(job.GetInputStream, save1)
save1.Close 
job.Release 
ToastMessageShow("دانلود و ذخیره سازی انجام شد",true)
End Sub
'نکته: در قسمت«نام فایل جهت ذخیره شدن» پسوند فایل یادتون نره

 

تشکر از راهنماییتون

من میخوام مثلا دیتای ی بازی کامپیوتری رو دانلود کنم و اجرا کنم

میشه گفت ۳,۴ سالی از برنامه نویسی دور بودم

سورس آماده توی سایت یا خودتون ندارین که ساختارشو ببینم چی ب چیه؟