๑۩۞۩๑FreebuzZ๑۩۞۩๑
hi GUEST!!!!!!!!!!!

Welcome to FreeBuzz Team

Please register to have full access to the forum and be able to download stuff., stay with us..
lotfan baraye estefade az in anjoman site sabtenam konid baraye sabtenam kare shakhi lazem ni bokoni faghat miazni register sabtenam mikoni niazi be linke activate az email nis bad login mikoni
cheers
FreeBuzZ TeaM !

Bl4ck W4rning
Latest topics
» 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

» oon ghadima!!!
by mr.pitza Mon Oct 01, 2018 8:15 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

» XIO BAN BOT V.5
by adnan sami khan Fri Mar 25, 2016 11:52 am

Search
 
 

Display results as :
 


Rechercher Advanced Search

Frb Upload Center



help to set room fuller hidden massage and time limit in vb6 :)

Go down

GMT + 9 Hours help to set room fuller hidden massage and time limit in vb6 :)

Post by kalanapiumal on Mon Sep 09, 2013 8:11 pm

help to set room fuller hidden massage and time limit in vb6 Smile
kalanapiumal
kalanapiumal
Member
Member

Posts : 73
Points : 173
Thanked : 10
Join date : 2013-02-12

Back to top Go down

GMT + 9 Hours Re: help to set room fuller hidden massage and time limit in vb6 :)

Post by DARK on Mon Sep 09, 2013 8:16 pm

U said:
HELP me

but you only want FULL SOURCE CODE WITHOUT HELP Very Happy

if you have any problem in create room fuller , put your source code in here for help

and if you ONLY WANT FULL SOURCE CODE we can't help you Smile
DARK
DARK
Member
Member

Posts : 845
Points : -1821
Thanked : 17
Join date : 2012-10-17
ASL : DARK !
Nimbuzz Id : 0xd4rk@nimbuzz.com

Back to top Go down

GMT + 9 Hours Re: help to set room fuller hidden massage and time limit in vb6 :)

Post by kalanapiumal on Mon Sep 09, 2013 8:25 pm

k bro i can tell clear what i want im add u now:) that's better
kalanapiumal
kalanapiumal
Member
Member

Posts : 73
Points : 173
Thanked : 10
Join date : 2013-02-12

Back to top Go down

GMT + 9 Hours Re: help to set room fuller hidden massage and time limit in vb6 :)

Post by DARK on Mon Sep 09, 2013 8:27 pm

I Can't Answer to questions in pv
so ask your question in here
DARK
DARK
Member
Member

Posts : 845
Points : -1821
Thanked : 17
Join date : 2012-10-17
ASL : DARK !
Nimbuzz Id : 0xd4rk@nimbuzz.com

Back to top Go down

GMT + 9 Hours Re: help to set room fuller hidden massage and time limit in vb6 :)

Post by kalanapiumal on Mon Sep 09, 2013 8:43 pm

Smile Private Sub a_OnKickPresence(ByVal RoomName As String, ByVal Id As String, ByVal Actor As String)
a.Kick

End Sub

Private Sub a_OnLogin()
Text1.BackColor = RGB(0, 143, 47)
End Sub
Private Sub Command23_Click()
a.JoinRoom room2.Text
b.JoinRoom room2.Text
c.JoinRoom room2.Text
d.JoinRoom room2.Text
e.JoinRoom room2.Text
f.JoinRoom room2.Text
g.JoinRoom room2.Text
h.JoinRoom room2.Text
i.JoinRoom room2.Text
j.JoinRoom room2.Text


End Sub
Private Sub a_OnRoomMessage(ByVal RoomName As String, ByVal Id As String, ByVal Message As String)
If InStr(Message, " the right answer to start chatting.") <> 0 Then
 a.WriteRoomMessage room1.Text, Answer(Message)
End If
If InStr(Message, " the right answer to start chatting.") <> 0 Then
 a.WriteRoomMessage room2.Text, Answer(Message)
End If
If InStr(Message, " the right answer to start chatting.") <> 0 Then
 a.WriteRoomMessage room3.Text, Answer(Message)
