Visual FoxPro Toolkit for .NET

AGetFileVersion() Method

Creates an array containing detailed information for a file Note: Params 13 and 15 are not implemented. Param 13 specifies if file can self register and param 15 specified the translation code.

[VisualBasic]

Public Shared Function AGetFileVersion(ByRef aFileInfoArray() As String, ByVal cFileName As String) As Integer

[C#]

public static int AGetFileVersion(ref string[] aFileInfoArray, string cFileName)

Example

[VisualBasic]

Fills MyArray with detailed information about the file

Dim laArray() As String

AGetFileVersion(laArray, GetFile()) 'Call GetFile() dialog

Dim lnI As Integer

For lnI = 0 To laArray.Length - 1

Console.WriteLine(laArray(lnI))

Next

[C#]

//Create an array of type string and pass it by reference to the AGetFileVersion() along with the name of the file

//Fills MyArray with detailed information about the file

string[] MyArray = new string[0];

int i = VFPToolkit.arrays.AGetFileVersion(ref MyArray, "c:\\visio10\\gdiplus.dll");

Tip: Note the use of double backslash \\ as a separator. In C# the backslash is used to specify escape sequence so you need to specify the \\ as a separator or specify the path using the @"c:\MyPath\MyFile".

Implementation

[VisualBasic]

Public Shared Function AGetFileVersion(ByRef aFileInfoArray() As String, ByVal cFileName As String) As Integer
'Create the FileVersionInfo object from System.Diagnostics and pass the FileName for which we want to get information
Dim fvi As System.Diagnostics.FileVersionInfo = FileVersionInfo.GetVersionInfo(cFileName)
'Specify the right dimensions for the array
aFileInfoArray = New String(15) {}
'Fill the array the right values
aFileInfoArray(0) = fvi.Comments
aFileInfoArray(1) = fvi.CompanyName
aFileInfoArray(2) = fvi.FileDescription
aFileInfoArray(3) = fvi.FileVersion
aFileInfoArray(4) = fvi.InternalName
aFileInfoArray(5) = fvi.LegalCopyright
aFileInfoArray(6) = fvi.LegalTrademarks
aFileInfoArray(7) = fvi.OriginalFilename
aFileInfoArray(8) = fvi.PrivateBuild
aFileInfoArray(9) = fvi.ProductName
aFileInfoArray(10) = fvi.ProductVersion
aFileInfoArray(11) = fvi.SpecialBuild
aFileInfoArray(12) = ""
aFileInfoArray(13) = fvi.Language
aFileInfoArray(14) = ""
'Return the number of items back
Return aFileInfoArray.Length
End Function

[C#]

public static int AGetFileVersion(ref string[] aFileInfoArray, string cFileName)
{
//Create the FileVersionInfo object from System.Diagnostics and pass the FileName for which we want to get information
System.Diagnostics.FileVersionInfo fvi = FileVersionInfo.GetVersionInfo(cFileName);
//Specify the right dimensions for the array
aFileInfoArray = new string[15];
//Fill the array the right values
aFileInfoArray[0] = fvi.Comments;
aFileInfoArray[1] = fvi.CompanyName;
aFileInfoArray[2] = fvi.FileDescription;
aFileInfoArray[3] = fvi.FileVersion;
aFileInfoArray[4] = fvi.InternalName;
aFileInfoArray[5] = fvi.LegalCopyright;
aFileInfoArray[6] = fvi.LegalTrademarks;
aFileInfoArray[7] = fvi.OriginalFilename;
aFileInfoArray[8] = fvi.PrivateBuild;
aFileInfoArray[9] = fvi.ProductName;
aFileInfoArray[10] = fvi.ProductVersion;
aFileInfoArray[11] = fvi.SpecialBuild;
aFileInfoArray[12] = "";
aFileInfoArray[13] = fvi.Language;
aFileInfoArray[14] = "";
//Return the number of items back
return aFileInfoArray.Length ;
}

Requirements

Namespace:VFPToolkit

Class:VFPToolkit.files

Platforms:Windows98, WindowsNT4.0, WindowsMillenniumEdition, Windows2000, WindowsXPHomeEdition, WindowsXPProfessional, Windows.NETServerfamily

Assembly:VFPToolkit (in VFPToolkitNET.dll)

See Also

VFPToolkit.files Members | VFPToolkit Namespace