Environment variables in Visual Basic (Vb5E, W7/64)

Hallo NG!
I need to open PathA = "%USERPROFILE%\Documents\paper\pp.csv"
Open PathA for Output as #FiNu
But it does not work that easy. Any ideas? Thanks!
Vy 73! Helge
--
Helge, DJ1WM

On Mon, 25 Jun 2012 17:10:18 +0200, Helge <w4h@nurfuerspam.de> wrote:

>Hallo NG!
>I need to open PathA = "%USERPROFILE%\Documents\paper\pp.csv"
> Open PathA for Output as #FiNu
>But it does not work that easy. Any ideas? Thanks!
>Vy 73! Helge

The "%" delimiters are for use with shells. At the command line, in
batch files, Windows Shells (Explorer) etc.

In VB use the Environ() function without the delimiters.
Dim sRoot As String : sRoot = Environ("userprofile")
PathA = PathA = sRoot & "\Documents\paper\pp.csv"

-ralph

ralph wrote:

> On Mon, 25 Jun 2012 17:10:18 +0200, Helge <w4h@nurfuerspam.de> wrote:
>
>>Hallo NG!
>>I need to open PathA = "%USERPROFILE%\Documents\paper\pp.csv"
>> Open PathA for Output as #FiNu
>>But it does not work that easy. Any ideas? Thanks!
>
> The "%" delimiters are for use with shells. At the command line, in
> batch files, Windows Shells (Explorer) etc.
>
> In VB use the Environ() function without the delimiters.
> Dim sRoot As String : sRoot = Environ("userprofile")
> PathA = PathA = sRoot & "\Documents\paper\pp.csv"

No real need for the extra string:

PathA = Environ("userprofile") & "\Documents\paper\pp.csv"

--
Step right up. I've got plenty of death for everybody.

Am 25.06.2012, 20:17 Uhr, schrieb Auric__ <not.my.real@email.address>:

> ralph wrote:
>
>> On Mon, 25 Jun 2012 17:10:18 +0200, Helge <w4h@nurfuerspam.de> wrote:
>>
>>> Hallo NG!
>>> I need to open PathA = "%USERPROFILE%\Documents\paper\pp.csv"
>>> Open PathA for Output as #FiNu
>>> But it does not work that easy. Any ideas? Thanks!
>>
>> The "%" delimiters are for use with shells. At the command line, in
>> batch files, Windows Shells (Explorer) etc.
>>
>> In VB use the Environ() function without the delimiters.
>> Dim sRoot As String : sRoot = Environ("userprofile")
>> PathA = PathA = sRoot & "\Documents\paper\pp.csv"
>
> No real need for the extra string:
>
> PathA = Environ("userprofile") & "\Documents\paper\pp.csv"
>

Thanks! That's it.
--
Helge, DJ1WM