Tengo una red windows con un servidor DNS interno. Necesito mapear una ip,
esta ip tiene como nombre de maquina informatica01 pero la ip la necesito
ralacionarla a mas de un nombre de maquina, por lo que pense que en el
servidos DNS podria efectuar este mapeo pero la verdad no se si es posible
ni como hacerlo.
Es decir configurar que la ip:
192.168.1.23
sea conocida como:
informatica01 o
adquisiciones, etc
es decir si efectuo un ping desde alguna maquina a informatica01 o
adquisiones me respondiera siempre 192.168.1.23
Esperando por algun aporte,
Saludos
Te quedaría algo así
informatica01 A 192.168.1.23
adquisiciones CNAME informatica01.tudominio.com
adquisicion3 CNAME informatica01.tudominio.com
Entonces de cambiar la IPde informatica01 cambias las ip de todos
automaticamente.
--
Saludos
Rodrigo de los Santos
rodrigo at dlssolutions dot net
www.dlssolutions.net
"José Donoso" <p...@pp.com> wrote in message
news:uyo4VP7...@TK2MSFTNGP06.phx.gbl...
Pero se me presento lo siguiente: Tengo en un proveedor de hosting un sitio
www.santiago.cl y el dominio interno de mi red es santiago.cl entonces al
crear la un zona nueva zona como santiago.cl
e ingrsar la informacion del mapeo todo funciona bien dentro de la red, pero
cuando quiero y a la pagina web (www.santiago.cl) no puedo acceder a ella ni
me responde los ping, no haci los accesos a otras paginas que si quedan
funcionando (www.google.com, etc)
¿Que puede estar pasando? yo creo que se confunde el DNS con el nombre de
dominio interno (santiago.cl) y el externo.
Que puedo hacer para solucionarlo?
Atte.
JDM
"Rodrigo de los Santos" <rodrigo at dlssolutions dot net> escribió en el
mensaje news:OR7qsv7...@TK2MSFTNGP03.phx.gbl...
--
Saludos
Rodrigo de los Santos
rodrigo at dlssolutions dot net
www.dlssolutions.net
"José Donoso" <p...@pp.com> wrote in message
news:O2RjezUq...@TK2MSFTNGP06.phx.gbl...
Pero solo me queda lo siguiente y no lo he podido resolver.
Como el servidor de web es externo existe un panel de control que lo accedo
desde la url : htts://santiago.cl:8443 y al momento de acceder me ocurre lo
mismo que con el acceso a la www.santiago.cl como puedo resolver esto?.
"Rodrigo de los Santos" <rodrigo at dlssolutions dot net> escribió en el
mensaje news:uDafvyfq...@TK2MSFTNGP02.phx.gbl...
Eso funcionará solo en la máquina en donde lo configures.
--
Saludos
Rodrigo de los Santos
rodrigo at dlssolutions dot net
www.dlssolutions.net
"José Donoso" <p...@pp.com> wrote in message
news:%23BzSLvr...@TK2MSFTNGP02.phx.gbl...
Dim WSHShell
Dim wshRed
Dim infoSisAD
Dim
usuarioActual
Dim strGrupos
Dim oNet, sUser, startTime
Dim adSys
Dim colGrupos
Const GRUPO_ADQUISICIONES =
"cn=grp_adquisiciones"
Const GRUPO_ADMINISTRACION =
"cn=grp_administracion"
Const GRUPO_ASOCIAL
= "cn=grp_asocial"
Const GRUPO_BODEGA
= "cn=grp_bodega"
Const GRUPO_CONTROL
= "cn=grp_control"
Const GRUPO_FINANZAS =
"cn=grp_daf"
Const GRUPO_DESOCO =
"cn=grp_desoco"
Const GRUPO_DIDECO =
"cn=grp_dideco"
Const GRUPO_ESTRATIFICACION = "cn=grp_estratificacion"
Const GRUPO_FOMENTO = "cn=grp_fomento"
Const GRUPO_GABINETE = "cn=grp_gabinete"
Const GRUPO_INFORMATICA = "cn=grp_informatica"
Const
GRUPO_OBRAS = "cn=grp_obras"
Const
GRUPO_OMIL = "cn=grp_omil"
Const
GRUPO_ORNATO = "cn=grp_ornato"
Const
GRUPO_PATENTES_COM = "cn=grp_patentes_comerciales"
Const
GRUPO_PERMISOS_CIR = "cn=grp_permisos_circulacion"
Const
GRUPO_RECURSOS_HUMANOS = "cn=grp_personal_rrhh"
Const GRUPO_PRESUPUESTOS
= "cn=grp_presupuestos"
Const GRUPO_SAGUA_POTABLE
= "cn=grp_saguapotable"
Const GRUPO_SECPLAC
= "cn=grp_secplac"
Const GRUPO_SECRETARIA_MUN =
"cn=grp_secretaria_municipal"
Const GRUPO_SFAMILIAR
= "cn=grp_sfamiliar"
Const GRUPO_TESORERIA
= "cn=grp_tesoreria"
Const GRUPO_VIVIENDA
= "cn=grp_vivienda"
Set adSys = CreateObject("ADSystemInfo")
Set oNet
= CreateObject("WScript.Network")
'
' Obtenemos el login del usuario.
' En
Windows 9x, el usuario puede no estar todavia autentificado cuando el script
comienza a ejecutarse.
' En este caso reitera cada 1/2 segundo
'
sUser = LCase(oNet.UserName)
startTime = Now
Do While sUser = ""
if
DateDiff("s", startTime, Now) > 600 Then
Wscript.Quit
End if
Wscript.Sleep 500
sUser = oNet.UserName
Loop
msgbox sUser
'
' Mapeo de la unidad U: particular de los
usuarios
'
oNet.RemoveNetworkDrive "U:"
oNet.MapNetworkDrive "U:",
"\\ZEUS\Usuarios$\" & sUser
'
' Mapeo de la unidad común de la
organización
'
oNet.RemoveNetworkDrive "X:"
oNet.MapNetworkDrive
"X:", "\\ZEUS\Usuarios$\Comun"
Set usuarioActual = GetObject("LDAP://" &
adSys.UserName)
'
' Se agrega la unidad G: e impresoras según el
grupo asociado al usuario
'
colGrupos =
UsuarioActual.Memberof
--> La funcion no me
entrega los grupos a los que el usuario esta asignado en
AD.
'colGrupos = LCase(Join(UsuarioActual.Memberof))
if
IsEmpty(colGrupos) Then
strGrupos = ""
elseIf TypeName(colGrupos)
= "String" Then
strGrupos = LCase((colGrupos))
else
strGrupos = LCase(Join(colGrupos))
End if
msgbox colGrupos
if instr(strGrupos, GRUPO_FINANZAS ) Then
oNet.RemoveNetworkDrive "G:"
oNet.MapNetworkDrive "G:",
"\\CONTAB-GUBER\FINANZAS"
oNet.AddWindowsPrinterConnection
"\\CONTAB-GUBER\IMPRESORALASERFINANZAS"
oNet.AddWindowsPrinterConnection "\\CONTAB-GUBER\TRAZADOR"
oNet.SetDefaultPrinter "\\CONTAB-GUBER\IMPRESORALASERFINANZAS"
Elseif instr(strGrupos, GRUPO_ADMINISTRACION) Then
oNet.RemoveNetworkDrive "G:"
oNet.MapNetworkDrive "G:",
"\\CONTAB-GUBER\GRUPOS$\ADMINISTRACION"
'oNet.AddWindowsPrinterConnection
"\\CONTAB-GUBER\IMPRESORALASERINFORMATICA"
'oNet.SetDefaultPrinter
"\\SAURON\IMPRESORALASERINFORMATICA"
Elseif instr(strGrupos, GRUPO_INFORMATICA) Then
oNet.RemoveNetworkDrive "G:"
oNet.MapNetworkDrive "G:",
"\\CONTAB-GUBER\GRUPOS$\INFORMATICA"
oNet.AddWindowsPrinterConnection
"\\CONTAB-GUBER\IMPRESORALASERINFORMATICA"
oNet.SetDefaultPrinter
"\\CONTAB-GUBER\IMPRESORALASERINFORMATICA"
Elseif instr(strGrupos, GRUPO_RECURSOS_HUMANOS) Then
oNet.RemoveNetworkDrive "G:"
oNet.MapNetworkDrive "G:",
"\\CONTAB-GUBER\FINANZAS"
oNet.AddWindowsPrinterConnection
"\\CONTAB-GUBER\IMPRESORALASERRRHH"
oNet.SetDefaultPrinter
"\\CONTAB-GUBER\IMPRESORALASERRRHH"
Elseif instr(strGrupos, GRUPO_TESORERIA) Then
oNet.RemoveNetworkDrive "Z:"
oNet.MapNetworkDrive "Z:",
"\\ZEUS\Grupos$\TESORERIA"
'oNet.AddWindowsPrinterConnection
"\\TESORERIA04\TesoreriaPrinter"
'oNet.SetDefaultPrinter
"\\TESORERIA04\TesoreriaPrinter"
Elseif instr(strGrupos, GRUPO_ADQUISICIONES) Then
oNet.RemoveNetworkDrive "G:"
oNet.MapNetworkDrive "G:",
"\\CONTAB-GUBER\Grupos$\ADQUISICIONES"
oNet.AddWindowsPrinterConnection
"\\PCADQ02\hpLaserJ"
'oNet.SetDefaultPrinter "\\PCADQ02\hpLaserJ"
Elseif instr(strGrupos, GRUPO_BODEGA) Then
oNet.RemoveNetworkDrive "G:"
oNet.MapNetworkDrive "G:",
"\\CONTAB-GUBER\Grupos$\BODEGA"
Elseif instr(strGrupos, GRUPO_CONTROL) Then
oNet.RemoveNetworkDrive "G:"
oNet.MapNetworkDrive "G:",
"\\CONTAB-GUBER\Grupos$\CONTROL"
'oNet.AddWindowsPrinterConnection
"\\TESORERIA04\TesoreriaPrinter"
'oNet.SetDefaultPrinter
"\\TESORERIA04\TesoreriaPrinter"
Else
msgbox "Su Usuario no se encuentra
asignado a ningún grupo. Informe al administrador para que lo asigne al grupo
adecuado. --> " & colGrupos
End if
"pepe luna" <pe...@hotmail.com> wrote in message news:ebrPxp5q...@TK2MSFTNGP04.phx.gbl...
"Rodrigo de los Santos" <rodrigo at dlssolutions dot net> escribió en el mensaje news:70769A15-7FA8-4B51...@microsoft.com...
"José Donoso" <p...@pp.com> wrote in message news:u%23ngQkQr...@TK2MSFTNGP03.phx.gbl...