Jump to content

Scriptsafe


cew27
 Share

Recommended Posts

hi i made this script to help if you opened a script that disabled task manager

there was a virus going around msn that claimed to be pictures in a rar file but was a script that sent its self to others and disabled task manager

so this should help in those situations

$keyboard = MsgBox(4,"Scriptsafe", "Would you like to use the onscreen keyboard ?")

If $keyboard = 7 Then   
$disable = InputBox("Scriptsafe", "please enter the name of the script you would like to cancel (the name of the file you opened) e.g hello.exe","","",300,150) 
If ProcessExists ($disable) Then 
ProcessClose ($disable) 
EndIf
EndIf
    
If $keyboard = 6 then
Run("osk.exe")  
$disable = InputBox("failsafe", "please enter the name of the script you would like to cancel (the name of the file you opened) e.g hello.exe","","",250,150)   
If ProcessExists ($disable) Then 
ProcessClose ($disable)         
EndIf
Endif

if you have any sugestions on how to make this script better please share :)

Link to comment
Share on other sites

$keyboard = MsgBox(4, "Scriptsafe", "Would you like to use the onscreen keyboard ?")
If $keyboard = 6 Then Run("osk.exe")
$disable = InputBox("Scriptsafe", "please enter the name of the script you would like to cancel (the name of the file you opened) e.g hello.exe", "", "", 300, 150)
If ProcessExists($disable) Then ProcessClose($disable)

8)

BTW: not sure if this on-screen keyboard is available on all OS. it is for Win Xp

Edited by Valuater

NEWHeader1.png

Link to comment
Share on other sites

make your own on screen key board:

EDIT: i found one that i made for a friend that plays on runescape and he keeys getting keyloggers!

here it is:

#Region ;**** Directives created by AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_Version=Beta
#AutoIt3Wrapper_icon=hiddenkeys\lock.ico
#AutoIt3Wrapper_outfile=hiddenkeys\Hiddenkeys.exe
#AutoIt3Wrapper_Compression=4
#AutoIt3Wrapper_UseAnsi=y
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
#include <GUIConstants.au3>
HotKeySet("{F1}", "sendpass")


