Hola a todos
Como casi todos saben, active directory es el centro de authenticacion de las empresas, asiq todas las aplicaciones que contruyan los desarrolladores, las deberian authenticar en Active Directory y no en bases de datos con cuentas de usuarios, que muchas veces no son las mismas que los usuarios usan para entrar en sus computadores.

En el siguiente ejemplo mostrare una sencilla plicacion en ASP.net que se autentica con mi dominio Test.com

Tendremos 2 Textboxs.. uno para el nombre de usuarios “TextBox1” y otro para el password “TextBox2”

using System.DirectoryServices;
string Server = "Server2003";
string ruta = "LDAP://"+Server+"/DC=test,DC=com";
DirectoryEntry raiz = new DirectoryEntry();
raiz.Path = ruta;
raiz.AuthenticationType = AuthenticationTypes.Secure;
raiz.Username = TextBox1.Text;
raiz.Password = TextBox2.Text;

string filtro = "sAMAccountName";
string strSearch = filtro + "=" + TextBox1.Text;
DirectorySearcher dsSystem = new DirectorySearcher(raiz, strSearch);
dsSystem.SearchScope = SearchScope.Subtree;
try
{
    SearchResult srSystem = dsSystem.FindOne();
    Response.Write("Autenticacion Correcta");
}
catch (Exception error)
{
    Response.Write(error.Message);
}

Windows XP Professional 08/04/2014 –> Extended Support Retired

Windows XP Professional x64 Edition08/04/2014 –> Extended Support Retired

Toda la Info Aqui

http://support.microsoft.com/lifecycle/Default.aspx?LN=en-gb&x=16&y=12&C2=1173

En este articulo veremos como crear un Raid-1 por software con la utilidad de linea de comando DiskPart

Primero que todo veremos el estado actual de nuestros discos duros (3)

 
Tenemos el Disco 0 Basico donde tenemos instalado el sistema operativo.
Tenemos el Disco 1 y 2 en estado basico y sin asignar

Estamos a la linea de comando cmd y ejecutamos el comando diskpart

deberia quedar algo asi:

DISKPART>_

Ejecutamos el comando list disk para ver el estado de nuestros discos

DISKPART>list disk

Disco ###   Estado      Tamaño   Libre    Din  Gpt
---------   ----------  -------  -------  ---  ---
Disco 0     En pantall    64 GB  8033 KB
Disco 1     En pantall    16 GB    16 GB
Disco 2     En pantall    16 GB    16 GB

Ejecutamos el comando select disk 1 para seleccionar el disco con el cual trabajaremos

DISKPART>select disk 1

  Disco ###   Estado      Tamaño   Libre    Din  Gpt
  ---------   ----------  -------  -------  ---  ---
  Disco 0     En pantall    64 GB  8033 KB
* Disco 1     En pantall    16 GB    16 GB
  Disco 2     En pantall    16 GB    16 GB

Ahora ejecutamos el comando convert dynamic para convertirlo a dinamico y asi poder trabajar con volumenes en ves de particiones y poder crear el raid

DISKPART>convert dynamic
En el administrador de discos deberiamos ver asi

Ahora creamos un volumen simple con todo el espacio del volumen

DISKPART>create volume simple

Ahora hacemos casi lo mismo pero con el disco 2

DISKPART>select disk 2
DISKPART>convert dynamic

Ahora nos cambiamos al disco 1 para comenzar la creacion del Raid

DISKPART>select disk 1
DISKPART>list volume 
  Volumen ### Ltr  Etiqueta     Fs     Tipo        Tamaño   Estado     Info
  ----------- ---  -----------  -----  ----------  -------  ---------  --------
    Vol. 0     D   KRMSVOL_ES_  UDF    DVD-ROM     1891 MB  Correcto
    Vol. 1     C                NTFS   Partición     64 GB  Correcto   Sistema
  * Vol. 2                      RAW    Simple        16 GB  Correcto

Seleccionamos el volumen en el cual queremos trabajar
DISKPART>select volume 2

y porfin agregamos el segundo disco para crear nuestro RAID 1

DISKPART>add disk 2

Listamos los volumenes para ver informacion

DISKPART>list volume 

Volumen ### Ltr  Etiqueta     Fs     Tipo        Tamaño   Estado     Info
----------- ---  -----------  -----  ----------  -------  ---------  --------
   Vol. 0     D   KRMSVOL_ES_  UDF    DVD-ROM     1891 MB  Correcto
   Vol. 1     C                NTFS   Partición     64 GB  Correcto   Sistema
