🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: comp.lang.basic.visual
Article #314

Re: HELP !!! ... How i can read INI files in VB4 ....

#314
From: Spike Anarchy
Date: Thu, 19 Jun 1997 00:00
32 lines
2308 bytes
For reading from WIN.INI, use these functions:

Declare Function GetProfileInt Lib "kernel32" Alias "GetProfileIntA" (ByVal
lpAppName As String, ByVal lpKeyName As String, ByVal nDefault As Long) As
Long

Declare Function GetProfileSection Lib "kernel32" Alias
"GetProfileSectionA" (ByVal lpAppName As String, ByVal lpReturnedString As
String, ByVal nSize As Long) As Long

Declare Function GetProfileString Lib "kernel32" Alias "GetProfileStringA"
(ByVal lpAppName As String, ByVal lpKeyName As String, ByVal lpDefault As
String, ByVal lpReturnedString As String, ByVal nSize As Long) As Long

and for reading from any other INI files use these:

Declare Function GetPrivateProfileInt Lib "kernel32" Alias
"GetPrivateProfileIntA" (ByVal lpApplicationName As String, ByVal lpKeyName
As String, ByVal nDefault As Long, ByVal lpFileName As String) As Long

Declare Function GetPrivateProfileSection Lib "kernel32" Alias
"GetPrivateProfileSectionA" (ByVal lpAppName As String, ByVal
lpReturnedString As String, ByVal nSize As Long, ByVal lpFileName As
String) As Long

Declare Function GetPrivateProfileString Lib "kernel32" Alias
"GetPrivateProfileStringA" (ByVal lpApplicationName As String, ByVal
lpKeyName As Any, ByVal lpDefault As String, ByVal lpReturnedString As
String, ByVal nSize As Long, ByVal lpFileName As String) As Long
------------------------------------------------------------------
hope that helped.
Technical Details
Message-ID: <01bc7cc6$ad80cec0$31bcaec7@104374.3343.compuserve.com>
Path: arc1-ca.pugleaf.net!unknown!not-for-mail
References: <01bc4bb2$2eb66ae0$62011bc8@tiburon> <01bc706e$cd6086e0$054805c3@jose-alarcon> <339eb74e.15163474@news.flash.net>

Show Full Headers
Complete Article Headers
X-Google-Language: ENGLISH,ASCII-7-bit
X-Google-Thread: 1053fc,124bc44337efa593
X-Google-Attributes: gid1053fc,public
X-Google-Thread: f5f6f,124bc44337efa593
X-Google-Attributes: gidf5f6f,public
X-Google-Thread: 110e3b,124bc44337efa593
X-Google-Attributes: gid110e3b,public
X-Google-Thread: f645d,124bc44337efa593
X-Google-Attributes: gidf645d,public
From: "Spike Anarchy" <Spike_Anarchy@Juno.com>
Subject: Re: HELP !!! ... How i can read INI files in VB4 ....
Date: 1997/06/19
Message-ID: <01bc7cc6$ad80cec0$31bcaec7@104374.3343.compuserve.com>
X-Deja-AN: 252325872
References: <01bc4bb2$2eb66ae0$62011bc8@tiburon> <01bc706e$cd6086e0$054805c3@jose-alarcon> <339eb74e.15163474@news.flash.net>
Organization: none
Newsgroups: comp.lang.basic.visual,comp.lang.basic.visual.3rdparty,comp.lang.basic.visual.misc,es.comp.lenguajes.visual-basic