TrayTip("Tip", "Click on the place that you would like to send your password then press F1",10000)
$HiddenKeys = GUICreate("HiddenKeys", 367, 174, 303, 219)
GUISetBkColor(0x000000)
$Input1 = GUICtrlCreateInput("", 12, 144, 337, 21, BitOR($ES_AUTOHSCROLL,$ES_READONLY))
$Tab1 = GUICtrlCreateTab(8, 8, 345, 129)
$small = GUICtrlCreateTabItem("Lower case")
GUICtrlSetState(-1,$GUI_SHOW)
$q = GUICtrlCreateButton("q", 26, 39, 27, 25, 0)
$w = GUICtrlCreateButton("w", 58, 39, 27, 25, 0)
$e = GUICtrlCreateButton("e", 90, 39, 27, 25, 0)
$r = GUICtrlCreateButton("r", 122, 39, 27, 25, 0)
$t = GUICtrlCreateButton("t", 154, 39, 27, 25, 0)
$y = GUICtrlCreateButton("y", 186, 39, 27, 25, 0)
$u = GUICtrlCreateButton("u", 218, 39, 27, 25, 0)
$i = GUICtrlCreateButton("i", 250, 39, 27, 25, 0)
$o = GUICtrlCreateButton("o", 282, 39, 27, 25, 0)
$p = GUICtrlCreateButton("p", 314, 39, 27, 25, 0)
$a = GUICtrlCreateButton("a", 26, 71, 27, 25, 0)
$s = GUICtrlCreateButton("s", 58, 71, 27, 25, 0)
$d = GUICtrlCreateButton("d", 90, 71, 27, 25, 0)
$f = GUICtrlCreateButton("f", 122, 71, 27, 25, 0)
$g = GUICtrlCreateButton("g", 154, 71, 27, 25, 0)
$h = GUICtrlCreateButton("h", 186, 71, 27, 25, 0)
$j = GUICtrlCreateButton("j", 218, 71, 27, 25, 0)
$k = GUICtrlCreateButton("k", 250, 71, 27, 25, 0)
$l = GUICtrlCreateButton("l", 282, 71, 27, 25, 0)
$z = GUICtrlCreateButton("z", 26, 103, 27, 25, 0)
$x = GUICtrlCreateButton("x", 58, 103, 27, 25, 0)
$c = GUICtrlCreateButton("c", 90, 103, 27, 25, 0)
$v = GUICtrlCreateButton("v", 122, 103, 27, 25, 0)
$b = GUICtrlCreateButton("b", 154, 103, 27, 25, 0)
$n = GUICtrlCreateButton("n", 186, 103, 27, 25, 0)
$m = GUICtrlCreateButton("m", 218, 103, 27, 25, 0)
$big = GUICtrlCreateTabItem("Upper case")
$qu = GUICtrlCreateButton("Q", 24, 37, 27, 25, 0)
$au = GUICtrlCreateButton("A", 24, 69, 27, 25, 0)
$zu = GUICtrlCreateButton("Z", 24, 101, 27, 25, 0)
$xu = GUICtrlCreateButton("X", 56, 101, 27, 25, 0)
$su = GUICtrlCreateButton("S", 56, 69, 27, 25, 0)
$wu = GUICtrlCreateButton("W", 56, 37, 27, 25, 0)
$eu = GUICtrlCreateButton("E", 88, 37, 27, 25, 0)
$du = GUICtrlCreateButton("D", 88, 69, 27, 25, 0)
$cu = GUICtrlCreateButton("C", 88, 101, 27, 25, 0)
$vu = GUICtrlCreateButton("V", 120, 101, 27, 25, 0)
$fu = GUICtrlCreateButton("F", 120, 69, 27, 25, 0)
$ru = GUICtrlCreateButton("R", 120, 37, 27, 25, 0)
$tu = GUICtrlCreateButton("T", 152, 37, 27, 25, 0)
$gu = GUICtrlCreateButton("G", 152, 69, 27, 25, 0)
$bu = GUICtrlCreateButton("B", 152, 101, 27, 25, 0)
$nu = GUICtrlCreateButton("N", 184, 101, 27, 25, 0)
$hu = GUICtrlCreateButton("H", 184, 69, 27, 25, 0)
$yu = GUICtrlCreateButton("Y", 184, 37, 27, 25, 0)
$uu = GUICtrlCreateButton("U", 216, 37, 27, 25, 0)
$ju = GUICtrlCreateButton("J", 216, 69, 27, 25, 0)
$mu = GUICtrlCreateButton("M", 216, 101, 27, 25, 0)
$ku = GUICtrlCreateButton("K", 248, 69, 27, 25, 0)
$iu = GUICtrlCreateButton("I", 248, 37, 27, 25, 0)
$ou = GUICtrlCreateButton("O", 280, 37, 27, 25, 0)
$lu = GUICtrlCreateButton("L", 280, 69, 27, 25, 0)
$pu = GUICtrlCreateButton("P", 312, 37, 27, 25, 0)
$others = GUICtrlCreateTabItem("Others")
$Space = GUICtrlCreateButton("Space", 14, 72, 91, 25, 0)
$one = GUICtrlCreateButton("1", 16, 40, 27, 25, 0)
$two = GUICtrlCreateButton("2", 48, 40, 27, 25, 0)
$three = GUICtrlCreateButton("3", 80, 40, 27, 25, 0)
$four = GUICtrlCreateButton("4", 112, 40, 27, 25, 0)
$five = GUICtrlCreateButton("5", 144, 40, 27, 25, 0)
$six = GUICtrlCreateButton("6", 176, 40, 27, 25, 0)
$seven = GUICtrlCreateButton("7", 208, 40, 27, 25, 0)
$eight = GUICtrlCreateButton("8", 240, 40, 27, 25, 0)
$nine = GUICtrlCreateButton("8", 272, 40, 27, 25, 0)
$zero = GUICtrlCreateButton("0", 304, 40, 27, 25, 0)
$Bspace = GUICtrlCreateButton("BackSpace", 112, 72, 91, 25, 0)
$_ = GUICtrlCreateButton("_", 208, 72, 27, 25, 0)
$dash = GUICtrlCreateButton("-", 240, 72, 27, 25, 0)
$fullstop = GUICtrlCreateButton(".", 272, 72, 27, 25, 0)
$deleteall = GUICtrlCreateButton("Delete All", 16, 104, 75, 25, 0)
GUICtrlCreateTabItem("")
GUISetState(@SW_SHOW)


