۰۸-شهریور-۱۳۹۰, ۲۰:۱۵:۰۷
صفحهها: 1 2
۱۰-شهریور-۱۳۹۰, ۱۸:۳۷:۴۹
(۰۸-شهریور-۱۳۹۰, ۲۰:۱۵:۰۷)DeepFreez نوشته است: [ -> ]سلام آقا من یه کیلاگر نوشتم که با آیدی لوگین میشه تقریبآ یه چیزی مثل troya Messenger اما موقع لوگین شدن آیدیش با مشکل برخوردم و لوگین نمیشه؟چیکار باید بکنم؟
عزیز اول قشنگ همه پستها رو بخون بعدآ اگه مشکل داشتی بپرس.
توی صفحه ی قبل یک فایل گذاشتم توش روش لوگین هم هست.
۱۱-شهریور-۱۳۹۰, ۱۷:۱۱:۲۱
سوال فنی
من یه سرچ تو سایت زدم دیدم آقای CrazYFULL گفته بودن برای کانکت شدن به سرور ویس یاهو باید از yacscom.dll استفاده کرد کسی کار کردن با این dll بلده؟
تو همون پست یه لینک از سایت www.planet-source-code.com گذاشته بودن من رفتم ولی چیزه زیادی ازش نفهمیدم خیلی کم یه چیزایی متوجه شدم ولی کامل نبود
من یه سرچ تو سایت زدم دیدم آقای CrazYFULL گفته بودن برای کانکت شدن به سرور ویس یاهو باید از yacscom.dll استفاده کرد کسی کار کردن با این dll بلده؟
تو همون پست یه لینک از سایت www.planet-source-code.com گذاشته بودن من رفتم ولی چیزه زیادی ازش نفهمیدم خیلی کم یه چیزایی متوجه شدم ولی کامل نبود
۱۸-شهریور-۱۳۹۰, ۱۴:۰۰:۳۹
واسه کجا میخوای کنفرانس یا روم؟
۱۹-شهریور-۱۳۹۰, ۰۱:۴۵:۴۸
(۱۸-شهریور-۱۳۹۰, ۱۴:۰۰:۳۹)~XT~ نوشته است: [ -> ]واسه کجا میخوای کنفرانس یا روم؟
دوست عزیز من برای روم میخام اگه لطف کنی کمکم کنی
۱۹-شهریور-۱۳۹۰, ۱۲:۱۹:۲۲
با سلام دوست عزیز برای لاگین کردن ویس در روم ابتدا باید Space Room روم و VC TOKEN مربوط رو در کیس مورد نظر جدا کنید که برای Space اونو باید در بازه ی جدا کنید و برای TOKEN اونو باید در بازه ی جدا کنید اگه نمونه سورس خواستی برات آماده میکنم. موفق باشی.
کد:
À€129À€
کد:
À€130À€
۱۹-شهریور-۱۳۹۰, ۱۷:۱۱:۵۳
سلام
اون 2 بازه ای که شما گفتید داخل data که بعد از وارد شدن به روم دریافت میکنم پیدا کردم.
و اگه من اشتباه نکرده باشم Space Room باید 1130 باشه و Vc Token باید این باشه
حالا اگه من اشتباه نکردم و این 2تارو درست هستن باید چکارشون کنم؟
نمونه سورسی که گفتی اگه لطف کنی بزاری که خیلی ممنونت میشم
اون 2 بازه ای که شما گفتید داخل data که بعد از وارد شدن به روم دریافت میکنم پیدا کردم.
کد:
......1131104Hong Kong Global Chat:1105Discuss issues with potential visitors, residents, and expats1084812632870412810321291130130nT1aOBG7cuWP.IngeWDXeNwFJyMEP76vc-109ketutdulu1100111neuter1131024109o0ocyanideo0o1100111neuter......
و اگه من اشتباه نکرده باشم Space Room باید 1130 باشه و Vc Token باید این باشه
کد:
nT1aOBG7cuWP.IngeWDXeNwFJyMEP76vc-
حالا اگه من اشتباه نکردم و این 2تارو درست هستن باید چکارشون کنم؟
نمونه سورسی که گفتی اگه لطف کنی بزاری که خیلی ممنونت میشم
۱۹-شهریور-۱۳۹۰, ۱۸:۰۱:۲۶
کاملا درست هست حالا میرسیم به اینجا
کد:
Public Function Voice(UserName As String, CFname As String, CFkey As String, Host As String, YAcs As YAcs)
YAcs.appInfo = "me(8, 1, 0, 421)&u=" & LCase(UserName) & "&ia=us"
YAcs.UserName = LCase(UserName)
YAcs.HostName = Host
YAcs.ConfKey =TOKEN
YAcs.ConfName = "ch/" & Room & "::" & Space
YAcs.inputGain = 100
YAcs.outputGain = 100
YAcs.inputAGC = 100
YAcs.loadSound LCase(UserName)
YAcs.createAndJoinConference
YAcs.inputSource = 100
End Function
۱۹-شهریور-۱۳۹۰, ۲۳:۱۲:۰۶
حاجی اینجا آخرشه ؟
خوب اون Function شمارو اینجوری تغیررش دادم آخه برا Cf بود اینجوری مشکلی نداره؟
اینجا متغیر Host درست پر کردم؟
آخه هرکاری کردم بازم ویسی نگرفت با این سرورهم تست کردم vc.yahoo.com بازم نشد.
بعدش چطور میشه فهمید که ویسی گرفته یا نه؟
خوب اون Function شمارو اینجوری تغیررش دادم آخه برا Cf بود اینجوری مشکلی نداره؟
کد:
Public Function Voice(UserName As String, Host As String, Token As String, Room As String, Space As String)
Form1.YAcs.appInfo = "me(8, 1, 0, 421)&u=" & LCase(UserName) & "&ia=us"
Form1.YAcs.UserName = LCase(UserName)
Form1.YAcs.HostName = Host
Form1.YAcs.ConfKey = Token
Form1.YAcs.ConfName = "ch/" & Room & "::" & Space
Form1.YAcs.inputGain = 100
Form1.YAcs.outputGain = 100
Form1.YAcs.inputAGC = 100
Form1.YAcs.loadSound LCase(UserName)
Form1.YAcs.createAndJoinConference
Form1.YAcs.inputSource = 100
End Function
__________________________________________
__________________________________________
Private Sub Voice_Click(Index As Integer)
Call Voice(ID.Text, "v2.vc.sp1.yahoo.com", Token.Text, "asia global chat:148", Space.Text)
End Sub
اینجا متغیر Host درست پر کردم؟
آخه هرکاری کردم بازم ویسی نگرفت با این سرورهم تست کردم vc.yahoo.com بازم نشد.
بعدش چطور میشه فهمید که ویسی گرفته یا نه؟
۲۰-شهریور-۱۳۹۰, ۲۲:۴۴:۵۷
خوب آقا الان Voice On میشه ولی بلد نیستم Audio On کنم که ایدی ببرم رو تالک
۱۰-آبان-۱۳۹۰, ۲۱:۲۴:۰۸
آقا این پکت Add هست من Sniff کردم ولی جواب نمیده
میشه بگین چرا ؟ با پروتوکل 102 وصل میشم !
Public Function Add(YahooID As String, victim As String, msg As String, group As String) As String
Dim Packet As String
Packet = "14À€" & msg & "À€65À€" & group & "À€97À€1À€216À€" & " Fuck U " & "À€254À€" & "Fuck" & "À€1À€" & YahooID & "À€302À€319À€300À€319À€7À€" & victim & "À€301À€319À€303À€319À"
Add = YMSGHeader(Packet, String(4, 0), String(4, 0), 131)
End Function
میشه بگین چرا ؟ با پروتوکل 102 وصل میشم !
Public Function Add(YahooID As String, victim As String, msg As String, group As String) As String
Dim Packet As String
Packet = "14À€" & msg & "À€65À€" & group & "À€97À€1À€216À€" & " Fuck U " & "À€254À€" & "Fuck" & "À€1À€" & YahooID & "À€302À€319À€300À€319À€7À€" & victim & "À€301À€319À€303À€319À"
Add = YMSGHeader(Packet, String(4, 0), String(4, 0), 131)
End Function
صفحهها: 1 2