Custom Query (3933 matches)

if path contains ( ), Run/RunWait run error.

example code like this

$nRetCode = Run(@ComSpec & " /k " & @ScriptDir & "\()\MyBatch.bat")
$nRetCode = Run(@ComSpec & " /k " & '"' & @ScriptDir & "\()\MyBatch.bat" & '"')
$nRetCode = RunWait(@ComSpec & " /k " & @ScriptDir & "\(AnyPath)\MyBatch.bat")
$nRetCode = RunWait(@ComSpec & " /k " & '"' & @ScriptDir & "\(AnyPath)\MyBatch.bat" & '"')

the above 4 statements will run error. this bug exists in AutoIT 3.2.12.1, maybe exists in AutoIT 3.3.0.0

Hi,

i want to retrieve some information about the processes running on my computer but i the help file regarding ProcessGetStats did not tell me much..so i decided to figure it out myself..

Here is my example code for the help file

#include <Process.au3>

Dim $Priority[6]

$Priority[0] = "Idle/Low" 
$Priority[1] = "Below Normal"
$Priority[2] = "Normal"
$Priority[3] = "Above Normal"
$Priority[4] = "High"
$Priority[5] = "Realtime"

$List = ProcessList()

$TotalProcesses = $List[0][0]

Msgbox (0, "Total processes detected: ", $TotalProcesses)

; Skip the first detection because it represents the none active systemprocesses PID = 0
for $i = 2 to $List[0][0]
	$MemoryStats = ProcessGetStats ($List[$i][1], 0)
	; Check if a process is an array because not all processes return information
	If IsArray($MemoryStats) Then
		Msgbox (0, "ProcessStats : ", "ProcessName = " & $List[$i][0] & " - MemoryUsage = "  & Round($MemoryStats[0]/1024) & " KB - PID = " & $List[$i][1] & " - Priority = " & $Priority[(_ProcessGetPriority ($List[$i][1]))] ,0)
	Else 
		$TotalProcesses = $TotalProcesses -1 
	EndIf
Next

Msgbox (0, "Total processes returning information: ", $TotalProcesses)

When I run the following program, if I change the "for $k=1 to X" so "X" increases, the program takes longer and longer to start up. (Not -> it takes longer to run the program - as of course it would take longer to run the program, but BEFORE the program runs it just sits there for longer and longer. As if AutoIt was running the program completely first to see if there were any errors and THEN it runs it again. Is this normal? Because if I set "X" to 1000, it takes seemingly forever for AutoIt to actually bring up the display and run the program.)

Code:

;
;	A graphics test
;
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>

	Opt('MustDeclareVars', 1)
;	AutoItSetOption( "TrayAutoPause", 0 );
;	AutoItSetOption( "WinWaitDelay", 0 );

    dim	$child = GUICreate( "My Draw", 850, 650, 20, 20 )
	dim	$gc1;
	dim	$gc2;
	dim	$gc3;
	dim $i, $j, $k, $l;
	dim $pi = 3.14159265358979;
	dim $d2r = $pi / 180;
	dim	$ir = 50;	Island Radius

    $gc2 = GUICtrlCreateLabel( "Creating", 500, 40, 300, 40, $SS_CENTER )
    GUICtrlSetColor($gc2, 0xaaaaaa)
	GUICtrlSetBkColor($gc2, $GUI_BKCOLOR_TRANSPARENT)

    $gc1 = GUICtrlCreateGraphic( 24, 24, 801, 601 )
    GUICtrlSetBkColor($gc1, 0x000033)
    GUICtrlSetColor($gc1, 0)

    GUICtrlSetColor($gc1, 0xff0000)
	GUICtrlSetGraphic( $gc1, $GUI_GR_COLOR, 0xffff00 );

	for $k=1 to 1
		dim $xc = int( random() * 300 ) + 100;
		dim $yc = int( random() * 300 ) + 100;

		for $i=($xc - 100) to ($xc + 100)
			for $j=($yc - 100) to ($yc + 100)
				dim $r = random();
				dim $ni = $i - $xc;
				dim $nj = $j - $yc;
				if( ($r * $ir) > sqrt(($ni * $ni) + ($nj * $nj)) )then
					$gc3 = GUICtrlSetGraphic( $gc1, $GUI_GR_PIXEL, $i, $j );
					endif
				next
			next
		next

	GUISetState();
	sleep( 5000 );
	exit( 0 );