While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit

  ;numbers
Case $one
    $CharsUp=GUICtrlRead($Input1)
    GUICtrlSetData($Input1,$CharsUp&"1")
Case $two
    $CharsUp=GUICtrlRead($Input1)
    GUICtrlSetData($Input1,$CharsUp&"2")
Case $three
    $CharsUp=GUICtrlRead($Input1)
    GUICtrlSetData($Input1,$CharsUp&"3")
Case $four
    $CharsUp=GUICtrlRead($Input1)
    GUICtrlSetData($Input1,$CharsUp&"4")
Case $five
    $CharsUp=GUICtrlRead($Input1)
    GUICtrlSetData($Input1,$CharsUp&"5")
Case $six
    $CharsUp=GUICtrlRead($Input1)
    GUICtrlSetData($Input1,$CharsUp&"6")
Case $seven
    $CharsUp=GUICtrlRead($Input1)
    GUICtrlSetData($Input1,$CharsUp&"7")
Case $eight
    $CharsUp=GUICtrlRead($Input1)
    GUICtrlSetData($Input1,$CharsUp&"8")
Case $nine
    $CharsUp=GUICtrlRead($Input1)
    GUICtrlSetData($Input1,$CharsUp&"9")
Case $zero
    $CharsUp=GUICtrlRead($Input1)
    GUICtrlSetData($Input1,$CharsUp&"0")
    
  ;letters - row one
Case $q
    $CharsUp=GUICtrlRead($Input1)
    GUICtrlSetData($Input1,$CharsUp&"q")
Case $w
    $CharsUp=GUICtrlRead($Input1)
    GUICtrlSetData($Input1,$CharsUp&"w")
Case $e
    $CharsUp=GUICtrlRead($Input1)
    GUICtrlSetData($Input1,$CharsUp&"e")
Case $r
    $CharsUp=GUICtrlRead($Input1)
    GUICtrlSetData($Input1,$CharsUp&"r")
Case $t
    $CharsUp=GUICtrlRead($Input1)
    GUICtrlSetData($Input1,$CharsUp&"t")
Case $y
    $CharsUp=GUICtrlRead($Input1)
    GUICtrlSetData($Input1,$CharsUp&"y")
Case $u
    $CharsUp=GUICtrlRead($Input1)
    GUICtrlSetData($Input1,$CharsUp&"u")
Case $i
    $CharsUp=GUICtrlRead($Input1)
    GUICtrlSetData($Input1,$CharsUp&"i")
Case $o
    $CharsUp=GUICtrlRead($Input1)
    GUICtrlSetData($Input1,$CharsUp&"o")
Case $p
    $CharsUp=GUICtrlRead($Input1)
    GUICtrlSetData($Input1,$CharsUp&"p")
    
  ;letters - row two
Case $a
    $CharsUp=GUICtrlRead($Input1)
    GUICtrlSetData($Input1,$CharsUp&"a")
Case $s
    $CharsUp=GUICtrlRead($Input1)
    GUICtrlSetData($Input1,$CharsUp&"s")
Case $d
    $CharsUp=GUICtrlRead($Input1)
    GUICtrlSetData($Input1,$CharsUp&"d")
