URGENTE!! AYUDA!! Como abrir de la misma forma que app.path un archivo en windows/system

Juan PabloOO
10 de Febrero del 2005
Por favor, necesitaria saber como abrir, de la misma manera que con app.path , un archivo que guardo en windows/system.
El tema es que cuando lo empaqueto, establezco que cuando se instale se grabe en el directorio del sistema. Pero si es windows 98, el mismo es windows/system , mientras que si es XP es windows/system32
Entonces, lo que necesito es que de la misma manera que el programita instala en el dir sistema por defecto de windows, es ver si se puede abrir de la misma manera.
gracias!!

en?
10 de Febrero del 2005
De la API-Guide:

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

Private Sub Form_Load()
'KPD-Team 1998
'URL: http://www.allapi.net/
'E-Mail: [email protected]
Dim sSave As String, Ret As Long
'Create a buffer
sSave = Space(255)
'Get the system directory
Ret = GetSystemDirectory(sSave, 255)
'Remove all unnecessary chr$(0)'s
sSave = Left$(sSave, Ret)
'Show the windows directory
MsgBox "Windows System directory: " + sSave
End Sub

__
Un saludo.