Terminalleri Domaine Alma – Script

28.10.2007 | 23:24 Çözümler , Windows 6 Yorum


Const JOIN_DOMAIN = 1
Const ACCT_CREATE = 2
Const ACCT_DELETE = 4
Const WIN9X_UPGRADE = 16
Const DOMAIN_JOIN_IF_JOINED = 32
Const JOIN_UNSECURE = 64
Const MACHINE_PASSWORD_PASSED = 128
Const DEFERRED_SPN_SET = 256
Const INSTALL_INVOCATION = 262144

strDomain = “DomainName”
strPassword = “123456”
strUser = “administrator”

Set objNetwork = CreateObject(“WScript.Network”)
strComputer = objNetwork.ComputerName

Set objComputer = GetObject(“winmgmts:{impersonationLevel=Impersonate}!\\” & _
strComputer & “\root\cimv2:Win32_ComputerSystem.Name=’” & _
strComputer & “‘”)

ReturnValue = objComputer.JoinDomainOrWorkGroup(strDomain, _
strPassword, strDomain & “\” & strUser, NULL, _
JOIN_DOMAIN + ACCT_CREATE)
ADsPath)

Script içindeki domain name, 123456 ve administrator alanlarını kendi sistemimize göre düzenledikten sora terminaller üzerinde çalıştırıyoruz.

Yazı Etiketleri: ,

Sayfa Başı ▲

Yorumlar (6)

  1. Eren
    21.12.2007 - 00:12

    .bat olarak mı çalıştırıcaz yoksa .vbs olarak mı?

  2. Serhat
    21.12.2007 - 01:41

    vbs olarak çalıştırıyorsunuz.

  3. Ahmed
    23.01.2008 - 15:40

    Güzelce kopyalamış yapıştırmışsınız sitenize ama çalışıp çalışmadığını denediniz mi? Çalışmıyor, hatayı düzeltip yazarsanız en azından faydalı bir şekilde kullanma imkanımız olur.

  4. Serhat
    24.01.2008 - 18:29

    Merhaba Ahmed,

    Problem script içindeki tırnak işaretlerinin, benim blog editorü tarafından yanlış algılanıp, yanlış gösterilmesinden kaynaklanıyor.

    Bu konuda bir çalışma yapıyorum ve blogtaki tüm scriptleri yeniden düzenleyeceğim. Şimdilik çift tırnak işaretlerini manuel olarak değiştirip kullanırsanız, sorun çıkartmadan çalışacaktır. Hoşçakalın.

  5. ismail sen
    30.01.2008 - 12:48

    s.a. serhat abi nbr bebn ismal tanıdınmı :D
    nese abi çok güzel site yapmışın hoş meşde resimli olsa daha iyi olur yaw

  6. Salla SERHAT
    23.06.2010 - 01:21

    Güzelce kopyalamış yapıştırmışsınız sitenize ama çalışıp çalışmadığını denediniz mi? Çalışmıyor, hatayı düzeltip yazarsanız en azından faydalı bir şekilde kullanma imkanımız olur.

Yorum Ekle