Home Upgrade Search Memberlist Extras Hacker Tools Award Goals Help Wiki Contact

.NET 

My first coded Program!!! Release

Hi guys
Today i created my first program in visual studio 2013 and i am letting you all see it.use it.
So i have no clue how to use virus total and it does detect something and i have no clue what it is i was told it was because my program takes control of another process (skype hence the name) so i included the project file so you can check the code and shit.
Here is virus scan: https://www.virustotal.com/en/file/26ed4...413654109/
Here is dl: http://www.mediafire.com/download/g76obg...ypebot.rar

Here is the interface BTW Qball is my nickname my friend gave me a while back :)
Interface: [Image: 50HfPvM.png]


CODE: http://pastebin.com/1w25xF7n
[Image: E2R0dEU.jpg]
Waiting for someone who vouch for this 🤝

And congratulations on your first program OP
(Oct 18, 2014 10:48 AM)1MPERATOR Wrote:  Waiting for someone who vouch for this 🤝

And congratulations on your first program OP

Thank you Sir hopefully someone does vouch :)
[Image: E2R0dEU.jpg]
Could you just post the source code onto pastebin with vb.net syntax highlighting please. I'm too lazy to download and plus I don't downloadfiles from HF lol.
This is the first program you coded and you already coded a Skype bot. Sure..
Why do you add a TextBox to write the contact nickname when you can put a ComboBox with "skype.Friends"?
(Oct 18, 2014 10:52 AM)+Haze Wrote:  Could you just post the source code onto pastebin with vb.net syntax highlighting please. I'm too lazy to download and plus I don't downloadfiles from HF lol.

You no problem i will do that right now
[Image: E2R0dEU.jpg]
(Oct 18, 2014 10:54 AM)Secret Agent Wrote:  This is the first program you coded and you already coded a Skype bot. Sure..

this. my first application was a grade calculator in console application.
(Oct 18, 2014 10:54 AM)LordCoder Wrote:  Why do you add a TextBox to write the contact nickname when you can put a ComboBox with "skype.Friends"?

I did not know of this, I was actually trying to do this but could not figure it out


(Oct 18, 2014 10:54 AM)Secret Agent Wrote:  This is the first program you coded and you already coded a Skype bot. Sure..

I did not do this on my own i obviously had some help but yes my first program was a skype but. Its only about 10 lines of code :)
[Image: E2R0dEU.jpg]
(Oct 18, 2014 10:54 AM)Secret Agent Wrote:  This is the first program you coded and you already coded a Skype bot. Sure..

Yeah skype4comlib is really hard to use, how could he even do that!


You just copied this https://www.youtube.com/watch?v=CRie-jtLJ0w


Here's how you add contacts to a combobox
Code
Public WithEvents Skype As New SKYPE4COMLib.Skype
For i As Integer = 0 To Skype.HardwiredGroups.Count - 1
      If Skype.HardwiredGroups(i + 1).Type = TGroupType.grpOnlineFriends Then
      For j As Integer = Skype.HardwiredGroups(i + 1).Users.Count To 1 Step -1
      ComboBox1.Items.Add(Skype.HardwiredGroups(i + 1).Users(j).Handle)
      Next
      Exit For
      End If
      Next
Hope this helps
(Oct 18, 2014 10:59 AM)ElementalTree Wrote:  Here's how you add contacts to a combobox
Code
Public WithEvents Skype As New SKYPE4COMLib.Skype
For i As Integer = 0 To Skype.HardwiredGroups.Count - 1
      If Skype.HardwiredGroups(i + 1).Type = TGroupType.grpOnlineFriends Then
      For j As Integer = Skype.HardwiredGroups(i + 1).Users.Count To 1 Step -1
      ComboBox1.Items.Add(Skype.HardwiredGroups(i + 1).Users(j).Handle)
      Next
      Exit For
      End If
      Next
Hope this helps

Or you can just:
PHP Code

<?php 
Public WithEvents _skype As New SKYPE4COMLib.Skype
For i As Integer = 1 To _skype.Friends.Count
    
If _skype.Friends.Item(i).OnlineStatus <> TOnlineStatus.olsOffline Then
      ComboBox1
.Items.Add(_skype.Friends.Item(i).Handle)
    
End If
Next 
lol.
"Never be a spectator of unfairness or stupidity. Seek out argument and disputation for their own sake; the grave will supply plenty of time for silence." - C.H.



Possibly Related Threads...
Thread / Author Replies Views Last Post
[C] by VoxiDec 1, 2018 12:20 AM 4 228 Dec 1, 2018 12:20 AM
Last Post: Europa
[Shell] by AMDjackMay 25, 2016 01:47 PM 63 2,995 May 25, 2016 01:47 PM
Last Post: Zask3333
[.NET] by fredde_jasonJul 29, 2015 06:28 PM 19 1,113 Jul 29, 2015 06:28 PM
Last Post: The Scarabian