Auto copy/paster

[RedByte1337]

Does someone knows how to make a program that paste text in a txt file when you copy something with Ctrl+C?
I found this :

^d::  ; Ctrl + d
Clipsaved := clipboardall
Clipboard =
Send ^c
Clipwait
Fileappend, %clipboard%`n, somefilename.txt
Clipboard := clipsaved
Run, somefilename.txt
Return

(ahk)
but it doesn't work for me.

[francish]

you'll need a program called AutoHotKey, check this:
https://www.autohotkey.com/board/topi...to-a-new-file/

[[MPGH]Jim Morrison]

What language are you doing?

[RedByte1337]

you'll need a program called AutoHotKey, check this:
https://www.autohotkey.com/board/topi...to-a-new-file/

That's where (ahk) stands for

[RedByte1337]

What language are you doing?

:/

nothing

[abuckau907]

Public Class Form1
    Public oldCPText As String = ""
    Public writeCount As Long = 0
  
 
    Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
        If Clipboard.ContainsText() Then
            Dim tmpCPText As String = Clipboard.GetText
            If tmpCPText <> oldCPText Then
                ''new text in clipboard
                oldCPText = tmpCPText
                System****.File.AppendAllText("somefilename.txt", tmpCPText) ''save it to file
                writeCount += 1
                Label2.Text = writeCount.ToString()
                If CheckBox1.Checked Then
                    Beep()
                End If
            End If
        End If
    End Sub


End Class

link to executable (requires .net framework 4.0 or higher): h t t p : / / www. file dropper . com/autocpsave

 

https://virusscan.jotti.org/en/scanre...5a2901f6051174
MD5: ee07a06e3fe8500b200ba3686e8a106d
SHA1: 93bc2eb02938dfe33e5e21160ea5df9ce1a424bd

^^ @ moderator, please upload to your file server or whatnot? I don't see "Reply with attachment" option, and wasn't going to start a new thread.

@OP, compile the source yourself..don't run the executable I posted until a moderator approves it.

Might not be the best solution, but should do what you're asking. ? Hopefully you're not copying hundreds of megs of text at a time..

[RedByte1337]

Public Class Form1
    Public oldCPText As String = ""
    Public writeCount As Long = 0
  
 
    Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
        If Clipboard.ContainsText() Then
            Dim tmpCPText As String = Clipboard.GetText
            If tmpCPText <> oldCPText Then
                ''new text in clipboard
                oldCPText = tmpCPText
                System****.File.AppendAllText("somefilename.txt", tmpCPText) ''save it to file
                writeCount += 1
                Label2.Text = writeCount.ToString()
                If CheckBox1.Checked Then
                    Beep()
                End If
            End If
        End If
    End Sub


End Class

link to executable (requires .net framework 4.0 or higher): h t t p : / / www. file dropper . com/autocpsave

 

https://virusscan.jotti.org/en/scanre...5a2901f6051174
MD5: ee07a06e3fe8500b200ba3686e8a106d
SHA1: 93bc2eb02938dfe33e5e21160ea5df9ce1a424bd

^^ @ moderator, please upload to your file server or whatnot? I don't see "Reply with attachment" option, and wasn't going to start a new thread.

@OP, compile the source yourself..don't run the executable I posted until a moderator approves it.

Might not be the best solution, but should do what you're asking. ? Hopefully you're not copying hundreds of megs of text at a time..

thx but when I go to that link it just sends me back to the filledropper . com main page and it asks me to upload

[abuckau907]

Hmm..that was only a few days ago, no idea why the file would be gone already, but it seems you're right.
It's against the rules to post outside download links, so I'd really rather not..

PM a moderator and ask them the appropriate way for me to upload the file for you (create a new thread?!?).

[RedByte1337]

Hmm..that was only a few days ago, no idea why the file would be gone already, but it seems you're right.
It's against the rules to post outside download links, so I'd really rather not..

PM a moderator and ask them the appropriate way for me to upload the file for you (create a new thread?!?).

ok I sent them a message

[RedByte1337]

Hmm..that was only a few days ago, no idea why the file would be gone already, but it seems you're right.
It's against the rules to post outside download links, so I'd really rather not..

PM a moderator and ask them the appropriate way for me to upload the file for you (create a new thread?!?).

I think you just have to click on "Go Advanced" and then you will have an option to upload it.



[MPGH]NormenJaydenFBI :
"He can just upload the file in the thread."

[abuckau907]

(well, I feel silly..)

https://virusscan.jotti.org/en/scanre...46c67971818fbe

[RedByte1337]

(well, I feel silly..)

https://virusscan.jotti.org/en/scanre...46c67971818fbe

thx for the help
But when I copy "hello" and "word"
it gives me : "helloword"
is there any way you can make it :
"
hello
word
"

[Harava]

Here is how it's done in C:

#include <cstdio>
#include <windows.h>

#pragma comment(lib, "USER32")

/*
        Auto copy-paster by Harava
              07.10.2014
*/

int main()
{
    HANDLE hClipData = NULL;
    HANDLE hLastClipData = NULL;
    long iClipSize = 0, iItemsSaved = 1;
    char * szClipData = NULL;
    char * szLastClipData = NULL;

    FILE * fOut = fopen("clipboard.txt", "a");
    if(fOut == NULL)
        return -1;

    while(!GetAsyncKeyState(VK_ESCAPE))
    {
        OpenClipboard(NULL);
        if(!IsClipboardFormatAvailable(CF_TEXT))
        {
            printf("Clipboard has something other than text!\n");
            CloseClipboard();
            Sleep(1000);
            continue;
        }
        hClipData = GetClipboardData(CF_TEXT);

        iClipSize = strlen((char*)hClipData);

        szClipData = (char*)malloc(iClipSize+1);
        memcpy(szClipData, (char*)hClipData, iClipSize+1);

        if(szLastClipData != NULL)
        {
            if(strcmp(szClipData, szLastClipData) != 0)
            {
                printf("Clipboard changed.\nSaving stuff to file.\n\n");
                fprintf(fOut, "**********     CLIPBOARD ITEM %d ( %d bytes )     **********\n\n", iItemsSaved, iClipSize);
                fwrite(szClipData, 1, iClipSize, fOut);
                fprintf(fOut, "\n\n**********     END OF ITEM %d     **********\n\n", iItemsSaved);
                fflush(fOut);
                iItemsSaved++;
            }
        }

        free(szLastClipData);
        szLastClipData = (char*)malloc(iClipSize+1);
        memcpy(szLastClipData, szClipData, iClipSize+1);

        free(szClipData);
        CloseClipboard();
        Sleep(100);
    }
    fclose(fOut);
    return 0;
}

[RedByte1337]

Here is how it's done in C:

#include <cstdio>
#include <windows.h>

#pragma comment(lib, "USER32")

/*
        Auto copy-paster by Harava
              07.10.2014
*/

int main()
{
    HANDLE hClipData = NULL;
    HANDLE hLastClipData = NULL;
    long iClipSize = 0, iItemsSaved = 1;
    char * szClipData = NULL;
    char * szLastClipData = NULL;

    FILE * fOut = fopen("clipboard.txt", "a");
    if(fOut == NULL)
        return -1;

    while(!GetAsyncKeyState(VK_ESCAPE))
    {
        OpenClipboard(NULL);
        if(!IsClipboardFormatAvailable(CF_TEXT))
        {
            printf("Clipboard has something other than text!\n");
            CloseClipboard();
            Sleep(1000);
            continue;
        }
        hClipData = GetClipboardData(CF_TEXT);

        iClipSize = strlen((char*)hClipData);

        szClipData = (char*)malloc(iClipSize+1);
        memcpy(szClipData, (char*)hClipData, iClipSize+1);

        if(szLastClipData != NULL)
        {
            if(strcmp(szClipData, szLastClipData) != 0)
            {
                printf("Clipboard changed.\nSaving stuff to file.\n\n");
                fprintf(fOut, "**********     CLIPBOARD ITEM %d ( %d bytes )     **********\n\n", iItemsSaved, iClipSize);
                fwrite(szClipData, 1, iClipSize, fOut);
                fprintf(fOut, "\n\n**********     END OF ITEM %d     **********\n\n", iItemsSaved);
                fflush(fOut);
                iItemsSaved++;
            }
        }

        free(szLastClipData);
        szLastClipData = (char*)malloc(iClipSize+1);
        memcpy(szLastClipData, szClipData, iClipSize+1);

        free(szClipData);
        CloseClipboard();
        Sleep(100);
    }
    fclose(fOut);
    return 0;
}

Thanks, but how do I save C filles and how do I compile them?

[abuckau907]

https://virusscan.jotti.org/en/scanre...f1743b242bf166

 

Public Class Form1
    Public oldCPText As String = ""
    Public writeCount As Long = 0
  
    Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
        If Clipboard.ContainsText() Then
            Dim tmpCPText As String = Clipboard.GetText
            If tmpCPText <> oldCPText Then
                ''new text in clipboard
                oldCPText = tmpCPText
                System****.File.AppendAllText(My.Settings.outputFilename, tmpCPText & Environment.NewLine) ''save it to file
                writeCount += 1
                Label2.Text = writeCount.ToString()
                If CheckBox1.Checked Then
                    Beep()
                End If
            End If
        End If
    End Sub

    Private Sub Form1_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Me.KeyDown
        If e.KeyValue = Keys.F2 Then
            Dim userResponse As String = InputBox("Please enter the new output filename:", "somefilename.txt", "somefilename.txt")
            If userResponse.Length = 0 Then
                MsgBox("Invalid output file name. Name unchanged.")
            ElseIf userResponse.EndsWith(".txt") = False Then
                MsgBox("Invalid output file name. Must end in .txt. Name unchanged.")
            Else
                My.Settings.outputFilename = userResponse
                lblFilename.Text = "File: " & My.Settings.outputFilename
                MsgBox("Filename changed OK.")
            End If
        End If
    End Sub


    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        lblFilename.Text = "File: " & My.Settings.outputFilename
    End Sub
End Class

Microsoft Visual Studio (free versions available, basically fully featured) : https://www.microsof*****m/en-us/searc...tudio&from=DLC
is an option, if you want a full blown IDE (and the option to support multiple programming languages).