pooya_pitbull

والا ما که آماتور هستیم چی؟

هیچی نفهمیدم:دی

iman_yahoo

اگر ویژوال بیسیک رو کامپیوترت نصبه برو توی prjyahoo قسمت frmMain بعدش یکجا هست به اسم Case 6 یا اینکه Ctrl +F رو بزن بنویس Case 6 اوونجا در همون Case 6 توی Buffer نشون میده که چقدر پیام روبات میفرسته هرچقدر خواستی میتونی پکت ها رو تنظیم کنی

pooya_pitbull

ایمان جان میشه با عکس بگی چجوری تنظیم کنم که یک بار پیام بفرسته و تکرار نکنه پیام رو؟؟

من تو case 6 رفتم اما چیزی نفهمیدم

اینم عکسش

iman_yahoo

این رو توی Case 6 کپی کن


Dim Data As String
Data = Mid(Buffer, InStr(1, Buffer, "À€450À€") + Len("À€450À€"))
If Left(Data, 1) = 1 Then Exit Sub

pooya_pitbull

داداش میشه با عکس نشون بدی

من کپی کردم اما درست نشد

terpak

بچه ها قصد بی احترامی نیستا اما بهتر نیست بجای اینکه اینجا سوال کنیدو منتظر بمونید تا جواب داده بشه خودتون دست بکار بشید؟؟؟؟
ویژوال بیسیک 6 تقریبا راحت ترین زبان برنامه نویسی که واسه یادگیریش اصلا نیازی به تجربه برنامه نویسی نیست و تقریبا توی چند ماه میتونی راحت بیشترین استفاده رو ازش ببرید
بهتره یکم درموردش تحقیق کنید مطمئن باشید بعد خوندن یک کتاب PDF رباتتون کامل و آنلاین میشه
توی گوگل سرچ کنید آموزش ویژوال بیسیک 6 مطمئن باشید به نتیجه میرسید
من خودم هم پارسال از SMClient استفاده میکردم اما تصمیم گرفتم یه ربات واسه خودم بنویسم و از 0 واسه خودم نوشتم تو پست های بعدی انشالا معرفیش میکنم که در موردش نظر بدید

iman_yahoo

من هم موافقم

pooya_pitbull

سلام.ممنون داداش از پیشنهادت
اتفاقا خودمم تا وارد یه چیزی میشم شروع به یادگیریش میکنم

اما داردم میگم که
من کد رو کپی کردن اما درست نشد دیگه نمیدونم چی کار کنم. اگه میشه با عکس نشون بدین تا بفهمم اشتباه کجاست

مرسی

iman_yahoo

من کد رو بالای GetPM کپی کردم کار خاصی نکردم

pooya_pitbull

داداش اینم عکس

اما باز کار نکرد