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

گرفتن تکست از یک فایل .txt آنلاین


amirbeigi

سوال

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

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

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

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

شما توی یک سرویس، یک جاب تعریف کنید و یک تایمر که هر مدتی که خودتون توی تایمر تنظیم میکنید، جاب رو اجرا کنه و  رشته رو بروز کنه.

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

این کارارو کردم ولی وقتی مقدارو میده اون چیزی که توی فایل تکست بوده رو نمیده
یسری کد اچ تی ام ال میده و ...

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

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

	Dim ht As HttpJob
	ht.Initialize("update",Me)
	ht.Download("yourtxtfilelink")
Sub JobDone(Job As HttpJob)
	If Job.Success = True Then
		Dim out As OutputStream 
		File.Delete(File.DirInternal,"youroldtxt.txt")'فایل تکست قبلی رو حذف کن
		out = File.OpenOutput(File.DirInternal,"youroldtxt.txt",False)
		File.Copy2(Job.GetInputStream,out)
		out.Close
		Else
		ToastMessageShow("خطا در برنامه",False)
	End If
End Sub

 

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

در 17 ساعت قبل، محمدرضا شاهپیری گفته است :

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


	Dim ht As HttpJob
	ht.Initialize("update",Me)
	ht.Download("yourtxtfilelink")

Sub JobDone(Job As HttpJob)
	If Job.Success = True Then
		Dim out As OutputStream 
		File.Delete(File.DirInternal,"youroldtxt.txt")'فایل تکست قبلی رو حذف کن
		out = File.OpenOutput(File.DirInternal,"youroldtxt.txt",False)
		File.Copy2(Job.GetInputStream,out)
		out.Close
		Else
		ToastMessageShow("خطا در برنامه",False)
	End If
End Sub

 

داداش این کارارو خودم کردم
یسری کد اچ تی ام ال میده

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

شما اصلا تست کردین که ببینین فایلتون دانلود میشه یانه؟

رو هاسته یا جای دیگه؟

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

بایگانی شده

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

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

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