Case $f
    $CharsUp=GUICtrlRead($Input1)
    GUICtrlSetData($Input1,$CharsUp&"f")
Case $g
    $CharsUp=GUICtrlRead($Input1)
    GUICtrlSetData($Input1,$CharsUp&"g")
Case $h
    $CharsUp=GUICtrlRead($Input1)
    GUICtrlSetData($Input1,$CharsUp&"h")
Case $j
    $CharsUp=GUICtrlRead($Input1)
    GUICtrlSetData($Input1,$CharsUp&"j")
Case $k
    $CharsUp=GUICtrlRead($Input1)
    GUICtrlSetData($Input1,$CharsUp&"k")
Case $l
    $CharsUp=GUICtrlRead($Input1)
    GUICtrlSetData($Input1,$CharsUp&"l")

  ;letters - row three
Case $z
    $CharsUp=GUICtrlRead($Input1)
    GUICtrlSetData($Input1,$CharsUp&"z")
Case $x
    $CharsUp=GUICtrlRead($Input1)
    GUICtrlSetData($Input1,$CharsUp&"x")
Case $c
    $CharsUp=GUICtrlRead($Input1)
    GUICtrlSetData($Input1,$CharsUp&"c")
Case $v
    $CharsUp=GUICtrlRead($Input1)
    GUICtrlSetData($Input1,$CharsUp&"v")
Case $b
    $CharsUp=GUICtrlRead($Input1)
    GUICtrlSetData($Input1,$CharsUp&"b")
Case $n
    $CharsUp=GUICtrlRead($Input1)
    GUICtrlSetData($Input1,$CharsUp&"n")
Case $m
    $CharsUp=GUICtrlRead($Input1)
    GUICtrlSetData($Input1,$CharsUp&"m")
    
              ;upper letters - row one
Case $qu
    $CharsUp=GUICtrlRead($Input1)
    GUICtrlSetData($Input1,$CharsUp&"Q")
Case $wu
    $CharsUp=GUICtrlRead($Input1)
    GUICtrlSetData($Input1,$CharsUp&"W")
Case $eu
    $CharsUp=GUICtrlRead($Input1)
    GUICtrlSetData($Input1,$CharsUp&"E")
Case $ru
    $CharsUp=GUICtrlRead($Input1)
    GUICtrlSetData($Input1,$CharsUp&"R")
Case $tu
    $CharsUp=GUICtrlRead($Input1)
    GUICtrlSetData($Input1,$CharsUp&"T")
Case $yu
    $CharsUp=GUICtrlRead($Input1)
    GUICtrlSetData($Input1,$CharsUp&"Y")
Case $uu
    $CharsUp=GUICtrlRead($Input1)
    GUICtrlSetData($Input1,$CharsUp&"U")
Case $iu
    $CharsUp=GUICtrlRead($Input1)
    GUICtrlSetData($Input1,$CharsUp&"I")
Case $ou
    $CharsUp=GUICtrlRead($Input1)
    GUICtrlSetData($Input1,$CharsUp&"O")
Case $pu
    $CharsUp=GUICtrlRead($Input1)
    GUICtrlSetData($Input1,$CharsUp&"P")
    
  ;upper letters - row two
Case $au
    $CharsUp=GUICtrlRead($Input1)
    GUICtrlSetData($Input1,$CharsUp&"A")
Case $su
    $CharsUp=GUICtrlRead($Input1)
    GUICtrlSetData($Input1,$CharsUp&"S")
Case $du
    $CharsUp=GUICtrlRead($Input1)
    GUICtrlSetData($Input1,$CharsUp&"D")
Case $fu
    $CharsUp=GUICtrlRead($Input1)
    GUICtrlSetData($Input1,$CharsUp&"F")
Case $gu
    $CharsUp=GUICtrlRead($Input1)
    GUICtrlSetData($Input1,$CharsUp&"G")
