home *** CD-ROM | disk | FTP | other *** search
/ Visual Basic 6 Unleashed…sional Reference Edition) / Visual_Basic_6_Unleashed_Professional_Reference_Edition_Sams_1999.iso / Source / CHAP29 / 309X3201.TXT < prev    next >
Encoding:
Text File  |  1998-06-21  |  1.0 KB  |  20 lines
  1.  
  2. Public Declare Function GetPrivateProfileSection Lib "kernel32" _
  3.     Alias "GetPrivateProfileSectionA" (ByVal lpAppName As String, _
  4.     ByVal lpReturnedString As String, ByVal nSize As Long, _
  5.     ByVal lpFileName As String) As Long
  6. Public Declare Function GetPrivateProfileString Lib "kernel32" _
  7.     Alias "GetPrivateProfileStringA" (ByVal lpApplicationName _
  8.     As String,ByVal lpKeyName As Any, ByVal lpDefault As String, _
  9.     ByVal lpReturnedString As String, ByVal nSize As Long, _
  10.     ByVal lpFileName As String) As Long
  11. Public Declare Function WritePrivateProfileSection Lib "kernel32" _
  12.     Alias "WritePrivateProfileSectionA" (ByVal lpAppName As String, _
  13.     ByVal lpString As String, ByVal lpFileName As String) As Long
  14. Public Declare Function WritePrivateProfileString Lib "kernel32" _
  15.     Alias "WritePrivateProfileStringA" (ByVal lpApplicationName _
  16.     As String, ByVal lpKeyName As Any, ByVal lpString As Any, _
  17.     ByVal lpFileName As String) As Long
  18.  
  19. Public gstrKeyValue As String * 256
  20.