Results 1 to 40 of 42

Thread: Really Cool VB6 Project! [source available]

Hybrid View

  1. #1

    Thread Starter
    Hyperactive Member ...:::ONE:::...'s Avatar
    Join Date
    May 2004
    Location
    Netherlands
    Posts
    282

    Cool Really Cool VB6 Project! [source available]

    I don't know why no one thought of it before. I used vb6 to terminate certain programs such as iexplore.exe and many others of your choice the problem is that I need some more ideas.

    I have devoloped a cool looking GUI with a rollover user control I made with some one else on the forum and backgrounds and button styles from Macromedia MX 2004. I just need other Ideas to finnish. (all open source)

    The finnish product will feature the names of all who contributed. I will soon post the source and GUI. Take the source and post back the changes with your name so other can also modify it and I can list you so your not left out. You must only change one thing at a time and post the changes you added on the forum and attach the new source.

    !!!Feel free to distribute it, but be fare and put your name as the version and list all those who helped!!! (!GIVE EVERYONE CREDIT!)

    Thanks for your help,
    ...:::ONE:::...
    Last edited by ...:::ONE:::...; Apr 5th, 2005 at 05:11 PM.
    6 Years

  2. #2
    I'm about to be a PowerPoster! Hack's Avatar
    Join Date
    Aug 2001
    Location
    Searching for mendhak
    Posts
    58,333

    Re: Really Cool VB6 Project!

    You will be posting this in the Code Bank, right?

  3. #3

    Thread Starter
    Hyperactive Member ...:::ONE:::...'s Avatar
    Join Date
    May 2004
    Location
    Netherlands
    Posts
    282

    Re: Really Cool VB6 Project!

    Dose it matter? Were Ever. I just wanted people to see this message.

    As soon as i get home it will be here and we could start.

    You In??
    6 Years

  4. #4
    I'm about to be a PowerPoster! Hack's Avatar
    Join Date
    Aug 2001
    Location
    Searching for mendhak
    Posts
    58,333

    Re: Really Cool VB6 Project!

    Quote Originally Posted by ...:::ONE:::...
    Dose it matter? Were Ever. I just wanted people to see this message.

    As soon as i get home it will be here and we could start.

    You In??
    Sure.

    My point though, it that it would be more noticable in the Code Bank. If you post it here it will eventually sink to the bottom of everything and people coming behind us that might benefit from it may not find it.

  5. #5
    "Digital Revolution"
    Join Date
    Mar 2005
    Posts
    4,471

    Re: Really Cool VB6 Project!

    I'll help I guess, but I don't really understand what exactly it is you're making...

  6. #6

  7. #7

    Thread Starter
    Hyperactive Member ...:::ONE:::...'s Avatar
    Join Date
    May 2004
    Location
    Netherlands
    Posts
    282

    Re: Really Cool VB6 Project!

    Ok i'll move it to the code bank, how do I do that or should a moderator do that.
    I'm going to attach the files now.
    I think it might need a new name. I don't know?
    Its a good idea but I need some help.

    For those who don't know what it is that i'm talking about, I wanted to make a program that could have good control over windows for example hWnd, Just common commands like a System shutdown timer, application terminator, closing apps and opening them on different times of the day, just lots of control over windows maybe hacks sort of like tweek xp but with tons of different things. You know stuff like that could come in handy for some people.

    Will see what happens.
    Attached Files Attached Files
    6 Years

  8. #8
    PowerPoster Elroy's Avatar
    Join Date
    Jun 2014
    Location
    Near Nashville TN
    Posts
    9,853

    Re: Really Cool VB6 Project! [source available]

    I'm almost a decade late but hey ho. I was just browsing around and saw this and thought I'd give my version of it:

    Code:
    Public Sub KillProcess(ByVal sProcessName As String)
        ' Kill process using Visual Basic 6 0 and WMI.
        ' The full .exe name (including the .exe) is supplied, but no path.
        ' Example: KillProcess "excel.exe"
        ' BE CAREFUL:  No prompt for saving takes place.
        ' ALSO, it kills all occurrences.
        Dim oWMI As Object
        Dim ret As Long
        Dim oServices As Object
        Dim oService As Object
        Dim sServiceName As String
        '
        On Error Resume Next
        sProcessName = LCase$(sProcessName)
        Set oWMI = GetObject("WinMgmts:")
        Set oServices = oWMI.InstancesOf("win32_process")
        '
        For Each oService In oServices
            sServiceName = LCase$(Trim$(CStr(oService.Name)))
            'Debug.Print sServiceName
            If sServiceName = sProcessName Then
                ret = oService.Terminate
            End If
        Next
    End Sub
    Be careful though. That piece of code is very powerful. If you know the .EXE name of a process, you can kill about anything you want. Be careful though. If you do something like KillProcess "WinWord.exe", it'll kill Word with no prompt to save work or anything. It'll just be thrown out of memory.

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •  



Click Here to Expand Forum to Full Width