End If
If InStr(Message, " the right answer to start chatting.") <> 0 Then
 a.WriteRoomMessage room4.Text, Answer(Message)
End If
If InStr(Message, " the right answer to start chatting.") <> 0 Then
 a.WriteRoomMessage room5.Text, Answer(Message)
End If

End Sub

Private Sub b_OnRoomMessage(ByVal RoomName As String, ByVal Id As String, ByVal Message As String)
If InStr(Message, " the right answer to start chatting.") <> 0 Then
 b.WriteRoomMessage room1.Text, Answer(Message)
End If
If InStr(Message, " the right answer to start chatting.") <> 0 Then
 b.WriteRoomMessage room2.Text, Answer(Message)
End If
If InStr(Message, " the right answer to start chatting.") <> 0 Then
 b.WriteRoomMessage room3.Text, Answer(Message)
End If
If InStr(Message, " the right answer to start chatting.") <> 0 Then
 b.WriteRoomMessage room4.Text, Answer(Message)
End If
If InStr(Message, " the right answer to start chatting.") <> 0 Then
 b.WriteRoomMessage room5.Text, Answer(Message)
End If
End Sub
Private Sub c_OnRoomMessage(ByVal RoomName As String, ByVal Id As String, ByVal Message As String)
If InStr(Message, " the right answer to start chatting.") <> 0 Then
 c.WriteRoomMessage room1.Text, Answer(Message)
End If
If InStr(Message, " the right answer to start chatting.") <> 0 Then
 c.WriteRoomMessage room2.Text, Answer(Message)
End If
If InStr(Message, " the right answer to start chatting.") <> 0 Then
 c.WriteRoomMessage room3.Text, Answer(Message)
End If
If InStr(Message, " the right answer to start chatting.") <> 0 Then
 c.WriteRoomMessage room4.Text, Answer(Message)
End If
If InStr(Message, " the right answer to start chatting.") <> 0 Then
 c.WriteRoomMessage room5.Text, Answer(Message)
End If
End Sub


Private Sub Command24_Click()
a.JoinRoom room3.Text, RoomPassword = ""
a.WriteRoomMessage = "Hii all"
b.JoinRoom room3.Text, RoomPassword = ""
b.WriteRoomMessage = "Hii all"
c.JoinRoom room3.Text, RoomPassword = ""
c.WriteRoomMessage = "Hii all"
d.JoinRoom room3.Text, RoomPassword = ""
d.WriteRoomMessage = "Hii all"
e.JoinRoom room3.Text, RoomPassword = ""
e.WriteRoomMessage = "Hii all"
f.JoinRoom room3.Text, RoomPassword = ""
f.WriteRoomMessage = "Hii all"
g.JoinRoom room3.Text, RoomPassword = ""
g.WriteRoomMessage = "Hii all"
h.JoinRoom room3.Text, RoomPassword = ""
h.WriteRoomMessage = "Hii all"
i.JoinRoom room3.Text, RoomPassword = ""
i.WriteRoomMessage = "Hii all"
j.JoinRoom room3.Text, RoomPassword = ""
j.WriteRoomMessage = "Hii all"

End Sub

Private Sub Command25_Click()
a.JoinRoom room4.Text, RoomPassword = ""
b.JoinRoom room4.Text, RoomPassword = ""
c.JoinRoom room4.Text, RoomPassword = ""
d.JoinRoom room4.Text, RoomPassword = ""
e.JoinRoom room4.Text, RoomPassword = ""
f.JoinRoom room4.Text, RoomPassword = ""
g.JoinRoom room4.Text, RoomPassword = ""
h.JoinRoom room4.Text, RoomPassword = ""
i.JoinRoom room4.Text, RoomPassword = ""
j.JoinRoom room4.Text, RoomPassword = ""
End Sub

Private Sub Command26_Click()
a.JoinRoom room5.Text, RoomPassword = ""
b.JoinRoom room5.Text, RoomPassword = ""
c.JoinRoom room5.Text, RoomPassword = ""
d.JoinRoom room5.Text, RoomPassword = ""
e.JoinRoom room5.Text, RoomPassword = ""
f.JoinRoom room5.Text, RoomPassword = ""
g.JoinRoom room5.Text, RoomPassword = ""
h.JoinRoom room5.Text, RoomPassword = ""
i.JoinRoom room5.Text, RoomPassword = ""
j.JoinRoom room5.Text, RoomPassword = ""
End Sub

