دریافت سورس یک سایت [بایگانی]

ho3ein.3ven

دوشنبه 02 مرداد 1391, 15:37 عصر

سلام بر همگی . دوستان من می خوام سورس یک سایت رو دریافت کنم . نیاز به سرعت زیاد دارم . اول با inet امتحان کردم که اصلا سورس این سایت رو نگرفت . بعد با rhc و web browser تست کردم که این ها هم سرعتشون خیلی پایین بود یعنی در حد 2-3 دقیقه طول کشید.بعد از تابع URLDownloadToFile هم امتحان کردم که اینم سرعت خوبی نداشت.
می خواستم ببینم راه دیگه ای هم هست ؟ من میخوام سورس سایت 4shared رو بگیرم.
ممنون از همگی

_behnam_

دوشنبه 02 مرداد 1391, 15:55 عصر

سلام.
با وینسوک امتحان کنید.

ho3ein.3ven

دوشنبه 02 مرداد 1391, 16:00 عصر

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

محسن واژدی

دوشنبه 02 مرداد 1391, 16:54 عصر

سلام علیکم

سورس زیر بررسی کنید

موفق باشید

Veteran

دوشنبه 02 مرداد 1391, 17:38 عصر

Run-time error '40006':

Wrong protocol or connection state for the requested transaction or request

ho3ein.3ven

دوشنبه 02 مرداد 1391, 17:45 عصر

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

محسن واژدی

دوشنبه 02 مرداد 1391, 18:35 عصر

کدی که می ده یه جوریه
اگه منظورتون ابتدای سورس هست، بله بالای سورس ، نتیجه بسته ارسالی اضافه میشود (حدودا" 10-12 خط) و تا پیش از سورس صفحه ادامه دارد

چطور میشه تشخیص داد که کل سورس رو خونده یا نه
طبیعتا انتهای سورس بایستی به </html> ختم شود که در صورت یافتن این تگ در انتهای سورس میتوانیم اطمینان از دریافت کامل صفحه اطمینان حاصل کنیم (یا رویداد SendComplete)

موفق باشید

ho3ein.3ven

دوشنبه 02 مرداد 1391, 20:09 عصر

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

ho3ein.3ven

دوشنبه 02 مرداد 1391, 20:16 عصر

و در /html هم در آخر سورس نیست . فک کنم ناقص سورس رو میگیره

ho3ein.3ven

سه شنبه 03 مرداد 1391, 11:50 صبح

سلام اگر ممکنه راهنمایی کنید .

محسن واژدی

سه شنبه 03 مرداد 1391, 14:04 عصر

سلام علیکم

دوباره سورس پست 4 را بررسی کنید

موفق باشید

ho3ein.3ven

سه شنبه 03 مرداد 1391, 15:37 عصر

سلام . ممنون خیلی خوبه.
ولی یه مشکلی که داره اینه وقتی که هنوز کل سورس رو نخونده پیقام completed رو میده.
با تشکر

meys34

سه شنبه 03 مرداد 1391, 18:46 عصر

سلام . ممنون خیلی خوبه.
ولی یه مشکلی که داره اینه وقتی که هنوز کل سورس رو نخونده پیقام completed رو میده.
با تشکر

1- چه سایتی رو میخواهید بخونید؟
2- شما از کجا میفهمید که هنوز کل سورس رو نخونده؟

محسن واژدی

سه شنبه 03 مرداد 1391, 19:44 عصر

ولی یه مشکلی که داره اینه وقتی که هنوز کل سورس رو نخونده پیقام completed رو میده. نمیتوان گفت 100% اما در اغلب اوقات صحیح هست چراکه انتهای فایل به تگهای < /html > و < /body > ختم میشود

ho3ein.3ven

سه شنبه 03 مرداد 1391, 20:33 عصر

چون بعد از اینکه این پیغام رو میده باز هم سورس اضافه می کنه.

ho3ein.3ven

سه شنبه 03 مرداد 1391, 20:44 عصر

با تشکراز همگی . این تکه کدش رو به صورت زیر تغییر دادم درست شد:
If LCase(sBuffer) Like "*</body>" & vbCrLf & "</html>*" Then DataCompleted

محسن واژدی

سه شنبه 03 مرداد 1391, 22:18 عصر

شاید اگر کد را بصورت زیر ویرایش کنیم بهتر باشد چرا که معلوم نیست در همه سورس ها تگ Html بلافاصله پس از Body قرار گرفته باشد یا این دو تگ بدون کاراکتر انتهای خط، پشت سر هم قرار گرفته باشند

If LCase(sBuffer) Like "*<*/body*>*<*/html*>*" Then DataCompleted

موفق باشید

ho3ein.3ven

سه شنبه 03 مرداد 1391, 22:48 عصر

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

محسن واژدی

چهارشنبه 04 مرداد 1391, 08:34 صبح

با عرض پوزش، تگ های body و html توسط وی بولتن حذف شده بودند دلیل اینکه چرا اینطور است ممکن هست بخاطر خاموش بودن تگ های HTML باشد، کد را با کمی تغییرات جایگزین کردم، ستاره های داخل تگها صرفا برای جلوگیری از حذف هستند وگرنه تاثیری در نتیجه نهایی ندارند

موفق باشید