 |
AutoHotkey Community Let's help each other out
|
| View previous topic :: View next topic |
| Author |
Message |
0mega
Joined: 17 May 2007 Posts: 38
|
Posted: Tue Sep 02, 2008 3:31 pm Post subject: Au3Info.exe Statusbar tab |
|
|
How I can get same values as Au3Info Statusbar tab shows
It shows
1. number of objects
2. filesize of all objects
3. My computer
I need number of files to get rid off inputbox.
And why this script freeze my computer :/
Click the first file on the folder and press n. Then input the number of the files on that folder. Then tadaa... all names are on textfile.
If somebody knows how to make this better and easier, please tell.
| Code: | n::
SysGet, VSW, 78
SysGet, VSH, 79
X:= %VSW%/2-90
Y:=%VSH%/2-60
InputBox, OutputVar, Number of the files ?, , , 180, 120, %X%, %Y%
Loop, %OutputVar%
{
SendPlay ^c
Sleep, 20
StringReplace, clipboard, clipboard, %A_WorkingDir%, , All
Sleep, 20
FileAppend, %ClipBoard%`n, %A_WorkingDir%/Kappaleet.txt
Sleep, 20
SendPlay {Down}
Sleep, 20
}
Return |
|
|
| Back to top |
|
 |
SKAN
Joined: 26 Dec 2005 Posts: 8688
|
Posted: Tue Sep 02, 2008 4:46 pm Post subject: |
|
|
| Code: | ^F2::
Clipboard=
Send ^a
Send ^c
clipwait, 2
Files := Clipboard
MsgBox, % Files ; Use fileappend instead
Return |
Run the code and Press ^F2 when Windows Explorer right pane is active
 _________________ URLGet - Internet Explorer based Downloader |
|
| Back to top |
|
 |
0mega
Joined: 17 May 2007 Posts: 38
|
Posted: Tue Sep 02, 2008 5:34 pm Post subject: |
|
|
Haha thanks SKAN.
You make me look like an idiot :D |
|
| Back to top |
|
 |
0mega
Joined: 17 May 2007 Posts: 38
|
Posted: Tue Sep 02, 2008 8:08 pm Post subject: |
|
|
Now I can easily remove _-marks from mp3 files and others.
| Code: | ^F2::
Clipboard=
Send ^a
Send ^c
clipwait, 2
Files := Clipboard
FileAppend, % Files, %A_WorkingDir%\Kappaleet.txt
number = 0
Loop
{
number++
FileReadLine, line%number%, %A_WorkingDir%\Kappaleet.txt, %A_Index%
if ErrorLevel
break
Fix:= % line%number%
StringReplace, Fix, Fix, %A_WorkingDir%\,,All
StringReplace, Fix, Fix, _,%A_SPACE%,All
FileMove, % line%number%, %A_WorkingDir%\%Fix%
}
FileDelete, %A_WorkingDir%\Kappaleet.txt
ExitApp |
But propably SKAN will come again and do this better :/ |
|
| Back to top |
|
 |
|
|
You can post new topics in this forum You can reply to topics in this forum
|
Powered by phpBB © 2001, 2005 phpBB Group
|