Show Posts

This section allows you to view all posts made by this member. Note that you can only see posts made in areas you currently have access to.

Topics - JokeBOx

Pages: 1 [2]

Programming / [Tutorial] Make applications run as a service C++

« on: February 02, 2012, 18:11 »

In C++ it is possible to hide the window and make the program run as a background service, luckily this is extremely easy to do.

First we add this as our first line of the program.

Code: [Select]

#define _WIN32_WINNT 0x0500
Then in our main() function, we add.

Code: [Select]

HWND hWnd = GetConsoleWindow(); 
ShowWindow(hWnd, SW_HIDE);

This will result in our program becoming hidden

Here we have an example application that will run in the background for 10 seconds doing nothing.

Enjoy.

Programming / C, C++ Download Free Windows 7, 64bit

« on: February 02, 2012, 17:26 »

There is a free Dev - C++ compiler very free to download and it works on windows 7 64 bit computers too without any errors.

Just go to http://www.bloodshed.net/dev/devcpp.html . There scroll the screen down and under Downloads, select download from Source Forge.

Your download will start automatically. Following the installing process, you can start programming in C and C++.

Programming / [Tutoria]Facebook Spammer VB

« on: February 02, 2012, 16:55 »

[COLOR="#FF0000"]OK first thing is first you may not copy this to any other forum with out asking me first !!![/COLOR]

Ok here is my Facebook spammer tut what you will need is

1) button
2) web browser
3) text box
4) timer

ok in button1 we want to put the code below this will open facebook

Code: [Select]

webBrowser1.Navigate("http://www.facebook.com")

timer1.start()

Now in timer1 we want you to ad this code to log you in

Code: [Select]

if webbrowser1.readystate = webbrowser1.readystate.complete then

WebBrowser1.Document.GetElementById("email").SetAttribute("Value", txtbox1.Text)
WebBrowser1.Document.GetElementById("pass").SetAttribute("Value", txtbox2.Text)

Dim Belement As HtmlElementCollection = WebBrowser1.Document.All

For Each webbutton As HtmlElement In Belement

If webbutton.GetAttribute("value") = "Log in" Then

webbutton.InvokeMember("click")

Timer2.start()

timer1.stop()

end if

Ok now it should be logging you in now to find out if the page is loaded and then start the spam post

in timer2 put the code bellow

Code: [Select]

if webbrowser1.readystate = webbrowser1.readystate.complete then

if  WebBrowser1.Document.GetElementById("pagelet_stream_header").inertext.contains("News Feed") then

Dim htmlElements As HtmlElementCollection = WebBrowser1.Document.GetElementsByTagName("textarea")
 
For Each el As HtmlElement In htmlElements

If el.GetAttribute("name").Equals("xhpc_message") Then

el.SetAttribute("Value", txtbox3.Text)

Sendkeys.Send("{ENTER}")

End If

End If

End If

i have not tested this and just made it as i made this post with out having vb.net open or having any other tools open so if there are errors or anything please just post or tell me and i will look at them and fix then

note that this is basic and only uses the one account so will only spam the one wall i do have a more advanced version i made my self that uses proxys and diff acounts to multi spam but that will be posted in the future

I hope it all works ok and you like it is so please remember to rep me

Programming / [Tutorial]How to make a simple win32 program

« on: February 02, 2012, 16:26 »

After i started programming in unmanaged C++ i have realized how incredibly much the .NET framework has done to make programming simple. Im now going to show you how to make a window in a Win32 program.
This tutorial assumes that you have a basic knowledge of C++.

Lets start with the headers. You need to include <Windows.h> for the window functions, and thats about it. Then, you need your windows main function and your window procedure. I will take you step by step through them.

Code: [Select]

int       WINAPI   WinMain(HINSTANCE hInstance, HINSTANCE hPrevInstance, LPSTR lpCmdLine, int iCmdShow);
LRESULT   CALLBACK WndProc(HWND hWnd, UINT uMsg, WPARAM wParam, LPARAM lParam);

Okay thats the easy part. Now for the hard part.

Code: [Select]

