|
| Author |
Message |
infernothebest Newbie

Joined: 20 Mar 2005 Posts: 13
 
|
Posted: Sun Mar 20, 2005 11:55 am Post subject: |
|
|
| hi i need a vb source that can send a message to all users can somone help me with that? |
|
| Back to top |
|
 |
shmookey Newbie

Joined: 21 Dec 2004 Posts: 49 Location: Western Australia
  
|
Posted: Sun Mar 20, 2005 12:15 pm Post subject: |
|
|
| Woah, need more information man. Define 'all users', define 'vb source', and tell us if you want a bot that connects to msn by itself, or through the MSN api. Right now the best I can do is tell you to look through all the current Visual Basic bots and templates and modify them to your needs. |
|
| Back to top |
|
 |
infernothebest Newbie

Joined: 20 Mar 2005 Posts: 13
 
|
Posted: Sun Mar 20, 2005 12:34 pm Post subject: |
|
|
| if i compile it and open it must send a message to all my contacts thats all |
|
| Back to top |
|
 |
mat007 Almost An Agent

Joined: 12 Jan 2004 Posts: 1375
   votes: 2
|
Posted: Sun Mar 20, 2005 4:12 pm Post subject: |
|
|
| so you want us to code you somat that would prolly be incompatible with your bot as we dono how it works. |
|
| Back to top |
|
 |
Mojave Almost An Agent

Joined: 01 Nov 2003 Posts: 1434
 
|
Posted: Sun Mar 20, 2005 6:33 pm Post subject: |
|
|
| infernothebest, instead of telling us that you "need" some code that "must" do something, start a new topic and show us what you have so far and describe the problem you are having. Then we can help you solve your problem. |
|
| Back to top |
|
 |
Kid4 Newbie

Joined: 04 Sep 2005 Posts: 5
        
|
Posted: Mon Sep 05, 2005 9:49 am Post subject: |
|
|
Use my code here put this in a command button:
| Code: | Private Sub Command1_Click()
On Error Resume Next
For Each contact In contacts
If contact.Status <> MISTATUS_OFFLINE Then
objMessenger.InstantMessage contact.SigninName
SendKeys Text1.Text
End If
Next
End Sub |
And make a text area called "Text1" or just rename the "Sendkeys Text1.Text" to Text?.Text
? = Text number
Any problems just pm me. |
|
| Back to top |
|
 |
|