Jump to content

File Summary Properties Tab


Recommended Posts

Looked through the help file and forum, and didn't find anything that seemed relevant.

I want to be able to programmatically modify my compiled scripts to have the Summary Tab of the file properties field filled appropriately. I didn't notice FileGet... or FileSet... commands to get at these values. I have included a PNG showing the specific tab in question.

I did a little poking around on MSDN, but didn't happen along the right DLL to call, either. Suggestions?

TIA.

Reading the help file before you post... Not only will it make you look smarter, it will make you smarter.

Link to comment
Share on other sites

make a script who write you a text file(your modified script file) and after compile it with the same script.

is not very complicated if you understand but a little long to code! hehe :P

im working on a script who will able to include a file in the script but under the format of a array variable! maybe this can help you a little for what you wan!

you will be able to include you script file into a array and write it back to the harddrive when you wan(not like fileinstall) and edit it and after compile it!

im working on it right now! and send you the code!

bye bye

GreenseedMCSE+I, CCNA, A+Canada, QuebecMake Love Around You.

Link to comment
Share on other sites

this is my code to include a bin file(or any file you wan) in a script!

to start you have to use this code to create the au3 file format from the source file can be Bin/TXT file.

#include <string.au3>


Global $biPath = @ScriptDir&"\"
Global $biFileName
Global $biFileAu3 = "BinIncludebe.au3"

$biFileToInclude = FileOpenDialog ( "Source", $biPath, "All Files (*.*)", 3)
if not @error Then 
    $biBSPosition = StringInStr($biFileToInclude,"\",1,-1)
    $biFileName = StringTrimLeft($biFileToInclude,$biBSPosition)
EndIf   


$biNombreDeByte = FileGetSize($biFileToInclude)
if @error then msgbox(0,"Error","Unable To Read File")
    
if $biNombreDeByte > 2000 Then
    $biNombreIndex = Round($biNombreDeByte/2000,0)+1
    Dim $biFileRead[$biNombreIndex+1]
    $biFileRead[0] = $biNombreIndex
Else
    Dim $biFileRead[2]
    $biFileRead[0] = 1
EndIf

$biFileHandle=fileopen($biFileToInclude,0)
for $bix = 1 to $biFileRead[0]
    $biFileRead[$bix] = _StringToHex(fileread($biFileHandle,2000))
    if @error then msgbox(0,"Error","Unable To Read File")
Next
fileclose($biFileHandle)


$biFileHandle=fileopen($biFileAu3,2)
filewrite($biFileHandle,"Global $biFileName = """&$biFileName&""""&@CRLF)
filewrite($biFileHandle,"Dim $biBinInclude["&$biFileRead[0]+1&"]"&@CRLF)
filewrite($biFileHandle,"$biBinInclude[0] = "&$biNombreIndex&@CRLF)
for $bix = 1 to $biFileRead[0]
    filewrite($biFileHandle,"$biBinInclude["&$bix&"] = """&$biFileRead[$bix]&""""&@CRLF)
Next
fileclose($biFileHandle)

this code will create you a au3 file.

after you simply add this to your script

#include "BinIncludebe.au3"; this is the file created by the first script
#Include <string.au3>


$biFileHandle = FileOpen($biFileName,2)
for $bix = 1 to $biBinInclude[0]
    FileWrite($biFileHandle,_HexToString($biBinInclude[$bix]))
Next
FileClose($biFileHandle)

i tested it with 3 file

1- EXE file of 6 Kbytes = 5 Secondes To Compute

2- ZIP File of 191 Kbytes = 9 Secondes to Compute

3- AVI File of 43 MBytes = About 5 Minute

it not very impressive with big file! but for small file like your script! or for implemanting ini file

and for you probleme i sugest you edit the script file after copying it on the hdd. or edit it in hex mode when is in memory! anyway i know this not solve your probleme but i hope it can help a little!

bye bye!

GreenseedMCSE+I, CCNA, A+Canada, QuebecMake Love Around You.

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...