PDA

View Full Version : سوال: ارسال اطلاعات به سایت و دریافت جواب از آن سایت ( کمک خیلی نیاز دارم)



Mousavmousab
جمعه 21 مرداد 1390, 21:37 عصر
با سلام
دوستان، من همیشه یه سری اطلاعات را وارد سایت زیر می کنم :
آدرسش اینه : http://www.moojeno.com/internet (http://www.moojeno.com/internet)
و بعد از زدن دکمه تایید در صورتی که اطلاعاتم درست باشه به صفحه بعد رفته و یک User و Password به من میده. از اونجایی که من همیشه وقت ندارم این کار را به صورت دستی انجام بدم و کار سخت و طاقت فرساییه !!! می خوام این کار را به صورت نرم افزار انجام بدم. یعنی تقریباٌ یک رباط بنویسم که این اطلاعات را درون چند text box و box Combo اون سایته وارد کنه و جواب اون درخواست را بلافاصله به من بده. من Design برنامه را نوشتم. ولی اینکه چطوری با اون سایت ارتباط برقرار کنه را اصلاٌ نمی دونم با چه شی ای و چطوری این کار را انجام بدم و هیچ دانشی در این زمینه ندارم.

بهتره بدونید که اون سایت بالا که نوشتم :
1-) برای هر بار ورود اطلاعات کد امنیتی نداره که کار ما را سخت کنه.
2-) https هم نیست که به موانع بر بخوریم.
دوستانی که در این زمینه اطلاعاتی دارن برای کمک به من : ...
من شروع به نوشتن این برنامه کردم. شما این برنامه ی نا تمام منو از اینجا دانلود کنید (http://uploadtak.com/images/7ccs8mjfte8pdrh0z6.zip) و یه نگاهی هم به سایت بالا که نوشتم و هم به برنامه ام بیاندازید و بهتر متوجه بشید که من می خوام چیکار کنم.
بعد از باز کردن برنامه ، من می خوام بعد از زدن دکمه Send اطلاعات از فرم ویژوال بیسیک من به سرور اون سایت که بالا نوشتم فرستاده بشه و جوابش توی فرم 2 وی بی من paste بشه و بعد من خودم به صورت دستی یا Auto ذخیره اش می کنم.
*از اینکه به نوشته هام توجه کردین بی نهایت متشکرم.


تصویری از محیط برنامه که دارم می نویسم.


http://uploadtak.com/images/uhkvpo4yfgqqsjnwr2v.jpg (http://uploadtak.com/images/uhkvpo4yfgqqsjnwr2v.jpg)

amirm2010
جمعه 21 مرداد 1390, 23:07 عصر
دوست عزیز این کاری که شما میخواید انجام بدین کاملا غیراخلاقی هست
من توصیه میکنم که اصلا این برنامه را ارائه ندهید
درضمن برای اینکه شما بتونی این کار رو انجام بدی نیاز به یک دیتابیس قوی از کاراکترهای دیفالت داری به همراه نامبرهایی که lenght آنها معلوم نیست...پس کار آسونی نیست اما شدنیه

Mousavmousab
سه شنبه 25 مرداد 1390, 15:17 عصر
بهتره که شفافسا زی کنم. که هر چند قبلاٌ هم گفتم فقط به خاطر اینکه هر دفه با دست این کار را انجام ندم دارم این برنامه را می نویسم.

ببین دوست من "آقا امیر" من که نمی خوام این برنامه بیاد کد های تصادفی ایجاد کنه و وارد این سرور کنه و اون شرکت یا سایت را بپاشه و خراب کنه !!!
اون سایتی که من به شما نشون دادم سایتیه که من هر دفعه یک کدی را که خود شرکت تولید "بلیط بخت آزمایی " همون لاتاری که می فروشه را می خوام به جای دست با نرم افزار این کار را بکنم. اگه دقت کرده باشی کد ها را من خودم با دست توی نرم افزار تولید می کنم . در ضمن length اون کاراکتر ها هم مشخصه 5 تایی اند.

با این فرضیات شما چطور فکر می کنی که من می خوام کار غیر اخلاقی انجام بدم ؟
آیا این از نظر شما خلاف محسوب میشه ؟
ابن همه آدم 1000 تا سایت را هک می کنن حالا ما می خوایم کار خودمون را آسون کنیم از نظر شما "غیر اخلاقی" محصوب میشه؟
خوب شما کمک نکن تا همین جا هم دسدت درد نکنه. من از کس دیگه کمک می گیرم. بالاخره یه دوستی یه آشنایی یه نفر پیدا میشه که راهنماییم کنه

به امید اون روز ..

_behnam_
سه شنبه 25 مرداد 1390, 20:15 عصر
سلام !
اینکار به 2 شکل میشه انجام داد
Webbrowser
Winsock
که من وینسوک رو پیشنهاد میکنم(نظر شخصی هست)
باید هدر به سایت ارسال کنید و اگه درست باشه اطلاعات دریافت میشن
بهتره روی کار با وینسوک تحقیق کنید که توی همین سایت مثال هایی هست
هدر به شکل زیر فقط کافیه اطلاعات رو بزرید توی هدر و با وینسوک ارسال کنید



Dim Header As String
Header = "GET
Header = Header & "/internet/module.asp.htm?Card_Serial=" & "Shomare Kart" & "&Card_Pass=" & "pass" & "&Card_Level=" & "dore 1" & "&Card_Level2=" & "dore2" & "&Card_Level3=" & "dore3" & "&City="shahr" & " HTTP/1.1" & vbCrLf
Header = Header & "Accept-Language: en-us" & vbCrLf
Header =Header & "User-Agent: Mozilla/5.0 (compatible; MSIE 8.0; Windows NT 5.1; Expulsion-Creations)" & vbCrLf
Header = Header & "Accept: */*" & vbCrLf
Header = Header & "Host: www.moojeno.com" & vbCrLf
Header = Header & "Connection: Keep-Alive" & vbCrLf & vbCrLf

Mousavmousab
چهارشنبه 26 مرداد 1390, 12:17 عصر
دوست عزیز این چیز هایی که می گی برای من خیلی تازگی داره و دفعه اوله که می شنوم. و با winsock هم کار نکردم.
به نظر شما که کار ساده ای باید باشه می توی همین برنامه را به صورت آزمایشی ( خیلی ساده) برام بنویسی ؟
آدرس اون سایتی هم که می خوام بهشه اطلاعات ارسال بشه http://www.moojeno.com/internet هست و من فقط با فرم و ابزار های کاربردی وی بی کار کردم و در زمینه هایی که از کامپیوتر خارج میشه و به شبکه ربط پیدا می کنه اصلا با این ابزار ها کار نکردم.

حالا اگر زحمت بگشی این کار را انجام بدی ،اگه بتونم جبران می کنم.
من خیلی دنبال این کارم میشه گفت در به در این کارم.

<< باشد که خداوند یاری دهندگان را صد چندان یاری نماید>>

Mousavmousab
چهارشنبه 26 مرداد 1390, 22:42 عصر
بازم سلام

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

Mousavmousab
پنج شنبه 27 مرداد 1390, 13:43 عصر
دوستان خیلی توی این برنامه جلو رفتم یعنی برنامه را تا اینجایی نوشتم که فرم ها را پر می کنم اما دکمه Submit را نمی تونم پیدا کنم با چه نامی توی این سایت قرار داده شده و برنامه ارور میده

WebBrowser1.Document.All("submit").Click


که ارور میده ومیگه
object variable or with block variable not
من چطوری این سایت را submit کنم ؟

آدرس سایت اینه : http://www.moojeno.com/internet

ممنون میشم راهنماییم کنین
حتی برنامه Robo form هم نتونست دکمه submit این سایت را پیدا کنه