Come faccio riconoscere %SystemRoot% a VB6 ?

[pnx]

Ciao ragazzi!

Se do il comando

OPEN "%systemroot%\system32\xxx.ini" FOR INPUT AS #NF

VisualBasic mi restituisce errore!

Come posso fare ad individuare la cartella di sistema?

[xegallo]

Originariamente inviato da pnx
[b]Ciao ragazzi!

Se do il comando

OPEN "%systemroot%\system32\xxx.ini" FOR INPUT AS #NF

VisualBasic mi restituisce errore!

Come posso fare ad individuare la cartella di sistema?

Private Declare Function GetSystemDirectory Lib "kernel32" Alias "GetSystemDirectoryA" (ByVal lpBuffer As String, ByVal nSize As Long) As Long

[pnx]

E come la trasferisco in una variabile String?

[xegallo]

Originariamente inviato da xegallo
[b]

Private Declare Function GetSystemDirectory Lib "kernel32" Alias "GetSystemDirectoryA" (ByVal lpBuffer As String, ByVal nSize As Long) As Long

dim return as string
dim isize as integer
isize = 255
return = space$(isize)
isize = GetSystemDirectory (return,isize)
return = left$(return,isize)

[pnx]

Grazie mille