Cita:
Iniciado por diegoc Hola a todos:
Normalmente el directorio de windows es c:\windows, pero en una PC cliente puede existir la posiblidad que sea otro path. ¿Cómo puedo referirme en forma genérica al path de windows usando VB5 por medio de código?
Gracias.
Saludos
Diego
Así:
Código:
Private Declare Function GetWindowsDirectory Lib "Kernel32" Alias "GetWindowsDirectoryA" (ByVal lpBuffer As String, ByVal nSize As Long) As Long
Function WindowsPath() As String
Dim WinDir As String
Dim Cadena As String
Dim ret As Long
Cadena = String$(300, Chr$(0))
ret = GetWindowsDirectory(Cadena, Len(Cadena))
WinDir = Left$(Cadena, ret)
WindowsPath = WinDir
End Sub
De preferencia colóquelo en un módulo, al llamar a la función WindowsPath te devolverá la ruta de Windows...