scarce
دوشنبه 24 خرداد 1389, 22:33 عصر
با سلام
من در حال نوشتن یک برنامه هستم که از امکانات زیر برخوردار هست
جستجوی دقیق یک مطلب خاص در وبلاگ ها وب سایت ها می باشد
کاری مانند سایت ها ی جستجو ولی سرعت جستجو بسیار دقیق تر و سریع تر است
این برنامه اطلاعات را به صورت Html دریافت می کنه.
برنامه من با کد زیر اطلاعات را از سایت ها دریافت می کنه
Headers = Headers & "GET www.p30download.com HTTP/1.1" & vbCrLf
Headers = Headers & "Host: www.p30download.com" & vbCrLf
Headers = Headers & "User-Agent: Mozilla/5.0 (Windows; U; Windows NT 5.1; en-US; rv:1.9.0.1) Gecko/2008070208 Firefox/3.0.1" & vbCrLf
Headers = Headers & "Accept: text/html,application/xhtml+xml,application/xml;q=0.9,*/*;q=0.8" & vbCrLf
Headers = Headers & "Accept-Language: en-US" & vbCrLf
Headers = Headers & "Accept-Encoding: gzip,deflate" & vbCrLf
Headers = Headers & "Accept-Charset: ISO-8859-1,utf-8;q=0.7,*;q=0.7" & vbCrLf
Headers = Headers & "Keep-Alive: 300" & vbCrLf
Headers = Headers & "Connection: keep-alive" & vbCrLf
Headers = Headers & "Referer: " & Refer & vbCrLf
</div>تنها مشکل برنامه زمانی هست که یک وبلاگ مثلا www.mynam.mihanblog.com را مورد جستجو قرار می دهم هیچ اطلاعات دریافت نمی شود یعنی source سایت قابل دریافت نیست . در این قسمت باید چیکار کنم ؟:عصبانی++::متفکر::متفکر:
من در حال نوشتن یک برنامه هستم که از امکانات زیر برخوردار هست
جستجوی دقیق یک مطلب خاص در وبلاگ ها وب سایت ها می باشد
کاری مانند سایت ها ی جستجو ولی سرعت جستجو بسیار دقیق تر و سریع تر است
این برنامه اطلاعات را به صورت Html دریافت می کنه.
برنامه من با کد زیر اطلاعات را از سایت ها دریافت می کنه
Headers = Headers & "GET www.p30download.com HTTP/1.1" & vbCrLf
Headers = Headers & "Host: www.p30download.com" & vbCrLf
Headers = Headers & "User-Agent: Mozilla/5.0 (Windows; U; Windows NT 5.1; en-US; rv:1.9.0.1) Gecko/2008070208 Firefox/3.0.1" & vbCrLf
Headers = Headers & "Accept: text/html,application/xhtml+xml,application/xml;q=0.9,*/*;q=0.8" & vbCrLf
Headers = Headers & "Accept-Language: en-US" & vbCrLf
Headers = Headers & "Accept-Encoding: gzip,deflate" & vbCrLf
Headers = Headers & "Accept-Charset: ISO-8859-1,utf-8;q=0.7,*;q=0.7" & vbCrLf
Headers = Headers & "Keep-Alive: 300" & vbCrLf
Headers = Headers & "Connection: keep-alive" & vbCrLf
Headers = Headers & "Referer: " & Refer & vbCrLf
</div>تنها مشکل برنامه زمانی هست که یک وبلاگ مثلا www.mynam.mihanblog.com را مورد جستجو قرار می دهم هیچ اطلاعات دریافت نمی شود یعنی source سایت قابل دریافت نیست . در این قسمت باید چیکار کنم ؟:عصبانی++::متفکر::متفکر: