Public Function GetPrivateProfileInt( _ ByVal vKeyName As Variant _ , Optional ByVal vDefault As Variant _ , Optional ByVal vSectionName As Variant _ , Optional ByVal vFileName As Variant _ ) As Variant
Assuming Dim estWAPI As New WindowsAPI estWAPI.ProfileFileName = "Sample.Ini" estWAPI.ProfileSectionName = "Sample Section" estWAPI.WritePrivateProfileInt("Major Version", 5) = True for example estWAPI.GetPrivateProfileInt("Major Version") = 5See also:
GetPrivateProfileString Function GetPrivateProfileSection Function WritePrivateProfileString Function GetProfileInt Function ProfileFileName Property ProfileSectionName Property GetPrivateProfileInt Function (Windows API) GetSetting Function (Visual Basic 4.0+; not directly related)vKeyName: Name of the numeric setting whose value is to be retrieved. Function returns Null if vKeyName is Null or cannot be fixed-up to a String.
Copyright 1996-1999 Entisoft
Entisoft Tools is a trademark of Entisoft.