connexió client windows

# 1. Configuració de dades
$LdapServer = "192.168.0.156"
$UserDN = "cn=admin,dc=equipo2,dc=es"
$Password = "Admin123"

# 2. Carregar llibreria .NET
Add-Type -AssemblyName System.DirectoryServices.Protocols

try {
    # 3. Establir connexió
    $conn = New-Object System.DirectoryServices.Protocols.LdapConnection "${LdapServer}:389"
    $conn.SessionOptions.ProtocolVersion = 3
    $conn.AuthType = [System.DirectoryServices.Protocols.AuthType]::Basic
    
    # 4. Bind (Autenticació)
    $credential = New-Object System.Net.NetworkCredential($UserDN, $Password)
    $conn.Bind($credential)

    Write-Host "`n✅ CONNEXIÓ EXITOSA!" -ForegroundColor Green
    Write-Host "S'ha establert el lligam (bind) amb el servidor Debian.`n" -ForegroundColor Gray
    
    # 5. Prova de lectura: Llistar el contingut de l'arrel
    Write-Host "Cercant objectes a dc=equipo2,dc=es..."
    $request = New-Object System.DirectoryServices.Protocols.SearchRequest("dc=equipo2,dc=es", "(objectClass=*)", "Subtree")
    $response = $conn.SendRequest($request)
    
    Write-Host "S'han trobat $($response.Entries.Count) objectes a la base de dades." -ForegroundColor Cyan
    foreach ($entry in $response.Entries) {
        Write-Host " -> DN: $($entry.DistinguishedName)"
    }

} catch {
    Write-Host "`n❌ ERROR: $($_.Exception.Message)" -ForegroundColor Red
} finally {
    if ($conn) { $conn.Dispose() }
}