فرستادن هدر

[ameri110]

سلام
من یه header دارم. مثل این که مربوط به یه بنر تبلیغاتیه:

GET http://anetwork.ir/showad/html/?v=245636471&ts=1356198842 HTTP/1.1

Host: anetwork.ir
User-Agent: Mozilla/5.0 (Windows NT 6.1; WOW64; rv:17.0) Gecko/20100101 Firefox/17.0
Accept: text/html,application/xhtml+xml,application/xml;q=0.9,*/*;q=0.8
Accept-Language: en-US,en;q=0.5
Accept-Encoding: gzip, deflate
Connection: keep-alive
Referer: http://anetwork.ir/showad/c.php?adwidth=468&adheight=60&aduser=1353008520
Cookie: __utma=227371853.815744912.1340028109.1352126671.1 352305570.23; __utmz=227371853.1352305570.23.20.utmcsr=taristar. com|utmccn=(referral)|utmcmd=referral|utmcct=/; __utma=227371853.815744912.1340028109.1352126671.1 352305570.23; __utmz=227371853.1352305570.23.20.utmcsr=taristar. com|utmccn=(referral)|utmcmd=referral|utmcct=/; PHPSESSID=83sko3n6b070gbbjpoqn2802v7; datac=5; totalc=5; setc=amerie110%40gmail.com%7Cb3ef46edac9a5388f3fec cc30d90352a5d0f7b8d69cdd831d9d44642a52b8e9964baf6c d4642a5d0f75d0f7b8d691d9d4; __utmb=227371853.4.10.1356193308; __utmc=227371853

می خواهم توسط winsock یا inet یا هر چیز دیگه ای ارسالش کنم.
این کد رو هم پیدا کردم اما کار نکرد:گریه::

Winsock1.SendData "GET http://anetwork.ir/showad/html/?v=245636471&ts=1356198842 HTTP/1.1" & vbCrLf & Text2.Text & vbCrLf & vbCrLf
لطفا راهنماییم کنید
خیلی ممنون :قلب:

*این رو هم بگم که قصد جعل کلیک ندارم و یه بنر تبلیغاتی رو انتخاب کردم چون بتونم از ارسال صحیحش مطمئن بشم و این هدر مربوط به یه بنر رایگانه :چشمک:

[farshid_king_r]

سلام دوست عزيز
داشتم يه دوري ميزدم پست شما رو ديدم

شما پكت رو دارين

Winsock1.SendData "GET http://anetwork.ir/showad/html/?v=245636471&ts=1356198842 HTTP/1.1" & vbCrLf & Text2.Text & vbCrLf & vbCrLf

اين چيه ديگه ؟ جايي كپي پست كردين ؟ :d


اگه ميخواي با پروكسي وصل شي كه يكمي فرق داره

اگرم نه كه اين سورس ميشه : ( تست نكردم همينجور نوشتم - تست كنيد مشكل داشت بگين اوكي كنم )





Coomand1<<<<-

With Winsock1

.close
.connect "www.anetwork.ir",80
end with

winsock Connect <<<<<<--

Dim Header As String

Header = "GET /showad/html/?v=245636471&ts=1356198842 HTTP/1.1" & Vbcrlf
header = header & "Host: anetwork.ir" & Vbcrlf
header = header & "User-Agent: Mozilla/5.0 (Windows NT 6.1; WOW64; rv:17.0) Gecko/20100101 Firefox/17.0" & Vbcrlf
header = header & "Accept: text/html,application/xhtml+xml,application/xml;q=0.9,*/*;q=0.8" & Vbcrlf
header = header & "Accept-Language: en-US,en;q=0.5" & Vbcrlf
header = header & "Connection: close" & Vbcrlf
header = header & "Referer: http://anetwork.ir/" & Vbcrlf & Vbcrlf

winsock1.senddata header



موفق باشيد