File Info!

[AlmarM]

Hi,

I made this File Info program, because I was a bit bored. AND I needed it

expandcollapse popup

#include <GUIConstants.au3>

$GUI = GUICreate("File Info!", 500, 220, -1, -1)
$FileOpenInput = GUICtrlCreateInput("", 10, 10, 340, 20, BitOR("", $ES_READONLY))
$FileOpenButton = GUICtrlCreateButton("Open", 360, 7)
$Go = GUICtrlCreateButton("Go", 360, 39, 35)
GUICtrlCreateLabel("Attrib: ", 10, 43)
$FileAttribInput = GUICtrlCreateInput("", 50, 40, 300, 20, BitOR("", $ES_READONLY))
GUICtrlCreateLabel("Long Name: ", 10, 73)
$LongNameInput = GUICtrlCreateInput("", 80, 70, 312, 20, BitOR("", $ES_READONLY))
GUICtrlCreateLabel("Short Name: ", 10, 103)
$ShortNameInput = GUICtrlCreateInput("", 80, 100, 312, 20, BitOR("", $ES_READONLY))
GUICtrlCreateLabel("File Size: ", 10, 133)
$FileSizeInput = GUICtrlCreateInput("", 80, 130, 312, 20, BitOR("", $ES_READONLY))
GUICtrlCreateLabel("File Time: ", 10, 163)
$FileTimeInput = GUICtrlCreateInput("", 80, 160, 312, 20, BitOR("", $ES_READONLY))
GUICtrlCreateLabel("Version: ", 10, 193)
$FileVersionInput = GUICtrlCreateInput("", 80, 190, 312, 20, BitOR("", $ES_READONLY))
GUICtrlCreateLabel("For Attrib:" & @CRLF & @CRLF & "R = Read Only" & @CRLF & "A = Archive" & @CRLF & "S = System" & @CRLF & "H = Hidden" & @CRLF & "N = Normal" & @CRLF & "D = Directory" & @CRLF & "O = Offline" & @CRLF & "C = Compressed" & @CRLF & "T = Temporary", 410, 10)

GUISetState()
While 1
    $nMsg = GUIGetMsg()
    Select
    Case $nMsg = $GUI_EVENT_CLOSE
        Exit
    Case $nMsg = $FileOpenButton
        $FileOpenDialog = FileOpenDialog("Choose your File!", @DesktopDir, "All Files (*.*)", 1 + 2)
        GUICtrlSetData($FileOpenInput, $FileOpenDialog)
    Case $nMsg = $Go
        $Read = GUICtrlRead($FileOpenInput)
        GUICtrlSetData($FileAttribInput, FileGetAttrib($Read))
        GUICtrlSetData($LongNameInput, FileGetLongName($Read))
        GUICtrlSetData($ShortNameInput, FileGetShortName($Read))
        GUICtrlSetData($FileSizeInput, FileGetSize($Read) & " bytes")
        $t = FileGetTime($Read)
        $ddmmyyyy= $t[2] & "/" & $t[1] & "/" & $t[0]
        GUICtrlSetData($FileTimeInput, "This file was created on: " & $ddmmyyyy)
        GUICtrlSetData($FileVersionInput, FileGetVersion($Read))
    EndSelect
WEnd

-AlmarM-

[Kivin]

Nice Script, but for new version of autoit you need add

