Use “Nome do Site do Cliente” nas Preferências da Política de Grupo

Question

No Active Directory, você pode mapear endereços IP para os Sites do Cliente.

...evocêpodemapearobjetosdePolíticadeGrupoparasites.

Oqueéótimoetudo,maseutenhoumclientequeestácrescendorapidamenteeesperatercentenasdesitesnospróximosumoudoisanos.

NossopadrãodenomenclaturaévagamentebaseadoemLOCODE,entãocadasitetem7caracteres-porexemplo,'USHQZOF'.Esseprefixoéusadoparanomeartodasasmáquinas.

Estouficandocansadodecriaramesmapolíticabásicaemtodososlugares.

Segueliteralmenteoformato:

• MapearunidadeOpara\\USHQZOFSRV01\officeshare
• Mapearimpressoraprincipalpara\\USHQZOFSRV01\copiadora

Eurealmenteadorariasepudessecriarumapolíticaondeeupossadizer:

• MapearunidadeOpara\\(nome-do-site-de-anúncio)SRV01\officeshare
• Mapearimpressoraprincipalpara\\(nome-do-site-do-anúncio)SRV01\copiadora

...eacabecomissoparasempre.

ParecequevocêpodeusarmuitasvariáveisdeambientenasPreferênciasdaPolíticadeGrupo( link ), mas não vejo nada para o nome do site do cliente.

Estou sem sorte, ou preciso ir à "velha escola" e chamar um arquivo cscript / vbscript durante o login para procurar e mapear os itens apropriados?

(editar: eu sei que pode ser feito com um arquivo VBS - eu fiz isso antes. Parece apenas ... impuro ...)

    

Answer 1

é a minha primeira vez que tento ajudar

Eu também tive esse problema e resolvi usando o comportamento defasado do DNS Priorizando sub-redes locais link

Portanto, no seu caso, basta criar um registro A para os servidores de sites fs com o nome SRV01

E, em seguida, basta criar um gpo para montar E adicionar a impressão padrão com srv01 \ E vinculá-lo a todos os sites

E quando um cliente no site solicitar srv01, o dns retornará o endereço IP correto para srv01 para esse site

    

Answer 2

Se você ainda está curioso sobre um VBS, este código irá definir o nome do site para uma variável do sistema.

'--- Get Site name ---
Set strSysinfo = CreateObject("ADSystemInfo")
strCurrentSite=strSysinfo.Sitename

'--- Write site name to system variables ---
Set objShell = CreateObject("WScript.Shell")
Set objSystemEnv = objShell.Environment("SYSTEM")
objSystemEnv("SiteName") = strCurrentSite

'--- Clean ---
Set strSysinfo = Nothing
Set objShell = Nothing
Set objSystemEnv = Nothing