Custom Query (3931 matches)

when I activ this in compil option I have an errormessage in the scite consol, it is a good idea to disable the message too

hi there, maybe someone else has mentioned this before, but controlsend is a bit buggy, isn't it? after some time, all it does is shit, pressing randomly some keystrokes

e.g. ControlSend("Window","","","Hallo!!") writes something like :

hALlo!! or HALlo11 also capslock/alt/shift got activated by this command, or the "WIN" key so it does crap activating some hotkeys from another application or so on

so i would suggest a recode, or that you maybe take a look at this function

greetíngs ;)

A Dll that not exist can not provide a handle. In this case the DllOpen function return value @error should set to -1.

#cs ----------------------------------------------------------------------------

 AutoIt Version: 3.3.0.0
 Author:         fristo

 Script Function:
	Template AutoIt script.

#ce ----------------------------------------------------------------------------

; Script Start - Add your code below here

	Local $nameDll="netapi32.dll"
	Local $Netapi
	
	$Netapi = DllOpen($nameDll)
	MsgBox(64, "@ERROR Of DllOpen", "Call DllOpen (" & $nameDll & ")" & @CRLF & @CRLF & "@error = " & @error)
	DllClose($Netapi)
	ExistDLL ($nameDll)


	$nameDll="net___api32.dll"
	$Netapi = DllOpen($nameDll)
	MsgBox(48, "@ERROR Of DllOpen", "Call DllOpen (" & $nameDll & ")" & @CRLF & @CRLF & "@error = " & @error)
	DllClose($Netapi)
	ExistDLL ($nameDll)
	
	Exit
	
	
; =============================================================================	


Func ExistDLL ($name)	
	
	Local $fullName = @SystemDir & "\" & $name
	
	If FileExists($fullName) > 0 Then
		MsgBox(0, "Result of FileExist", "File '" & $fullName & "'" & @CRLF & @CRLF & "exist")
	Else
		MsgBox(48, "Result of FileExist", "File '" & $fullName & "'" & @CRLF & @CRLF & "exist not")
	EndIf
	
EndFunc
	
	
; =============================================================================