ah313mad 34 ارسال شده در 22 خرداد، ۱۳۹۴ اشتراک گذاری ارسال شده در 22 خرداد، ۱۳۹۴ سلام دوستان عزیزان یه صوال دارم .من داخل صفحه برنامه ام یک لیبل هست که میخوام به یه فایل تکست از اینترنت وصل باشه . هر وقت خالی بود چیزی نشون نده هر وقت فایل تکست متنی داخلش قرار گرفت در صورت وصل بودن به اینترنت متن رو دریافت کنه و داخل لیبل قرار بده . در ضمن میخوام بدون باز شدن برنامه هر وقت گوشی اینترنتش وصل شود اتوماتیک فایل تکست رو بررسی کنه و داخل لیبل قرار بده . لینک ارسال به اشتراک گذاری در سایت های دیگر تنظیمات بیشتر اشتراک گذاری ...
مهدی ایزدی 9,203 ارسال شده در 22 خرداد، ۱۳۹۴ اشتراک گذاری ارسال شده در 22 خرداد، ۱۳۹۴ درود ببینید این که بخواهید بدون باز بدون برنامه کار کنه که خب مشخصه باید با سرویس کار کنید در مورد دانلود و نمایش دادنش هم باید کتابخانه HttpUtils2 رو فعال کنید بعدش توی Globals بگید : dim httpjob1 as httpjob بعدش توی Service Create : httpjob1.initialize("httpjob1",me) بعدش میتونید یک تایمر هم با زمان مشخص تعریف کنید و توی کد تایمر بگید که httpjob1.download("linke morede nazar") بعدش این Sub رو هم بنویسید: sub JobDone(Job as httpjob) if job.success = true then label.text = job.GetString end if end sub لینک ارسال به اشتراک گذاری در سایت های دیگر تنظیمات بیشتر اشتراک گذاری ...
ah313mad 34 ارسال شده در 23 خرداد، ۱۳۹۴ سازنده اشتراک گذاری ارسال شده در 23 خرداد، ۱۳۹۴ ببخشید من مبتدی هستم تایمر رو چجور تعریف کنم . اگه بشه کدش رو بزارید ممنون میشم برای سرویس چجور تعریف کنم . چجور با بسته بودن برنامه دانلود انجام بشه؟!؟! ممنون میشم جناب ایزدی لینک ارسال به اشتراک گذاری در سایت های دیگر تنظیمات بیشتر اشتراک گذاری ...
shahab.es 5,429 ارسال شده در 23 خرداد، ۱۳۹۴ اشتراک گذاری ارسال شده در 23 خرداد، ۱۳۹۴ سلام توی process_globals تایمیر رو تعریف کن dim timer1 as timer activity_create timer1.Initialize("timer1",5000) sub timer1_tick httpjob1.download("linke morede nazar") end sub لینک ارسال به اشتراک گذاری در سایت های دیگر تنظیمات بیشتر اشتراک گذاری ...
ah313mad 34 ارسال شده در 23 خرداد، ۱۳۹۴ سازنده اشتراک گذاری ارسال شده در 23 خرداد، ۱۳۹۴ sub JobDone(Job as httpjob) if job.success = true then label.text = job.GetString end if end sub سلام آقای ایزدی وقتی sub رو می نویسم . با خطای زیر مواجه میشم Parsing code. Error Error parsing program. Error description: Undeclared variable 'label' is used before it was assigned any value. Occurred on line: 61 Label.text = Job.GetString باید این ساب رو داخل صفحه """سرویس"""" بزاریم یا داخل """صفحه مورد نظرمون""" ؟؟؟؟ لینک ارسال به اشتراک گذاری در سایت های دیگر تنظیمات بیشتر اشتراک گذاری ...
پژمان نیکروان 6,055 ارسال شده در 23 خرداد، ۱۳۹۴ اشتراک گذاری ارسال شده در 23 خرداد، ۱۳۹۴ عزیز دل آقای ایزدی مثال زد یا اشتباه تایپی بود که اونجا نوشتن label شما جای ای اسم لیبل خودتون رو قرار بدید. مثلا label1 یا میتونید متن رو با مسیج باکس نشون بدید ، این دیگه سلیقه شماست: مسیج باکس sub JobDone(Job as httpjob) if job.success = true then msgbox(job.GetString,"") end if end sub لینک ارسال به اشتراک گذاری در سایت های دیگر تنظیمات بیشتر اشتراک گذاری ...
حمید زارع 331 ارسال شده در 2 مرداد، ۱۳۹۴ اشتراک گذاری ارسال شده در 2 مرداد، ۱۳۹۴ داخل فایل تکست من فقط یه لینک هست میخام اون رو بخونم من این کد رو مینویسم : Sub JobDone(job As HttpJob) If job.Success Then Msgbox(job.GetString,"Success") Else Msgbox("error","") End If End Sub ولی یک عالمه متن برام میاره من فقط لینکمو میخام چه کار کنم ؟ لینک ارسال به اشتراک گذاری در سایت های دیگر تنظیمات بیشتر اشتراک گذاری ...
ah313mad 34 ارسال شده در 23 اردیبهشت، ۱۳۹۵ سازنده اشتراک گذاری ارسال شده در 23 اردیبهشت، ۱۳۹۵ دوستان عزیز . من همین مشکل رو دارم . یک فایل Txt به آدرس http://yoursite.ir/up1.txt رو میخوام داخل label1قرار بدم . مبتدی هستم لطفا سطح پایین توضیح بدید. لینک ارسال به اشتراک گذاری در سایت های دیگر تنظیمات بیشتر اشتراک گذاری ...
shahab.es 5,429 ارسال شده در 23 اردیبهشت، ۱۳۹۵ اشتراک گذاری ارسال شده در 23 اردیبهشت، ۱۳۹۵ دوستان عزیز . من همین مشکل رو دارم . یک فایل Txt به آدرس http://yoursite.ir/up1.txt رو میخوام داخل label1قرار بدم . مبتدی هستم لطفا سطح پایین توضیح بدید. سلام ببین ، شما بیا و دانلودش کن این کد برای دانلودش-کتابخونه httpUtills2 رو هم تیک بزن dim ht as httpjob ht.initialize("ht",me) ht.download("http://yoursite.ir/up1.txt") اینم ساب جاب دان sub jobdone(job as httpjob) if job.success = true then if job.jobname = "ht" then lbl.text = job.getstring end if end if end sub فقط پیشنهاد میکنم قبل از دانلود، ادرس سایتت رو توی مرورگر باز کنی و ببینی همچین فایل هست اصن ، متنش درسته و ... لینک ارسال به اشتراک گذاری در سایت های دیگر تنظیمات بیشتر اشتراک گذاری ...
ah313mad 34 ارسال شده در 3 خرداد، ۱۳۹۵ سازنده اشتراک گذاری ارسال شده در 3 خرداد، ۱۳۹۵ سلام و درود و خسته نباشید . دوستان عزیز من یه کلید(دکمه) دارم که میخوام یه لینک براش قرار بدم . منتهی میخواهم لینک رو از یه فایل تکست http://sitesitesite.ir/nemone.txt بگیره . یعنی هر وقت اون صفحه باز میشه . آدرس لینک رو از فایل txt اینترنت بگیره که هر وقت خواستم لینک رو عوض کنم فقط فایل Txt رو تغییر بدم و با کلیک بروی کلیک به اون آدرس بره با مرورگر. ممنون میشم راهنمایی کنید . لینک ارسال به اشتراک گذاری در سایت های دیگر تنظیمات بیشتر اشتراک گذاری ...
shahab.es 5,429 ارسال شده در 3 خرداد، ۱۳۹۵ اشتراک گذاری ارسال شده در 3 خرداد، ۱۳۹۵ سلام خوب از یه فایل تکست دانلودش کنید فقط کتابخونه phone و httputills2 رو تیک بزنید Sub Globals Dim ht As HttpJob End Sub Sub Activity_Create(FirstTime As Boolean) ht.Initialize("ht",Me) End Sub Sub myButt_Click ht.PostString("http://myAddress.com/text.txt","") End Sub Sub jobdone(job As HttpJob) If job.Success = True Then If job.JobName = "ht" Then Dim p As PhoneIntents StartActivity(p.OpenBrowser(job.GetString)) End If End If End Sub لینک ارسال به اشتراک گذاری در سایت های دیگر تنظیمات بیشتر اشتراک گذاری ...
ah313mad 34 ارسال شده در 4 خرداد، ۱۳۹۵ سازنده اشتراک گذاری ارسال شده در 4 خرداد، ۱۳۹۵ StartActivity(p.OpenBrowser(job.GetString)) ممنون از راهنمایی تون اگر بخوایم بجای مرورگر خودش اتوماتیک مثلا(کروم و مرورگر و بازار یا گوگل پلی )رو بیاره خود کاربر انتخاب کنه . باید چی جایگزین این بکنیم؟ لینک ارسال به اشتراک گذاری در سایت های دیگر تنظیمات بیشتر اشتراک گذاری ...
پژمان نیکروان 6,055 ارسال شده در 4 خرداد، ۱۳۹۵ اشتراک گذاری ارسال شده در 4 خرداد، ۱۳۹۵ ممنون از راهنمایی تون اگر بخوایم بجای مرورگر خودش اتوماتیک مثلا(کروم و مرورگر و بازار یا گوگل پلی )رو بیاره خود کاربر انتخاب کنه . باید چی جایگزین این بکنیم؟ با همین تکه کد آقا شهاب خود برنامه هایی که قابلیت باز کردن اون لینک رو دارن میاره. مثل انواع مرورگر ها ، مارکت و.. لینک ارسال به اشتراک گذاری در سایت های دیگر تنظیمات بیشتر اشتراک گذاری ...
arastooms 1,046 ارسال شده در 29 آبان، ۱۳۹۵ اشتراک گذاری ارسال شده در 29 آبان، ۱۳۹۵ سلام به اساتید عزیز پست رو بالا میارم چون تنهاپستی که پیدا کردم و مربوط بود همین پست بود لطفا اگر ممکنه راهنمایی بفرمایید ممنون میشم من یم فایل تکس دارم روی هاست با 4 خط محتوی که 4 آدرس هست که در دیتابیس ذخیره میشه همه با اینتر از هم جدا شده مثلا داخل فایل تکس نوشته www.google.com www.ir.com www.ams.com www.aaa.com حالا یه دکمه دارم که کاربر میزنه باید بیاد این فایل رو از هاست بخونه و این 4 تا رو نمایش بده در 4 لیبل متفاوت چه طور میتونم این کار رو انجلم بدم ممنون از راهنمایی دوستان لینک ارسال به اشتراک گذاری در سایت های دیگر تنظیمات بیشتر اشتراک گذاری ...
shahab.es 5,429 ارسال شده در 29 آبان، ۱۳۹۵ اشتراک گذاری ارسال شده در 29 آبان، ۱۳۹۵ dim str() as string = regex.splite(crlf,job.getString) 'khate avval => str(0) 'khatte dovvom => str(1) '. '. '. سلام توی ساب جاب دان بذار ارسطو لینک ارسال به اشتراک گذاری در سایت های دیگر تنظیمات بیشتر اشتراک گذاری ...
hadiazimi 0 ارسال شده در 24 فروردین، ۱۳۹۸ اشتراک گذاری ارسال شده در 24 فروردین، ۱۳۹۸ میخوام یه متن رو از هاست بگیرم و نمایش بدم با این کد هایی که گفتید امتحان کردم ولی وقتی فایل متن در هاست تغییر بکنه تو برنامه تغییری اعمال نمیشه لینک ارسال به اشتراک گذاری در سایت های دیگر تنظیمات بیشتر اشتراک گذاری ...
ارسالهای توصیه شده
بایگانی شده
این موضوع بایگانی و قفل شده و دیگر امکان ارسال پاسخ نیست.