شروع پروژه BSRobo ربات پرقدرت یاهو مسنجر

سلام بچه ها شرمنده چند روز نتونستم بیام ببشخید (ببخشید) :لبخند:

نقل قول:

---

نوشته شده توسط deznava

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

Private Sub YMSG1_IncomingAppear(ByVal User As String, ByVal Status As YMSGMode_V2.StatusYID, Messege As String)
If Status = Available Then
Call YMSG1.PckSendMsg(User, Frm_Setting.Text1.Text + "salam")
End If
End Sub

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

---

مشکل از یاهو وست که 2 بار میفرسته
تو کامپوننت هم 2 بار دریافت میشه
شما اگه پکت رو از قسمت YMSG1_IncomingYDATA دریافت کنید و عملیات رو انجام بدید فکر کنم بهتر باشه

If User <> Online Then
Online = User
If Status = Available Then
YMSG1.PckSendMsg User, "Peygham"
End If
End If
If Status = Offline Then
If User = Online Then
Online = ""
End If

سلام

دوستان
اگر ممکنه این سورس رو به یه نرم افزار تبدیل کنید.
تا بتونیم استفاده کنیم.

ممنون

سلام دوستان من هنوز مشکل دارم داخل دریافت پی ام پی ام دریافت نمیکنه مشکل چیه

دستان چرا جواب نمیدید همه رفتید پی ام من ارسال نمیشه از اول تاپیکها ربات را دنبال کردم منم میخوام روی این پروژه کار کنم ولی پی ام نمیاد فقط ارسال میشه کمک کنید خواهشن

