| Latest topics | » سلام علیک و رحمه الله...چه خبرا بچه ها؟
 by DARK Sat Apr 30, 2022 11:59 pm
» oon ghadima!!!
by Inj3ctor Wed Aug 18, 2021 4:26 am
» need a source code of any server for university project help me for it
by xerockss Sun Jun 09, 2019 10:28 pm
» New : Run Python based bots like Aurora, Blacksmith, VBOt in your Android Mobile
by ltc_mkt Wed Feb 27, 2019 5:09 pm
» دوره ی اضافه کردن سکه به برنامه هایی همچون فالوور بگیر و ممبرگیر و ... (خریداری شده)
by mr.pitza Mon Oct 01, 2018 8:10 pm
» hach any id f.a.c.e.b.o.o.k 2019
by christian777 Sat Apr 21, 2018 4:41 am
» هديه للجميع 500 نك فلوود قديم شغالين 500 old ids flood free
by christian777 Mon Apr 09, 2018 6:37 pm
» Freebuzz & Nimbuzz yadet bekheyr !
by DARK Thu Apr 05, 2018 1:54 pm
» new flood 2018 فلود جديد يعمل على جميع انواع نكات لفلود القديمة والجديدة
by christian777 Fri Oct 20, 2017 6:20 am
» STEALTH PROJECT WEB FLOOD NIMBUZZ
by djsaim Sat Sep 30, 2017 8:51 pm
» XIO server & online bots
by ltc_mkt Mon May 29, 2017 8:12 pm
» فریباز دوباره برمیگردد
by Mer+sad Thu Apr 06, 2017 3:34 am
» Xio Server Updated Elite Version
by lekshmi321 Wed Mar 29, 2017 11:35 am
» Join MulTi id nimbuzz 2016
by sami-alarifi Mon Dec 05, 2016 3:09 am
» انجمن تیم امنیتی آنانیموس سکوریتی
by shirsefat Thu Nov 17, 2016 6:12 pm
» Xio Server Latest Version
by shirsefat Thu Nov 17, 2016 6:04 pm
» amooZesh kamele hack dar yek file pdf
by shirsefat Fri Nov 11, 2016 2:23 am
» CRACKER IDS 2017 WORKING
by abdo-osmana Sat Oct 29, 2016 1:43 am
» NEW ... ROOM ANTI CAPCHA 2017 DESTROY ROOMS V 4 BY AL-JOOOCKER@N.C
by abdo-osmana Sat Oct 29, 2016 1:41 am
» NEW FLOOD ROOM AND PV 2017 ANTI CAPTCHA
by abdo-osmana Sat Oct 29, 2016 1:30 am
» add new server Work 24 hours --- تحديث حسابات السيرفرات قم بــاضافه السيرفرات الجديده تعمل 24 ساعه
by abdo-osmana Sat Oct 29, 2016 1:28 am
» new auto id maker
by sandy_rawat Tue Oct 04, 2016 4:24 pm
» wonderful list id arbic for crucker اكبر ليستة ايملات تخمين جديدة
by christian777 Sun Sep 25, 2016 12:59 am
» New Abdo Cobra Auto Id maker Source code working
by Kash007 Sat Sep 24, 2016 10:26 pm
» 2000 id flood free
by christian777 Sun Sep 18, 2016 3:54 am
» new ip address changer with crack@pishaash@n.c
by cebecis Sat Sep 10, 2016 3:19 am
» تجسس على الخصوصية
by majed5160 Thu Aug 25, 2016 3:26 am
» سلام دوستان من
by majed5160 Wed Aug 24, 2016 3:10 am
» Trusted online server bots
by bom Fri Aug 19, 2016 7:59 pm
» فلود جديد ناررررر
by christian777 Sat Aug 13, 2016 10:12 am
» Receive Captcha in PVT C# and VB.NET source code available
by wathk Thu Jul 28, 2016 3:01 am
» Attention nimbuzz users !
by -namakul- Tue Jul 26, 2016 8:27 pm
» Salam man az karbqraye qadimiton hastam lotfan komakam konid :(
by SALIJON* Sat Jul 23, 2016 6:34 pm
» Nimbuzz stylish ids for sale
by msb Wed Jul 20, 2016 12:33 pm
» Nuke Mobileserver V9
by launchar Tue Jul 19, 2016 1:51 pm
» help me please c sharp masters
by launchar Tue Jul 19, 2016 1:39 pm
» salam be dostane qadimi hamgi join bedin bebinm kojain :P
by ghaz_ghaz90 Sat Jul 09, 2016 12:22 am
» Xio Server Update
by ghaz_ghaz90 Fri Jul 08, 2016 11:15 pm
» Xio Auto Capcha ID Maker ( FASTEST IDMAKER EVER)
by karthik~ajay Thu Jul 07, 2016 10:59 pm
» All web defacers and SQLi hach
by mitu143 Thu Jun 16, 2016 1:24 pm
» special daface pages FreeBuzz-Team
by mitu143 Thu Jun 16, 2016 12:59 pm
» Meet A Stranger Room Advertizer BoT
by lekshmi321 Sun Jun 05, 2016 5:14 pm
» NEW STEALTH PROJECT WEB FLOOD NIMBUZZ
by gentarbumi Sun Apr 24, 2016 10:08 pm
» Moving the write using HTML تحريك الكتابة باستخدام جافا سكرييت
by faris.jra7 Sat Apr 23, 2016 11:40 pm
» فلود غرف النيمباز
by saeid Sat Apr 16, 2016 12:43 am
» How to Show Hidden Files and Folders In Windows 7
by i_am~the_best Fri Apr 15, 2016 8:45 am
» How to Earn Money Online From PTC Sites
by i_am~the_best Fri Apr 15, 2016 8:43 am
» Create Id and Chat
by star.iraq Sun Apr 10, 2016 2:51 pm
» Addlist DC + hanger + remote v2.0
by oye Tue Apr 05, 2016 9:18 am
» XIO ADD FLOOD V.2
by lekshmi321 Fri Mar 25, 2016 8:37 pm
|
| | | amuzeshe sakhte remoter ba vb6 |  |
|
+5amirslr JoOJoO-AllsTaR Unkn0wn EMESDI mahdi123 9 posters | | Author | Message |
|---|
| The author of this message was banned from the forum - See the message | mahdi123
T-SBD
Posts : 94
Points : 177
Thanked : 0
Join date : 2012-08-07
ASL : 9asl :D
| | Subject: amuzeshe sakhte remoter ba vb6 Wed Sep 19, 2012 5:24 pm | |
| salam bax . plz yeki az dostan amuzeshe sakhte remoter nimbuzz masalan k#kick , b#ban , j#jok in room , v#visitor va chanta az remote haye karbordi nimbuzz ro ro yek project help kone . kheili mamnoooooon  | |
| | | | EMESDI
Badbuzzer
Posts : 417
Points : 2654
Thanked : 7
Join date : 2012-05-06
| | Subject: Re: amuzeshe sakhte remoter ba vb6 Wed Sep 19, 2012 6:39 pm | |
| If InStr(macoud, "k#") <> 0 Then
Dim targeto As String
Dim first As Integer
Dim last As Integer
first = InStrRev(macoud, "k#") + 8
last = InStr(first, macoud, "")
If (last > first) Then
targeto = Mid(macoud, first, last - first)
MsgBox "" + targeto + "" ' inja man msgbox gozashtam to kode kik bezar
End If
End If
to in getdata man macoud hast male u harchi hast hamono bezar
in male vb6 | |
| | | | Unkn0wn
FreeBuzz Team
Posts : 2505
Points : 37683
Thanked : 58
Join date : 2012-08-02
Nimbuzz Id : -
| | Subject: Re: amuzeshe sakhte remoter ba vb6 Wed Sep 19, 2012 6:58 pm | |
| amoozesh kamel beza ma ham yad begirim bot besazim:P | |
| | | | EMESDI
Badbuzzer
Posts : 417
Points : 2654
Thanked : 7
Join date : 2012-05-06
| | Subject: Re: amuzeshe sakhte remoter ba vb6 Wed Sep 19, 2012 7:16 pm | |
| amozeshe kamel nemikhad dige  ye login id to sayt hast vase vb 6 dl kon ino bezar zire login hamon hala in kike copy kon bezar ziresh hamino k# ro bok b# kode ban bezar bokon v# kode visit bezar kari nadare | |
| | | | Unkn0wn
FreeBuzz Team
Posts : 2505
Points : 37683
Thanked : 58
Join date : 2012-08-02
Nimbuzz Id : -
| | Subject: Re: amuzeshe sakhte remoter ba vb6 Wed Sep 19, 2012 7:22 pm | |
| na mocoud dash manzuram ine ke dust daram bot besazam balad nistam:-( | |
| | | | | The author of this message was banned from the forum - See the message | mahdi123
T-SBD
Posts : 94
Points : 177
Thanked : 0
Join date : 2012-08-07
ASL : 9asl :D
| | Subject: Re: amuzeshe sakhte remoter ba vb6 Wed Sep 19, 2012 10:17 pm | |
| tnx macoud age mishe toye project amuzeshe sakhte bot ro bezari kheili mamnon mijam  | |
| | | | JoOJoO-AllsTaR
T-SBD
Posts : 685
Points : 11792
Thanked : 45
Join date : 2012-05-23
ASL : 9face,9name,9number :d
| | Subject: Re: amuzeshe sakhte remoter ba vb6 Thu Sep 20, 2012 10:38 am | |
| plz harchii amozesh mizariid midunam azyat mishiid ama plz tasviri amoozesh bezariid mee kee noobam | |
| | | | amirslr
T-SBD
Posts : 385
Points : 5916
Thanked : 0
Join date : 2012-08-20
| | | | | xcal!b
T-SBD
Posts : 931
Points : 13662
Thanked : 47
Join date : 2012-09-15
ASL : ◣_◢
| | Subject: Re: amuzeshe sakhte remoter ba vb6 Sun Sep 23, 2012 6:07 pm | |
| Engar khabari az bote remoter vas vb6 nis  | |
| | | | khonasham.1
T-SBD
Posts : 197
Points : 6614
Thanked : 2
Join date : 2012-09-03
| | Subject: Re: amuzeshe sakhte remoter ba vb6 Mon Sep 24, 2012 11:31 am | |
| macoud ka mellato natarsun  - Code:
-
If InStr(getdata, "<message from='" & room & "@conference.nimbuzz.com/" & id dastur dahande & "' to='" & id bot & "@nimbuzz.com/" & res & "' type='groupchat'><body>k#") <> 0 Then
If InStr(getdata, "</message>") <> 0 Then
getdata = Replace(getdata, "<message from='" & room & "@conference.nimbuzz.com/" & id dastur dahande & "' to='" & idbot & "@nimbuzz.com/" & res & "' type='groupchat'><body>k#", "")
kick = Split(getdata, "</body>")
ws2.SendData "<iq id='jcl_10' to='" & room & "@conference.nimbuzz.com' type='set'><query xmlns='http://jabber.org/protocol/muc#admin'><item nick='" & kick(i) & "' role='none'><reason>" & id bot & ": </reason></item></query></iq>"
End If
End If khob inja az split va replace us shode replace tabdile y meqdar b meqdare taein shodas masalan getdata=replace(getdata,"slm","salam") inja slm vorodi ro b salam tabdil kard va az split baraye bardashtane motaqayere masalan age xml vorodi ino dashte bashe - Code:
-
www.bad-buzz.get-forum.com va ma esme forum ro bekhaeim injuri baresh midarim forum=split(getdata,"xml bade on bakhshi k mikhay") qable ro bar midare va dakhele textbox forum paste mikone forum.text=pm(i)
BADBOY TEAM HERE
| |
| | | | khonasham.1
T-SBD
Posts : 197
Points : 6614
Thanked : 2
Join date : 2012-09-03
| | Subject: Re: amuzeshe sakhte remoter ba vb6 Mon Sep 24, 2012 12:42 pm | |
| harkar mikonam in code akharie jor dar nemiyad sharmande code balaeiro khodetun tajzio tahlil konid  | |
| | | | admin
Administrator
Posts : 651
Points : 10562
Thanked : 29
Join date : 2012-04-18
ASL : AFRA 19
| | Subject: Re: amuzeshe sakhte remoter ba vb6 Mon Sep 24, 2012 2:00 pm | |
| methode split vase arraye stringaye sabet bedard mikhore va in nemune softa bedard nemikhore chun age room flood beshe bot ghat mizane substring ro ghalat var midare raveshe drost vase in kara mid va left hast mikhay ye substring az ye string var dari be shekle zir amal kon - Code:
-
If InStr(getdata, "<message from='" & room & "@conference.nimbuzz.com/")<> 0 and instr(getdata,"<body>k#") <> 0 Then
'inja mikhaym ide kesi ke bayad kik konim ro begirim be shekle zir amal mikonim
dim id as string ' string tarif mikonim
' hala ebtedaye string ro ba mid tarif mikonim
id=mid(getdata, instr(getdata, "<body>k#") + 8)
' hala entehaye string ro moshakhas mikonim ba methode left
id=left(id, instr(id,"</body>")-1)
'alan har texti ke bad az k# va ghabl az <body> umade bashe = mishe ba stringe id
msgbox id
end if
| |
| | | | amirslr
T-SBD
Posts : 385
Points : 5916
Thanked : 0
Join date : 2012-08-20
| | Subject: Re: amuzeshe sakhte remoter ba vb6 Mon Sep 24, 2012 3:01 pm | |
| estefade nakarda ama benazar khobe  | |
| | | | _xtc
T-SBD
Posts : 132
Points : 1399
Thanked : 0
Join date : 2012-05-11
ASL : ali 14 gachsaran
| | | | | Sponsored content
| | Subject: Re: amuzeshe sakhte remoter ba vb6 | |
| |
| | | | | | amuzeshe sakhte remoter ba vb6 | |
|
Similar topics | |
|
| | Permissions in this forum: | You cannot reply to topics in this forum
| |
| |
| |