Case $hu
    $CharsUp=GUICtrlRead($Input1)
    GUICtrlSetData($Input1,$CharsUp&"H")
Case $ju
    $CharsUp=GUICtrlRead($Input1)
    GUICtrlSetData($Input1,$CharsUp&"J")
Case $ku
    $CharsUp=GUICtrlRead($Input1)
    GUICtrlSetData($Input1,$CharsUp&"K")
Case $lu
    $CharsUp=GUICtrlRead($Input1)
    GUICtrlSetData($Input1,$CharsUp&"L")

  ;upper letters - row three
Case $zu
    $CharsUp=GUICtrlRead($Input1)
    GUICtrlSetData($Input1,$CharsUp&"Z")
Case $xu
    $CharsUp=GUICtrlRead($Input1)
    GUICtrlSetData($Input1,$CharsUp&"X")
Case $cu
    $CharsUp=GUICtrlRead($Input1)
    GUICtrlSetData($Input1,$CharsUp&"C")
Case $vu
    $CharsUp=GUICtrlRead($Input1)
    GUICtrlSetData($Input1,$CharsUp&"V")
Case $bu
    $CharsUp=GUICtrlRead($Input1)
    GUICtrlSetData($Input1,$CharsUp&"B")
Case $nu
    $CharsUp=GUICtrlRead($Input1)
    GUICtrlSetData($Input1,$CharsUp&"N")
Case $mu
    $CharsUp=GUICtrlRead($Input1)
    GUICtrlSetData($Input1,$CharsUp&"M")

  ;others
Case $Space
    $CharsUp=GUICtrlRead($Input1)
    GUICtrlSetData($Input1,$CharsUp&" ")
    
Case $BSpace
    $CharsUp=GUICtrlRead($Input1)
    $Lenght=StringLen($CharsUp)
    $delete=StringLeft($CharsUp,$Lenght-1)
    GUICtrlSetData($Input1,$delete)

Case $_
    $CharsUp=GUICtrlRead($Input1)
    GUICtrlSetData($Input1,$CharsUp&"_")
    
Case $dash
    $CharsUp=GUICtrlRead($Input1)
    GUICtrlSetData($Input1,$CharsUp&"-")
    
Case $fullstop
    $CharsUp=GUICtrlRead($Input1)
    GUICtrlSetData($Input1,$CharsUp&".")
    
Case $deleteall
    GUICtrlSetData($Input1, "")
EndSwitch
WEnd


Func Sendpass()
    
    Send(GUICtrlRead($Input1));Using Send($Input1) would send the ControlID of the input.
    
EndFunc
Edited by ashley
Link to comment
Share on other sites

  • Developers

Question: How would you know the process name to stop when you don't have the taskmanager ?

SciTE4AutoIt3 Full installer Download page   - Beta files       Read before posting     How to post scriptsource   Forum etiquette  Forum Rules 
 
Live for the present,
Dream of the future,
Learn from the past.
  :)

Link to comment
Share on other sites

  • Developers

because if it is an exe file it would just be the name of the exe

...still how do you know the name of the exe/process that is causing the taskmanager not to show ??

You know ... all this stuff you guys are posting here is quite useless so please stay in the support forum till you have properly learned to write scripts first.

- moved -

Jos

SciTE4AutoIt3 Full installer Download page   - Beta files       Read before posting     How to post scriptsource   Forum etiquette  Forum Rules 
 
Live for the present,
Dream of the future,
Learn from the past.
  :)

Link to comment
Share on other sites

Question: How would you know the process name to stop when you don't have the taskmanager ?

This is a good point!

Ashley , nice job with the on-screen keyboard.

All , in general I think it's not a bad idea. Jos does have a good point. I do know there are a few people that generally have good idea of what scripts are running. Nonetheless, this was an interesting read.

cew27, http://www.autoitscript.com/autoit3/scite/...oIt3Wrapper.htm

A decision is a powerful thing
Link to comment
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
 Share

  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...