* Vol. 2                      RAW    Reflejar i    16 GB  Correcto

y finalmente le agregamos la letra

DISKPART>assign letter f:

Salimos de Diskpart con el comando exit y le damos formato a nuestro RAID

format F: /FS:NTFS

Eso es todo salu2 a todos

Me encomendaron que automáticamente algunos usuarios de la red, se les creara una unidad de disco en un File Server, donde puedan respaldar sus archivos de ofimática mas importantes.

El tema es que tenia que ser automático y con un icono en el escritorio :)

En el file Server 192.168.222.10 creamos la carpeta C:\Usuarios y la compartimos como Usuarios$, para que quede oculta.
Dentro de esta carpeta creamos la carpeta de nuestro usuario Juan Pérez (jperez)

¿Por que crear las carpetas a mano y no automáticas?
Al crear sub carpetas, los permisos de la carpeta raiz se propagan

Entonces echamos a correr los scripts que tanto me gustan y lo ponemos en el inicio de sesion

-----------Monta Carpetas.VBS----------------------------------------------------------

Set objFSO = CreateObject("Scripting.FileSystemObject")
Set oShell = CreateObject( "WScript.Shell" )
Set objShell = CreateObject("Shell.Application")
Set objNetwork = CreateObject("WScript.Network")
Set oDrives = objNetwork.EnumNetworkDrives
' Variable de ambiente del Usuario
Usuario=oShell.ExpandEnvironmentStrings("%username%")
'Letra del Disco Duro
strDriveLetter = "R:"
' Etiqueta del Disco Duro
strNewName="Respaldos 1GB"
'Servidor
srtServer="\\192.168.222.10\Usuarios$\"
'Creamos un siclo for para saber si la letra que queremos montar ya esta montad, de ser asi, la desmontamos y montamos la nuestra :)
Sub Mapeo(Drive,Share)
    For i = 0 to oDrives.Count -1 Step 2
         if LCase(Drive) = LCase(oDrives.Item(i)) then
            if not LCase(Share) = LCase(oDrives.Item(i+1)) then
                  ' Desconectamos la Unidad
                    objNetwork.RemoveNetworkDrive Drive, true, true
            Else
               Exit Sub
            End if
          End if
    Next
   'Conectamos nuestra unidad de RED
    objNetwork.MapNetworkDrive strDriveLetter, srtServer&Usuario
   'Asignamos la Etiqueta del Disco
    objShell.NameSpace(strDriveLetter).Self.Name = strNewName
End Sub
'llamamos a la funcion con la letra y la rura de la carpeta
Mapeo strDriveLetter,srtServer&Usuario
' Ahora crearemos un icono el escritorio del Usuario para redirigirlo a la unidad de red
strDesktop = oShell.SpecialFolders("Desktop")
'le ponemos nombre el link
set oShellLink = oShell.CreateShortcut(strDesktop & "\Respaldos.lnk")
'Seleccionamos el destino de link, que en nuestro caso sera la letra de la unidad
oShellLink.TargetPath = strDriveLetter
oShellLink.WindowStyle = 1
'Descripcion del icono
oShellLink.Description = "Disco De Respaldo"
'Figurita
oShellLink.IconLocation = "SHELL32.dll, 8"
oShellLink.WorkingDirectory = strDriveLetter
oShellLink.Save 

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

oShellLink.IconLocation = "SHELL32.dll, 8" , el Shell32.dll es el archivo donde están los iconos de sistema y el que puse yo esta en la posición 8, recuerden que se empieza de cero de arriba a abajo

Así debería quedar dentro de Mi PC

y así debería quedar el icono en el escritorio

Para los que han instalado el server 2008, se habrán dado cuenta que a diferencia del 2003 el firewall deja casi todo cerrado, lo cual es bueno/malo, malo, ya que no podemos hacer ping a nuestro server para saber si esta en línea

Como solucionamos esto ?
Tenemos 2 opciones

1. CLI("Command line interface") YEHAAA
   netsh firewall set icmpsetting 8             Lo cual habilita las peticiones de echo
   netsh firewall set icmpsetting 8 disable  Lo cual deshabilita las peticiones de echo
   
2. GUI("Graphical User Interface")
   Inicio
   Ejecutar
   WF.msc
   Vamos a las regla de entrada
   Click derecho sobre Reglas de entrada
   Filtrar por Grupo
   Filtrar por Compartir archivos e impresoras
   
   Habilitamos la regla
   

Eso no+