Home All Groups Group Topic Archive Search About

GetPrivateProfileString problem!

Author
29 Jun 2006 12:55 PM
Domac
I need to read some configuration data from .ini file located at
Application.StartupPath location .


Here is code snippet :

Public Declare Unicode Function GetPrivateProfileString Lib "kernel32" Alias
"GetPrivateProfileStringW" (ByVal lpApplicationName As String, ByVal
lpKeyName As String, ByVal lpDefault As String, ByVal lpReturnedString As
String, ByVal nSize As Int32, ByVal lpFileName As String) As Int32


Dim File As String = Application.StartupPath & "\" & filename


x = GetPrivateProfileString("Configuration", "DestDbPath", "Error",
tmpString, Len(tmpString), filename)

What is the problem; Everything works fine on XP platform but when I deploy
application on Win98 platform i have problem.



File path is correct, file is correctly formated :

[Configuration]
DestDbPath = \\tlos-server\podaci\nucleus2002\Baza-proizvodnja.mdb
SourceXMLPath = c:\tlos\izdatnice
SkladIDs = 655
OJ = 11
User = Domagoj Kovaèeviæ


GetPrivateProfileString function doesn't retreive data for requested
parameter but fills string buffer passed as reference with "Error"
What to do??????


Is my API declaration correct , I have "googled" and realized that there is
problem with GetPrivateProfileString function , what is solution????
Win98 platform is mandatory!
I got about 25 stations with Windows 98!


Thanks a lot!

Author
29 Jun 2006 6:18 PM
GhostInAK
Hello Domac,

http://msdn.microsoft.com/library/default.asp?url=/library/en-us/sysinfo/base/getprivateprofilestring.asp
Do your stations have the Microsoft Layer for Unicode installed?

-Boo

Show quoteHide quote
> I need to read some configuration data from .ini file located at
> Application.StartupPath location .
>
> Here is code snippet :
>
> Public Declare Unicode Function GetPrivateProfileString Lib "kernel32"
> Alias "GetPrivateProfileStringW" (ByVal lpApplicationName As String,
> ByVal lpKeyName As String, ByVal lpDefault As String, ByVal
> lpReturnedString As String, ByVal nSize As Int32, ByVal lpFileName As
> String) As Int32
>
> Dim File As String = Application.StartupPath & "\" & filename
>
> x = GetPrivateProfileString("Configuration", "DestDbPath", "Error",
> tmpString, Len(tmpString), filename)
>
> What is the problem; Everything works fine on XP platform but when I
> deploy application on Win98 platform i have problem.
>
> File path is correct, file is correctly formated :
>
> [Configuration]
> DestDbPath = \\tlos-server\podaci\nucleus2002\Baza-proizvodnja.mdb
> SourceXMLPath = c:\tlos\izdatnice
> SkladIDs = 655
> OJ = 11
> User = Domagoj Kovaèeviæ
> GetPrivateProfileString function doesn't retreive data for requested
> parameter but fills string buffer passed as reference with "Error"
> What to do??????
>
> Is my API declaration correct , I have "googled" and realized that
> there is
> problem with GetPrivateProfileString function , what is solution????
> Win98 platform is mandatory!
> I got about 25 stations with Windows 98!
> Thanks a lot!
>