#include <WindowsConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>oÝ÷ Ø   l£*.q©ÚuÙµ§Zµ¦®¶­sb4æ6ÇVFRfÇC´'&æS2fwC° ¢b33c·FÒfÆT÷VäFÆörgV÷Cµ6VÆV7BfÆRFò&VBGG&'WFW2gV÷C²Ä67&DF"ÂgV÷C´Æ¢â¢gV÷C²¢b33c·&÷ÒôvWDWE&÷W'Gb33c·FÂÓ¥ô'&F7Æb33c·&÷ÂgV÷Cµ&÷W'G'&gV÷C² £³ÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓУ²gVæ7FöâæÖS¢vWDWE&÷W'Gb33c·5FÂb33c¶&÷£²FW67&Föã¢&WGW&ç2âWFVæFVB&÷W'GöbvfVâfÆRࣲ&ÖWFW"2¢b33c·5FÒFRFFòFRfÆR÷R&RGFV×FærFò&WG&WfRâWFVæFVB&÷W'Gg&öÒࣲb33c¶&÷ÒFRçVÖW&6ÂfÇVRf÷"FR&÷W'G÷RvçB&WGW&æVBâbb33c¶&÷226W@£²FòÓFVâÆÂ&÷W'FW2vÆÂ&R&WGW&æVBâFÖVç6öæÂ'&âFV"6÷'&W7öæFær÷&FW"ࣲFR&÷W'FW2&R2föÆÆ÷w3 £²æÖRÒ£²6¦RÒ£²GRÒ £²FFTÖöFfVBÒ0£²FFT7&VFVBÒ@£²FFT66W76VBÒP£²GG&'WFW2Ò`£²7FGW2Òp£²÷væW"Ò£²WF÷"Ò£²FFÆRÒ£²7V&¦V7BÒ£²6FVv÷'Ò £²vW2Ò0£²6öÖÖVçG2Ò@£²6÷&vBÒP£²'F7BÒ`£²Æ'VÕFFÆRÒp£²V"Ò£²G&6´çVÖ&W"Ò£²vVç&RÒ#£²GW&FöâÒ#£²&E&FRÒ# £²&÷FV7FVBÒ#0£²6ÖW&ÖöFVÂÒ#@£²FFU7GW&UF¶VâÒ#P£²FÖVç6öç2Ò#`£²vGFÒ#p£²VvBÒ#£²6ö×çÒ3£²FW67&FöâÒ3£²fÆUfW'6öâÒ3 £²&öGV7DæÖRÒ30£²&öGV7EfW'6öâÒ3@£²&WV&VÖVçB2¢fÆR7V6fVBâb33c·7F×W7BW7Bࣲ&WGW&âfÇVR2¢öâ7V66W72ÒFRWFVæFVBfÆR&÷W'GÂ÷"bb33c¶&÷ÒÓFVââ'&vFÆÂ&÷W'FW0£²öâfÇW&RÒÂW'&÷"ÒbfÆRFöW2æ÷BW7B£²WF÷"2¢6×V6Â6×V6ÄvÖÂæ6öÒ£²æ÷FR2 £°£³ÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓÓФgVæ2ôvWDWE&÷W'Gb33c·5FÂb33c¶&÷¢Æö6Âb33c¶W7BÂb33c·4fÆRÂb33c·4F"Âb33c¶õ6VÆÄÂb33c¶ôF"Âb33c¶ôfÆRÂb33c¶&÷W'GÂb33c·5&÷W'G¢b33c¶W7BÒfÆTW7G2b33c·5F¢bb33c¶W7BÒFVà¢6WDW'&÷"¢&WGW&â¢VÇ6P¢b33c·4fÆRÒ7G&æuG&ÔÆVgBb33c·5FÂ7G&ætå7G"b33c·5FÂgV÷C²b3#²gV÷C²ÂÂÓ¢b33c·4F"Ò7G&æuG&Õ&vBb33c·5FÂ7G&ætÆVâb33c·5FÒ7G&ætå7G"b33c·5FÂgV÷C²b3#²gV÷C²ÂÂÓ¢b33c¶õ6VÆÄÒö&¤7&VFRgV÷C·6VÆÂæÆ6FöâgV÷C²¢b33c¶ôF"Òb33c¶õ6VÆÄäæÖU76Rb33c·4F"¢b33c¶ôfÆRÒb33c¶ôF"å'6VæÖRb33c·4fÆR¢bb33c¶&÷ÒÓFVà¢Æö6Âb33c¶&÷W'G³3UТf÷"b33c¶ÒFò3@¢b33c¶&÷W'G²b33c¶ÒÒb33c¶ôF"ävWDFWFÇ4öbb33c¶ôfÆRÂb33c¶¢æW@¢&WGW&âb33c¶&÷W'G¢VÇ6P¢b33c·5&÷W'GÒb33c¶ôF"ävWDFWFÇ4öbb33c¶ôfÆRÂb33c¶&÷¢bb33c·5&÷W'GÒgV÷C²gV÷C²FVà¢&WGW&â¢VÇ6P¢&WGW&âb33c·5&÷W'G¢VæD`¢VæD`¢VæD`¤VæDgVæ0

from http://www.autoitscript.com/forum/index.ph...mp;hl=meta+data

Thank you for sharing

[ChromeFan]

Adding icon of file , giving some extra info about exe files and changing file size info from bytes to KB/MB can make it more useful and better.

[torels]

also take a look at the shell.application methods to get file info

It provides loads of more stuff (including author, bitrate(if media file) and so on...)

cheers

[Garp99HasSpoken]

If it's a video file, use program mediainfo to display even more information,

perhaps in a separate tab.

[AlmarM]

Wow

Never tought anyone still replied on this post ^^,

But all your reqeusts and ideas... So much >_<

AlmarM