اگه ربات پی ام دریافت نکنه احتمال 2 تا مشکل هست
1. اگه با GPRS لاگین میشید خوب دیتاهای دریافتی و ارسالی GPRS با آیپی های غیر GPRS تفاوت داره که پی ام شما به آیدی های که تو لیستشون نیستید نمیرسه
2. چون از کامپوننت استفاده میشه این کامپوننت یه مشکل اساسی داره که هر آیدی حرف آخرش عدد 4 باشه رو کامل نشون نمیده واسه همین پی ام ها ردو بدل نمیشه
'''''''''''''''''''''
به امید خدا اگه وقت کردم ورژن 2 BSrobo رو میزارم که با وینسوک لاگین میشه و خیلی امکاناتش هم بیشتر هستش
خوشحال میشم نظر بدید

ای دی که به من پی ام میده اینه
behzad_games_2009
و پی امش نمیاد
و اینکه من با وایمکس به اینترنت متصل میشم
کمککنید خواهشن ایا باید با *** وصل شم

تا حالا با وایمکس کار نکردم با *** کانکت بشید شاید مشکل حل بشه

خب یک سری راه کار هست با مودم اون راه را کسی میدونه

ببخشید اشتباه دادم پست قبلی را راهای با winsock چطوری کسی میدونه

behzad_vb.net اگه میشه وقتی پستی رو به اشتباه وارد کردید همونو اصلاح کنید نه یک پست دیگه ارسال کنید که تاپیک شلوغ و درهم برهم نشه
وینسوک هم یک کامپوننت تقریبا قوی هستش واسه ارتباط با شبکه سایتها و سرور ها که من توی همین سایت آموزش دادم چطور به سرور یتهو متصل بشید

بخدا من سرچ میکنم ولی سرچ سایت اصلا کلمه کلیدی یاهو و ربات یاهو و... را مینویسه جستوجو یافت نشد

دوستان ممنون ولی از قدیم گفتن : گوشت رو دست گربه نسپارین

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


راستی چند با میشه با این برنامه پسورد غلط به یک آی دی داد ؟

نقل قول:

---

نوشته شده توسط farshid_vb

دوستان ممنون ولی از قدیم گفتن : گوشت رو دست گربه نسپارین

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


راستی چند با میشه با این برنامه پسورد غلط به یک آی دی داد ؟

---

- طبق قوانین فروم این جور مباحث خلافه!
- این کار رو هم که می گی نمیشه :
* بعد از چند بار پس غلط دادن یک کپچا نیاز هست برای لاگین
* بعد از چند بار پس غلط زدن ایدی بلاک میشه
* بعد از چند بار فرستادن پکت های پشت سر هم آی پی بلاک میشه
به امید فعالیت مفید شما در این فروم

نقل قول:

---

نوشته شده توسط _behnam_

سلام .
دیدم که همه دنبال یه ربات یاهو میگردن گفتم استارت شروع BSRobo رو بزنم.
ابن ربات که تازه خودم نوشتم با کاموننت YMSGpro لاگین میشه
امکاناتش تغریبا خوبه اما شک ندارم که بهتر میشه
BSRobo نرم افزاریه شبیه به cypher که آقای محمودیان 2 سال پیش تو سایتش قرار داد
منم فعلا روباتم با cypher لاگین میشه اما کم کم میخوام رباتمو با BSrobo لاگین کنم
دوستان این پروژه اپن سورسه . دوستان به هر نحوه میتونید واسه خودتون ادیت کنید و ارتغاع بدین اما فروشش کار درستی نیست و من راضی نیستم چون خودم به صورت رایگان در اختیارتون گذاشتم.


امکانات : BSRobo V 1.0.0
تغییر استاتوس دستی
دارای بانک اطلاعات اکسس
تغییر رنگ و فونت و سایز پی ام های ارسالی ربات
ارسال پیام از طرف ربات به دیگران
یاد دادن کلمه جدید به ربات توسط کسانی که در حال چت هستن
معرفی ربات به دوستان با دستور budy/
تبدیل عدد به حروف با دستور adad/
به دست آوردن آواتار آیدی دیگران با دستور avt/
دستورات gf/ , /bf
نوشتن متن دلخواه در استاتوس ربات توسط کسانی که با آن در حال چت هستن status/
دستورات time/ , /date
ارسال پی ام به صورت راندوم با <or>
ارسال چند خط پی ام با <enter>
دسترسی به لیست ادلیست های ربات
و .......

pass : barnamenevis.org
با تشکر بهنام اسلامی راد

---

سلام
من تازه واردم
ببخشيد ميشه بگين چرا اين سورس و برنامه ي exe رو اسكن ميكنيم همه آنتي ويروسها گير ميدن بهش.
همشون ميگن تروجان داره.

اينم لينك اسكن :
http://www.virustotal.com/file-scan/...0e9-1313087838

???

تروجان نداره. آنتی ویروس این ها رو تروجان میشناسه چون به ارسال اطّلاعات مشغول میشن :لبخند: از لحاظ امنیتی اگه به سورس مطمئن هستید مشکلی نیست.

سلام
استادای عزیز من هر کاری کردم نتونستم به یک چت روم وصل شم .
میشه برام یه نمونه بزارید ؟
مرسی

سرور یاهو عوض شده این کامپوننت دیگه وارد روم نمیشه

2 صفحه قبل طریقه گرفتن لینک کپچا رو گفتین

WebBrowser.Navigate "http://captcha.chat.yahoo.com/go/captchat/?img=" & PictureLink & "&.intl=us&.lang=en-US"

اما من اینو میزنم ارور میدده از ymsgpro هم استفاده میکنم

باید Webbroser به فرم اضافه کنید

HTTP/1.1 412 Precondition Failed

با سلام به همه دوستان
سوالر دارم :
می خواستم بپرسم چطور میشه فهمید چه آی دی آن لاینه یا آف لابنه با تشکر
جیمیلم:Mahdihp.devsc@gmail.com

با سلام خدمت دوستان
یک سوال داشتم ما چگونه می توانیم کاری کنیم که فرم این ربات همانند یاهو باشه و زمانی که فردی پیغام را فرستاد پیغام این فرد در فرم دیگر و در Rich_textbox به ما نمایش دهد
و در گوشه همان فرم یک چک باکس داشته باشیم که فرد دیگر با ربات در حال گفتگو نباشه و حساب های دیگر اگر پیغامی فرستادند بتوانند با ربات صحبت کنند به صورت تک نفری با یک عضو صحبت کنیم.
و یک موضوع دیگر این هست که یک فرم برای لاگین داشته باشیم و فرم دیگر برای تنظیمات یاهو و ای دی.
اینجوری بگم که برنامه یاهو مسنجری شبی سازی شده در کنار یک ربات یاهو و دوستان این برنامه را اگر کسی می تواند با پاکت های یاهو بسازه بهتر میشه و زمانی که سرورهای یاهو چنج میشه اون ها را هم بتوان دستی تغییر داد و زمانی که تغییر داده شد و به سرور لاگین شد سرور در لیست سرور ها ذخیره شود.
و قابلیت اپدیت داشته باشه.
این برنامه حجمش بالا میره ولی یک برنامه درجه یک میشه که همه هم می توانند از این برنامه استفاده کنند و هم اگر فکری به ذهنشان رسید و برنامه شخصی شد کد تغییر یافته را بگذارند اینجا تا همه استفاده کنند البته این رو بگویم که همه باید تلاش کنند نه این که یک نفر برنامه بنویسه باقی افراد کد را بردارند و تغییری داخل این برنامه ندهند.

kasi file exe dare be man bede ke robo betone link bede?
age dare in idmo add kone
mehdi_naghavi1@yahoo.com

با سلام خدمت دوستان عزیز من می خوام اد لیست های آیدی که باهاش آنلاین شدم
بره توی یک لیست باکس باید چیکار کنم؟

y!id : loverajabloo
ممنون میشم منو کمک کنید

با سلام به آقای بهنام جان خسته نباشی بنده یه سوالی درمورد اینکه چطور میشه با این کامپوننت یاهو YMSGPro مال آقای کرزی فایل را فرستاد به طرف مقابل و اینکه چطور میشه فهمید آی دی های ادلیست مون آن لاین یا آفلاین هستند با تشکر لطفا راهنمایی کنید.

Private Sub YMSG1_IncomingAddList(ByVal User As String, ByVal GroupName As String)
If GroupName <> "" Then
Frm_main.ADDlist.AddItem "===================="
Frm_main.ADDlist.AddItem "Group: " & GroupName
Frm_main.ADDlist.AddItem "--------------------"
Else
Frm_main.ADDlist.AddItem User
End If
End Sub
موفق باشید

نقل قول:

---

نوشته شده توسط kenman

با سلام خدمت دوستان عزیز من می خوام اد لیست های آیدی که باهاش آنلاین شدم
بره توی یک لیست باکس باید چیکار کنم؟

y!id : loverajabloo
ممنون میشم منو کمک کنید

---

Private Sub YMSG1_IncomingAddList(ByVal User As String, ByVal GroupName As String)
If GroupName <> "" Then List1.AddItem "++++++" & GroupName & "++++++"
If User <> "" Then List1.AddItem User
End Sub

نقل قول:

---

نوشته شده توسط MAHDIhp_devsq

با سلام به آقای بهنام جان خسته نباشی بنده یه سوالی درمورد اینکه چطور میشه با این کامپوننت یاهو YMSGPro مال آقای کرزی فایل را فرستاد به طرف مقابل و اینکه چطور میشه فهمید آی دی های ادلیست مون آن لاین یا آفلاین هستند با تشکر لطفا راهنمایی کنید.

---

YMSG1.PckSendFile "TOUSER","C:\1.jpg"

به جای TOUSER آیدی طرف مقابل رو بنویسید

سلام من از این نرم افزار هیچی سر در نمی یارم می شه بگید چطوری به exe تبدیلش کنم؟

نقل قول:

---

نوشته شده توسط Veteran

HTTP/1.1 412 Precondition Failed

---

این مشکل چجوری حل میشه؟

نقل قول:

---

نوشته شده توسط _behnam_

Private Sub YMSG1_IncomingAddList(ByVal User As String, ByVal GroupName As String)
If GroupName <> "" Then List1.AddItem "++++++" & GroupName & "++++++"
If User <> "" Then List1.AddItem User
End Sub

---

با سلام خدمت همه دوستان و عرض خسته نباشید خدمت داداش گلمون آقا بهنام
من یه سوال داشتم ،این کدی که واسه نشون دادن ادلیستا مینویسیم باید جای خاصی اونو فراخوانی کنیم یا اینکه خودبخود فراخوانی میشه؟؟؟چون من خودم اینو تو برنامه گذاشتم آیدیم درست لاگین شد ولی ادلیستام نیومدن،برنامه رو قدم به قدم که اجراش کردم دیدم این کد اصلا اجرا نمیشه،کسی میدونه مشکل از کجاست؟؟؟؟؟؟

سلام با تشکر
هر چی ID رو وارد میکنم اصلا online نمیشه
چرا؟

نقل قول:

---

نوشته شده توسط armini

با سلام خدمت همه دوستان و عرض خسته نباشید خدمت داداش گلمون آقا بهنام
من یه سوال داشتم ،این کدی که واسه نشون دادن ادلیستا مینویسیم باید جای خاصی اونو فراخوانی کنیم یا اینکه خودبخود فراخوانی میشه؟؟؟چون من خودم اینو تو برنامه گذاشتم آیدیم درست لاگین شد ولی ادلیستام نیومدن،برنامه رو قدم به قدم که اجراش کردم دیدم این کد اصلا اجرا نمیشه،کسی میدونه مشکل از کجاست؟؟؟؟؟؟

---

سلام باید حتما در رویداد incomingaddlist باشه .

نقل قول:

---

نوشته شده توسط MAHDIhp_devsq

با سلام به همه دوستان
سوالر دارم :
می خواستم بپرسم چطور میشه فهمید چه آی دی آن لاینه یا آف لابنه با تشکر
جیمیلم:Mahdihp.devsc@gmail.com

---

سلاو با کد های زیر :
Sourc = frmMain.Inet1.OpenURL("http://opi.yahoo.com/online?u=" & Ids & "&m=j")
If InStr(Sourc, "NOT ONLINE") Then
Online = Ids & " Is <black> Offline</black>"
Else
Online = Ids & " Is <blue> Online</blue>"
End If

کسی میتونه سورس کنفرانس و لیست کسانی که با ربات در حال چت هستند مثل
chater/
active/
اینا رو اگر داره بده من ؟

نقل قول:

---

نوشته شده توسط _behnam_

سلام .
دیدم که همه دنبال یه ربات یاهو میگردن گفتم استارت شروع BSRobo رو بزنم.
ابن ربات که تازه خودم نوشتم با کاموننت YMSGpro لاگین میشه
امکاناتش تغریبا خوبه اما شک ندارم که بهتر میشه
BSRobo نرم افزاریه شبیه به smclient که آقای محمودیان 2 سال پیش تو سایتش قرار داد
دوستان این پروژه اپن سورسه . دوستان به هر نحوه میتونید واسه خودتون ادیت کنید و ارتغاع بدین اما فروشش کار درستی نیست و من راضی نیستم چون خودم به صورت رایگان در اختیارتون گذاشتم.


امکانات : BSRobo V 1.0.0
تغییر استاتوس دستی
دارای بانک اطلاعات اکسس
تغییر رنگ و فونت و سایز پی ام های ارسالی ربات
ارسال پیام از طرف ربات به دیگران
یاد دادن کلمه جدید به ربات توسط کسانی که در حال چت هستن
معرفی ربات به دوستان با دستور budy/
تبدیل عدد به حروف با دستور adad/
به دست آوردن آواتار آیدی دیگران با دستور avt/
دستورات gf/ , /bf
نوشتن متن دلخواه در استاتوس ربات توسط کسانی که با آن در حال چت هستن status/
دستورات time/ , /date
ارسال پی ام به صورت راندوم با <or>
ارسال چند خط پی ام با <enter>
دسترسی به لیست ادلیست های ربات
و .......

pass : barnamenevis.org
با تشکر بهنام اسلامی راد

---

سلام دوست عزیز توی وی بی من از ocx ایراد میگیره و نمیذاره فراخوانیش کنم اخه مشکل چیه؟؟؟؟

من یه سوال دارم شما برای ارسال جواب در سورس اصلی از Respon استفاده کردین می خواستم بدونم این Respon چیه از کجا امده!!
----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
من با دستور

all YMSG1.PckSendMsg(touser, textto)

----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------

سلام به دوستان عزیز.اگه میشه قسمت های این روبو رو توضیح بدید.مثلا قسمت login چطوری به سرور وصل میشه یا قسمتی که /help میزنی از کجا دستور رو میگیره.و اگه بخوایم دستور جدیدی به روبو بدیم باید به کجا اضافه کنیم