User Control Panel
Advertisements

HELP US, HELP YOU!

VB BOT TUTORIAL
Goto page Previous  1, 2
 
Post new topic   Reply to topic    Bot Depot Forum Index -> Visual Basic
View unanswered posts
Author Message
Addict
Not Yet a God
Not Yet a God


Joined: 21 Jan 2004
Posts: 473

Reputation: 34.4Reputation: 34.4Reputation: 34.4

PostPosted: Sat Oct 15, 2005 5:37 am    Post subject: Reply with quote

Using the API sucks. It's dependent on MSN Messenger to much.. I guess it's the same with any API, I just hate having to have MSN open to work with something as simple as logging in.
Back to top
zero_kool
Newbie
Newbie


Joined: 17 Feb 2005
Posts: 6

Reputation: 14.9

PostPosted: Sun Nov 06, 2005 1:15 am    Post subject: vb bot Reply with quote

is there an thing like on text received but not like when you open the window is says hi this is for the vb window messenger bot so yeah i have no clue but when i get errors it seems to happen on text receive
Back to top
zero_kool
Newbie
Newbie


Joined: 17 Feb 2005
Posts: 6

Reputation: 14.9

PostPosted: Sun Nov 06, 2005 9:38 pm    Post subject: Re: vb bot Reply with quote

actually my msn bot is work quite good i have !chat which doesn't really work becuz it makes separate chat rooms and yeah i have !google !popup !say and some admin commands !nick and status stuff so far so good

snippet
Code:

f UCase(Mid(bstrMsgText, 1, 8)) = "!GOOGLE " Then
Dim MSG
Dim Query
Query = (Mid(bstrMsgText, 8))
Query = Replace(Query, " ", "+")
Query = Query
MSG = "http://www.google.ca/search?hl=en&q=" & Query
user.SendText bstrMsgHeader, MSG, MMSGTYPE_ALL_RESULTS
End If
[quote][/quote]
Back to top
Nicky
Newbie
Newbie


Joined: 25 Jan 2006
Posts: 2

Reputation: 3.4Reputation: 3.4Reputation: 3.4

PostPosted: Wed Jan 25, 2006 11:32 pm    Post subject: Reply with quote

This tutorial OWNS.

One question.

If you say something to the bot you didnt add, is it possible to make it answer, "Hi, I don't understand" on every word?
Back to top
Nicky
Newbie
Newbie


Joined: 25 Jan 2006
Posts: 2

Reputation: 3.4Reputation: 3.4Reputation: 3.4

PostPosted: Sun Jan 29, 2006 4:24 pm    Post subject: Reply with quote

Is this site dead?

Never mind, I got it working.
Back to top
razzy911
Newbie
Newbie


Joined: 16 Feb 2006
Posts: 1

Reputation: 2.7Reputation: 2.7

PostPosted: Thu Feb 16, 2006 9:59 pm    Post subject: Chat bot in VB Question Reply with quote

Hello
I have Visual Studio .NET 2003
First of all I want to know when I make a new project, to what kind of template do I have to set it to for this?
Also, when I go into Project > Add References under the COM tab
i can only find:

OLE automation
Messenger type library
Messenger API type library
Messenger Private type library

but i can't find this:
Messenger AddIns type library

However, my code does not give any errors..but when I run it it doesn't do anything
So i wanted to know.. do I need another updated version of Visual Studio (the 2005 perhaps), or what kind of template must it be set to..

Also there is an option for Start Action in the project properties under the Debugging tab..do I need to set it to external program (windows messenger)??
Back to top
Craig
Newbie
Newbie


Joined: 02 Sep 2006
Posts: 13

Reputation: -53.3
votes: 2

PostPosted: Sat Sep 02, 2006 5:16 am    Post subject: Reply with quote

how would i setup a little box to login to MSN, with my own bot, without openeing msn or anything, and like, hmm..not like opeing MSN program when i sign in, and it can be its own little bot, how can I do this?
Back to top
StaticSpear
Newbie
Newbie


Joined: 17 Oct 2006
Posts: 5
Location: New Zealand
Reputation: 8.1Reputation: 8.1Reputation: 8.1Reputation: 8.1Reputation: 8.1Reputation: 8.1Reputation: 8.1Reputation: 8.1

PostPosted: Tue Oct 17, 2006 6:55 pm    Post subject: Reply with quote

hi ty for makeing this tutorial it was a big help to me (i am reasonably new to vb) but theres one thing i tried to do but couldnt i tried adding a spam filter to it here is both of wat i tried under the (Private Sub msn_OnTextReceived(ByVal...ect)

Code:

dim lastmessage as string

Select Case bstrMsgText
case lastmessage
User.SendText bstrMsgHeader, "Dont Spam!",MMSGTYPE_ALL_RESULTS
end select

lastmessage = bstrmsgtext


this did not work for me i wasnt sure why
so i tried it like this so i could view the string
and see what the problem was

Code:

Select Case bstrMsgText
case text1.text
User.SendText bstrMsgHeader, "Dont Spam!",MMSGTYPE_ALL_RESULTS
end select
text1.text = bstrmsgtext


turns out before the message got sent it changed from the last sent message to "ll" or sumthing like that does anyone know why any help would be apreciated Cool

p.s i hope i posted this in the right place

_________________
With the Source Code ill control the world
Back to top
Display posts from previous:   
Post new topic   Reply to topic    Bot Depot Forum Index -> Visual Basic All times are GMT
Goto page Previous  1, 2
Page 2 of 2

 



Protected by phpBB Security phpBB-TweakS
phpBB Security Has Blocked 9 Exploit Attempts.
Antispam Captcha Mod by phpbb-security.com
Powered by phpBB © 2001, 2005 phpBB Group