Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
GetIni() need enhancement
Message
 
 
To
02/12/2003 22:07:12
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Miscellaneous
Thread ID:
00855280
Message ID:
00855284
Views:
16
This message has been marked as the solution to the initial question of the thread.
Michel,

The buffer is to small. Make it bigger.
lcBuffer=SPACE(128)+CHR(0)
>I have this function to read a value from an INI file:
>
>
>* Return the value from an INI file
>* expC1 Section
>* expC2 Key
>* expC3 INI file
>FUNCTION GetIni
>PARAMETER tcSection,tcKey,tcFile
>PRIVATE lcBuffer,lnLocation
>tcFile=IIF(TYPE('tcFile')<>'C',oApp.IniFile,tcFile)
>lcBuffer=SPACE(40)+CHR(0)
>=GetPrivateProfileString(tcSection,tcKey,'',@lcBuffer,LEN(lcBuffer),tcFile)=0
>lnLocation=AT(CHR(0),lcBuffer)
>IF lnLocation>0
>   lcBuffer=SUBSTR(lcBuffer,1,lnLocation-1)
>ENDIF
>RETURN lcBuffer
>
>
>However, if I have an INI file like this:
>
>
>[WebService]
>Url=https://www.mydomain.com/OPX_MyDir/Something.asmx
>
>
>The value returned would stop at the _ sign. Anyone knows how to enhance the GetIni() function so it would grab the entire line?
--sb--
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform