علی اخلاقی 0 ارسال شده در 27 اسفند، ۱۴۰۰ اشتراک گذاری ارسال شده در 27 اسفند، ۱۴۰۰ سلام دوستان کد اینکه که کاربر بتونه تمام فایل ها رو بصورت یکجا دانلود کنه چیه؟ از ی نفر پرسیدم گفت که لینک هارو باید لیست کنم اگه کسی کدی داره ممنون میشم که برام بفرسته لینک ارسال به اشتراک گذاری در سایت های دیگر تنظیمات بیشتر اشتراک گذاری ...
علی اخلاقی 0 ارسال شده در 28 اسفند، ۱۴۰۰ سازنده اشتراک گذاری ارسال شده در 28 اسفند، ۱۴۰۰ در ۱۴۰۰/۱۲/۲۸ در ۰۳:۰۵، DexterFstone گفته است: چ اروری داد؟ من از همین کد برای دانلود 100 تا فایل استفاده کردم و مشکلی نبود ارور بفرستید این ارور رو داد لینک ارسال به اشتراک گذاری در سایت های دیگر تنظیمات بیشتر اشتراک گذاری ...
DexterFstone 396 ارسال شده در 28 اسفند، ۱۴۰۰ اشتراک گذاری ارسال شده در 28 اسفند، ۱۴۰۰ در ۱۴۰۰/۱۲/۲۸ در ۲۲:۰۹، علی اخلاقی گفته است: این ارور رو داد عزیز شما مطمئنی لیستتون درست تعریف کردین؟ اول ی فایل تکست ایجاد کنید و تمام لینکاتون توش قرار بدید هر کدوم توی ی خط، بعد اون به برنامه اضافه کنید و با کد زیر لیستتون تکمیل کنید بعدش که مطابق کد های قبل برای دانلود اقدام کنید. Dim List1 As List List1 = File.ReadList(File.DirAssets, "links.txt") لینک ارسال به اشتراک گذاری در سایت های دیگر تنظیمات بیشتر اشتراک گذاری ...
DexterFstone 396 ارسال شده در 27 اسفند، ۱۴۰۰ اشتراک گذاری ارسال شده در 27 اسفند، ۱۴۰۰ در ۱۴۰۰/۱۲/۲۷ در ۱۸:۴۲، علی اخلاقی گفته است: سلام دوستان کد اینکه که کاربر بتونه تمام فایل ها رو بصورت یکجا دانلود کنه چیه؟ از ی نفر پرسیدم گفت که لینک هارو باید لیست کنم اگه کسی کدی داره ممنون میشم که برام بفرسته سلام من ی راه حل سراغ دارم ولی چقدر اصولی هست نمیدونم Dim l as list = 'لینک های خود را به لیست اضافه کنید for i = 0 to l.size - 1 Dim j As HttpJob j.Initialize("", Me) j.Download(l.get(i)) Wait For (j) JobDone(j As HttpJob) If j.Success Then 'عملیات مورد نظر پس از دانلود فایل End If j.Release لینک ارسال به اشتراک گذاری در سایت های دیگر تنظیمات بیشتر اشتراک گذاری ...
علی اخلاقی 0 ارسال شده در 27 اسفند، ۱۴۰۰ سازنده اشتراک گذاری ارسال شده در 27 اسفند، ۱۴۰۰ در ۱۴۰۰/۱۲/۲۷ در 22:34، DexterFstone گفته است: سلام من ی راه حل سراغ دارم ولی چقدر اصولی هست نمیدونم Dim l as list = 'لینک های خود را به لیست اضافه کنید for i = 0 to l.size - 1 Dim j As HttpJob j.Initialize("", Me) j.Download(l.get(i)) Wait For (j) JobDone(j As HttpJob) If j.Success Then 'عملیات مورد نظر پس از دانلود فایل End If j.Release خیلی ممنون بخاطر وقتی که گذاشتین ❤️🌹 این کد رو زدم اما خطا داد لینک ارسال به اشتراک گذاری در سایت های دیگر تنظیمات بیشتر اشتراک گذاری ...
DexterFstone 396 ارسال شده در 28 اسفند، ۱۴۰۰ اشتراک گذاری ارسال شده در 28 اسفند، ۱۴۰۰ در ۱۴۰۰/۱۲/۲۷ در 23:06، علی اخلاقی گفته است: خیلی ممنون بخاطر وقتی که گذاشتین ❤️🌹 این کد رو زدم اما خطا داد چ اروری داد؟ من از همین کد برای دانلود 100 تا فایل استفاده کردم و مشکلی نبود ارور بفرستید لینک ارسال به اشتراک گذاری در سایت های دیگر تنظیمات بیشتر اشتراک گذاری ...
سوال
علی اخلاقی 0
سلام دوستان کد اینکه که کاربر بتونه تمام فایل ها رو بصورت یکجا دانلود کنه چیه؟
از ی نفر پرسیدم گفت که لینک هارو باید لیست کنم
اگه کسی کدی داره ممنون میشم که برام بفرسته
لینک ارسال
به اشتراک گذاری در سایت های دیگر
5 پاسخ به این سوال تاکنون داده شده است
ارسالهای توصیه شده
بایگانی شده
این موضوع بایگانی و قفل شده و دیگر امکان ارسال پاسخ نیست.