Private Sub Command27_Click()
a.CloseSck
b.CloseSck
c.CloseSck
d.CloseSck
e.CloseSck
f.CloseSck
g.CloseSck
h.CloseSck
i.CloseSck
j.CloseSck

End Sub

Private Sub Command33_Click()
a.LeftRoom room2.Text
b.LeftRoom room2.Text
c.LeftRoom room2.Text
d.LeftRoom room2.Text
e.LeftRoom room2.Text
f.LeftRoom room2.Text
g.LeftRoom room2.Text
h.LeftRoom room2.Text
i.LeftRoom room2.Text
j.LeftRoom room2.Text
End Sub

Private Sub Command34_Click()
a.LeftRoom room3.Text
b.LeftRoom room3.Text
c.LeftRoom room3.Text
d.LeftRoom room3.Text
e.LeftRoom room3.Text
f.LeftRoom room3.Text
g.LeftRoom room3.Text
h.LeftRoom room3.Text
i.LeftRoom room3.Text
j.LeftRoom room3.Text
End Sub

Private Sub Command35_Click(Index As Integer)
a.LeftRoom room4.Text
b.LeftRoom room4.Text
c.LeftRoom room4.Text
d.LeftRoom room4.Text
e.LeftRoom room4.Text
f.LeftRoom room4.Text
g.LeftRoom room4.Text
h.LeftRoom room4.Text
i.LeftRoom room4.Text
j.LeftRoom room4.Text
End Sub

Private Sub Command36_Click(Index As Integer)
a.LeftRoom room5.Text
b.LeftRoom room5.Text
c.LeftRoom room5.Text
d.LeftRoom room5.Text
e.LeftRoom room5.Text
f.LeftRoom room5.Text
g.LeftRoom room5.Text
h.LeftRoom room5.Text
i.LeftRoom room5.Text
j.LeftRoom room5.Text
End Sub
kalanapiumal
kalanapiumal
Member
Member

Posts : 73
Points : 173
Thanked : 10
Join date : 2013-02-12

Back to top Go down

GMT + 9 Hours Re: help to set room fuller hidden massage and time limit in vb6 :)

Post by juxta on Thu Oct 31, 2013 5:27 pm

1. Create an Array of  Txtboxes for ur JID , passwords , sockets and a Textbox for Roomname
    - Do the Login Pocedure
    - Do the Join Room Procedure
2. Create an aRray  of labels  For ur time limit when will ur bots will post
3.  Timer Array Corresponding to each Bot JIds
       interval = 60000
4. IF Joined then Trigger ur Corresponding Timer on ur Joined JID
      
     Under the Timer Sub
     Ex. U named ur labels as Lbl_Time
       if lbl_time(Index).Caption =  5 then '  5 minutes
           socket(index).senddata 'Posting xml ir
           lbl_time(index).caption = 1
       else
             lbl_time(index).caption=  val(lbl_time(index).caption ) + 1
       end if
juxta
juxta
Member
Member

Posts : 24
Points : 3157
Thanked : 10
Join date : 2012-12-01
Nimbuzz Id : goth_raver, o0o-juxta-o0o

Back to top Go down

GMT + 9 Hours Re: help to set room fuller hidden massage and time limit in vb6 :)

Post by Zἔὄմʂ on Fri Nov 01, 2013 2:48 pm

moved too programming's support
Zἔὄմʂ
Zἔὄմʂ
FreeBuzz Team
FreeBuzz Team

Posts : 407
Points : 79
Thanked : 5
Join date : 2013-08-23
Nimbuzz Id : ήὄ Sἷʛᾗᾄł

http://www.freebuzz.ir

Back to top Go down

GMT + 9 Hours Re: help to set room fuller hidden massage and time limit in vb6 :)

Post by Sponsored content


Sponsored content


Back to top Go down

Back to top


 
Permissions in this forum:
You cannot reply to topics in this forum