['Explicacion'] Environ()

Buenas,

Me puse a probar todas las Environ()

---------- Modo de uso ----------------

Código

msgbox ("Ruta de windows : " & environ("windir"))

Devuelve -> Ruta de windows : C:\WINDOWS
------------------------------------------

Codigo usado para probar

Código

Private Sub Form_Load()
nico2
End Sub
Function nico2()
Dim a As String
a = Environ("uno por uno jajaja")
MsgBox a
Clipboard.Clear
Clipboard.SetText (a)
End
End Function

-----------------------------

Si, yase que se podia mejorarl, o....

Código

Function nico()
Open (App.Path & "\nico.txt") For Output As #1
Print #1, Environ("ALLUSERSPROFILE") & vbCrLf
Print #1, Environ("APPDATA") & vbCrLf
Print #1, Environ("CI_HOLOS_CLI") & vbCrLf
Print #1, Environ("CLIENTNAME")
Print #1, Environ("CommonProgramFiles") & vbCrLf
Print #1, Environ("COMPUTERNAME") & vbCrLf
Print #1, Environ("ComSpec") & vbCrLf
Print #1, Environ("FP_NO_HOST_CHECK") & vbCrLf
Print #1, Environ("HOMEDRIVE") & vbCrLf
Print #1, Environ("HOMEPATH") & vbCrLf
Print #1, Environ("include") & vbCrLf
Print #1, Environ("JAVA_HOME") & vbCrLf
Print #1, Environ("lib") & vbCrLf
Print #1, Environ("LOGONSERVER") & vbCrLf
Print #1, Environ("MSDevDir") & vbCrLf
Print #1, Environ("NUMBER_OF_PROCESSORS") & vbCrLf
Print #1, Environ("OS") & vbCrLf
Print #1, Environ("Path") & vbCrLf
Print #1, Environ("PATHEXT") & vbCrLf
Print #1, Environ("PROCESSOR_ARCHITECTURE") & vbCrLf
Print #1, Environ("PROCESSOR_IDENTIFIER") & vbCrLf
Print #1, Environ("PROCESSOR_LEVEL") & vbCrLf
Print #1, Environ("PROCESSOR_REVISION") & vbCrLf
Print #1, Environ("ProgramFiles") & vbCrLf
Print #1, Environ("SESSIONNAME") & vbCrLf
Print #1, Environ("SystemDrive") & vbCrLf
Print #1, Environ("SystemRoot") & vbCrLf
Print #1, Environ("TEMP") & vbCrLf
Print #1, Environ("TMP") & vbCrLf
Print #1, Environ("USERDNSDOMAIN") & vbCrLf
Print #1, Environ("USERDOMAIN") & vbCrLf
Print #1, Environ("USERNAME") & vbCrLf
Print #1, Environ("USERPROFILE") & vbCrLf
Print #1, Environ("windir") & vbCrLf
Close #1
End
End Function

Pero aveces devolvia "" (Nada,) y me confundia. se que tendria que agregarle adelante del environ, pero no tengo ganas. uno por uno es más divertito mientras me rasco

----------------------------------------------------------

Entre [] Esta lo que devuelve.

Las existentes son:

ALLUSERSPROFILE -> Direccion 'all users' [C:\Documents and Settings\All Users]

APPDATA -> Direccion 'Datos de programa' [C:\Documents and Settings\nukje'\Datos de programa]

~~CI_HOLOS_CLI -> Ni idea~~ []

~~CLIENTNAME -> Nose [Console]~~

CommonProgramFiles -> Direccion [Archivos comunes] (C:\Archivos de programa\Archivos comunes)

COMPUTERNAME -> Nombre del PC [Mi apellido]

ComSpec -> Devuelve -> [C:\WINDOWS\system32\cmd.exe]

~~FP_NO_HOST_CHECK -> Devuelve -> [NO]~~

HOMEDRIVE -> Devuelve el disco duro en uso [ C: ]

HOMEPATH -> Devuelve -> [\Documents and Settings\nukje']

~~include -> Nose~~

~~JAVA_HOME -> Nose, no devuelve nada XD~~

~~lib -> Nose, no devuelve nada XD~~

LOGONSERVER -> [AMI me devolvio el nombre del pc con 2 \\ adelante] -> \\NOMBRE

~~MSDevDir -> Nose, no devuelve nada XD~~

NUMBER_OF_PROCESSORS -> Devuelve el numero de Procesadores, supongo [2]

OS -> Devuelve tu S.O [Ami me dice Windows_NT , pero tengo XP]

Path -> Ni idea, me da esto [ C:\WINDOWS\system32;C:\WINDOWS;C:\WINDOWS\System32\Wbem;C:\Archivos de programa\QuickTime\QTSystem\ ]

PATHEXT -> Devuelve -> [.COM;.EXE;.BAT;.CMD;.VBS;.VBE;.JS;.JSE;.WSF;.WSH]

PROCESSOR_ARCHITECTURE -> Bits del SO [x86] -> 32

PROCESSOR_IDENTIFIER -> Devuelve info te tu procesador -> [x86 Family 15 Model 4 Stepping 9, GenuineIntel]

~~PROCESSOR_LEVEL -> Ni idea~~ [15]

~~PROCESSOR_REVISION -> Ni idea XD~~ [0409]

ProgramFiles -> Direccion de Archivos De Programas [C:\Archivos de programa]

~~SESSIONNAME -> Devuelve [Console]~~ >:D

SystemDrive -> Da el disco que esta corriendo el SO [ C: ]

SystemRoot -> Carpeta Windows [C:\WINDOWS]

TEMP -> %temp%

TMP -> Me da igual que TEMP

USERDNSDOMAIN -> Ni idea, en blanco.

USERDOMAIN -> Mi apellido. (Lo tengo configurado en nombre de pc)

USERNAME -> Nombre de usuario actual.(En windows XDDDD) [nukje']

USERPROFILE -> Carpeta del usuario -> [C:\Documents and Settings\nukje']

windir -> Directorio de windows
----------------------------------------------------------------------------------------

No es mucho, espero les sirva a los nuevos, y porque no, a los viejos :xD

Saludos!

------------------------