Help with GetPrivateProfileString

[Malloy70]

Hello all,

I've researched numerous posts at this site and others but haven't seen this problem yet. I'm trying to read from an ini file using VB .NET but my call to GetPrivateProfileString ignores the ini filename I pass in and instead defaults to accessing "C:\WINNT\win.ini" I have performed a similar test using VB6 and it works fine. Can someone please help?

Declare Function GetPrivateProfileString Lib "kernel32" Alias "GetPrivateProfileStringA" (ByVal lpApplicationName As String, ByVal lpKeyName As String, ByVal lpDefault As String, ByVal lpReturnString As System.Text.StringBuilder, ByVal nSize As Long, ByVal lpFileName As String) As Integer
'.
'.
'.
Dim TheFileName As String
Dim numChars As Integer
Dim objResult As New System.Text.StringBuilder(256)
Dim ReturnString As String
 
'does not access "C:\WINNT\system.ini"
TheFileName = "C:\WINNT\system.ini"
numChars = GetPrivateProfileString("386enh", "woafont", "<nothing>", objResult, objResult.Capacity, TheFileName)
ReturnString = Left(objResult.ToString, numChars)
'ReturnString is "<nothing>" (should be "dosapp.FON")
 
'but setting TheFileName to blank (or explicitly to "C:\WINNT\win.ini") will result in success when getting a key value from that file
TheFileName = ""
numChars = GetPrivateProfileString("Mail", "CMCDLLNAME", "<nothing>", objResult, objResult.Capacity, TheFileName)
ReturnString = Left(objResult.ToString, numChars)
'ReturnString is "mapi.dll"