int WINAPI WinMain(HINSTANCE hInstance, HINSTANCE hPrevInstance, LPSTR lpCmdLine, int iCmdShow) {
    WNDCLASS wc;     
    MSG msg;
    BOOL Quit = false;
    HWND hWnd = NULL;

We will need these two variables to store our window class, for retrieving messages and to decide when to quit.

Next comes the code that sets the info about our window. It sets information such as background color, the window procedure, the icon, the cursor, a menu, and most important; the class name.

Code: [Select]

    wc.style = CS_OWNDC;
    wc.lpfnWndProc = WndProc; //Window procedure
    wc.cbClsExtra = 0; //Extra space (in bytes) for the application
    wc.cbWndExtra = 0; //Extra space (in bytes) for each window
    wc.hInstance = hInstance; //Instance
    wc.hIcon = LoadIcon (NULL, IDI_APPLICATION); //Icon
    wc.hCursor = LoadCursor (NULL, IDC_ARROW); //Cursor
    wc.hbrBackground = CreateSolidBrush(RGB(123, 123, 123)); //Background
    wc.lpszMenuName = NULL; //No menu
    wc.lpszClassName = "MyWindow"; //Class name

Then we have to register the class

Code: [Select]

RegisterClass (&wc);
Now we have come far enough to create our window, it has been much more work than [COLOR="#0000CD"]Dim form = New Form1[/COLOR] hasn't it?

Code: [Select]

    hWnd = CreateWindow (
      "MyWindow", "Awesome Window Title",  //MyWindow MUST be the same as the lpszClassName ^^
      WS_OVERLAPPEDWINDOW, //Window style
      0, 0, 600, 300, //x, y, width, height
      NULL, NULL, hInstance, NULL); //parent, menu, app instance, ?? lpvoid ??

So we have to show our window:

Code: [Select]

ShowWindow(hWnd, 5);
Now comes our message loop, this catches care of all incoming messages and processes them.

Code: [Select]

    while (!Quit)
    {
        if (PeekMessage (&msg, NULL, 0, 0, PM_REMOVE))
        {
            if (msg.message == WM_QUIT)
            {
                Quit = TRUE;
            }
            else
            {
                TranslateMessage (&msg);
                DispatchMessage (&msg); //An indirect call to the WndProc you defined in wc.lpfnWndProc 
            }
        }
        else
        {
            //Application idle
        }         
    }

When your application is idle, it means that it has no messages to process, so it is free to do any task.
There is another way of coding the message loop too, that method waits until it gets a message to process, so your application is never idle (as far as i know). Feel free to use the one you like.

Code: [Select]

    while(!Quit) {
        while(GetMessage(&msg, NULL, 0, 0) > 0)
        {
            if (msg.message == WM_QUIT) { Quit = TRUE; }
            TranslateMessage(&msg);
            DispatchMessage(&msg); //Indirect call to wc.lpfnWndProc
        }
    }

Finally, we return the result returned from WndProc (wc.lpfnWndProc). 0 for success, and nonzero for fail.

Code: [Select]

    return msg.wParam;
}

Finally finished you might think, but no. This was just our main window function. Now we need to create our WndProc function. This handles messages for us.

Code: [Select]

LRESULT CALLBACK WndProc (HWND hWnd, UINT uMsg, WPARAM wParam, LPARAM lParam)
{
    switch (uMsg)
    {

hWnd is the window handle.
uMsg is the message id/type.
wParam and lParam is additional information for a message.
We have a switch statement to use the right code on the right message. In this tutorial we will handle WM_CREATE (creation) and WM_CLOSE (closing). We will leave the rest to DefWindowProc.

Code: [Select]

        case WM_CREATE:
             MessageBox(hWnd, "An awesome messagebox", "Title", MB_OK);
             return 0;
        
        case WM_CLOSE:
             MessageBox(hWnd, "Closing :(", ":'(", MB_OK);
             PostQuitMessage(0);
             return 0;
        
        default:
             return DefWindowProc(hWnd, uMsg, wParam, lParam);
    }
}

Now, finally we come to an end. If you managed to understand all this, I'm impressed. If everything was copy/paste, try again
Please leave a replay.