Top-Themen

Aktuelle Themen (A bis Z)

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit

gelöst VBS-Script für NSLOOKUP - DNS-Server

Mitglied: skid

skid (Level 1) - Jetzt verbinden

25.11.2011 um 09:47 Uhr, 6206 Aufrufe, 2 Kommentare

Moin,

ich habe ein VBS-Script mit dem ich per NSLOOKUP Servernamen auflösen kann.
Funktioniert auch ganz gut !

Nun will ich aber einen bestimmten DNS-Server abfragen. Habe es aber nicht geschafft einen bestimmten mitzugeben....

Vielleicht könnt ihr mir da weiterhelfen, wie ich es schaffe einen bestimmten DNS-Server abzufragen !?

Hier das Script dass ich für die NSLOOKUP Abfrage benutze:

01.
 
02.
WScript.Echo DNSLookup("SERVER01")   ' Server / Client der per NSLOOKUP aufgelöst werden soll 
03.
 
04.
Function DNSLookup(sAlias) 
05.
   
06.
  Set objWSHShell = WScript.CreateObject("WScript.Shell") 
07.
  Set objShell = CreateObject("Shell.Application") 
08.
   
09.
   
10.
  If len(sAlias) = 0 Then 
11.
    DNSLookup = "Failed." 
12.
    Exit Function 
13.
  End If 
14.
 
15.
  Const OpenAsDefault = -2 
16.
  Const FailIfNotExist = 0 
17.
  Const ForReading = 1 
18.
 
19.
  Set oShell = CreateObject("WScript.Shell") 
20.
  Set oFSO = CreateObject("Scripting.FileSystemObject") 
21.
  sTemp = oShell.ExpandEnvironmentStrings("%TEMP%") 
22.
  sTempFile = sTemp & "\" & oFSO.GetTempName 
23.
 
24.
  oShell.Run "%comspec% /c nslookup " & sAlias & ">" & sTempFile, 0, True 
25.
 
26.
  Set fFile = oFSO.OpenTextFile(sTempFile, ForReading, FailIfNotExist, OpenAsDefault) 
27.
  sResults = fFile.ReadAll 
28.
  fFile.Close 
29.
  oFSO.DeleteFile (sTempFile) 
30.
 
31.
  aIP = Split(sResults, "Address:") 
32.
 
33.
  If UBound(aIP) < 2 Then 
34.
    DNSLookup = "Failed." 
35.
     
36.
   Else 
37.
    aIPTemp = Split(aIP(2), Chr(13)) 
38.
    DNSLookup = trim(aIPTemp(0)) 
39.
  End If 
40.
     
41.
  Set oShell = Nothing 
42.
  Set oFSO = Nothing 
43.
End Function 
44.
 
SKID
Mitglied: Logan000
25.11.2011 um 10:07 Uhr
Moin moin

Nun will ich aber einen bestimmten DNS-Server abfragen.
Habe es aber nicht geschafft einen bestimmten mitzugeben....

Su kannst doch über den Parameter -Server einen bestimmten DNS server angeben.
Schau mal hier.

Gruß L.
Bitte warten ..
Mitglied: skid
25.11.2011 um 10:34 Uhr
Moin,

ja stimmt, danke......oh man.....da hab ich wohl etwas zu kompliziert gedacht....

Gruß
SKID
Bitte warten ..
Ähnliche Inhalte
Windows Server
DNS Server Nslookup UnKnown Server
Frage von Huibuh2010Windows Server5 Kommentare

Hallo Admins, ich habe ein Umzug von 2008 auf 2016 vom DC vorgenommen. Alles verlief Reibungslos, der neue DC ...

DNS

Namensauflösung nslookup funktioniert nicht - W2k8R2 DNS

gelöst Frage von ConfettiDNS3 Kommentare

Hallo, ich habe folgendes Problem, ich habe Windows Server 2008 R2 unter VMware Workstation 11 mit der Netzwerkeinstellung „Bridged“ ...

Entwicklung

VBS Script startet nicht auf Server 2012

gelöst Frage von shooanEntwicklung6 Kommentare

Guten Morgen zusammen, ich habe ein kleines Problemchen. Bin gerade dabei einen neuen Druckserver auf zu setzen, der auch ...

VB for Applications

VBS Script kann Prgramm nicht starten

gelöst Frage von C.BoernerVB for Applications15 Kommentare

Hallo ihr Admins, Ich habe folgendes Scenarios ein Programm läuft im Hintergrund (Drivve-Image) das übergibt Werte an ein VBS ...

Neue Wissensbeiträge
Router & Routing

Olle Fritzbox 7270 mit VPN und SIP-Telefonie hinter O2 Homebox 6641 als "Modem"

Erfahrungsbericht von the-buccaneer vor 3 StundenRouter & Routing

Nun war es soweit: Auch O2 hat mich mit VOIP zwangsbeglückt. Heute am Privatanschluss, in 2 Wochen ist das ...

Sicherheit

Ungepatchte Remote Code Execution-Lücke in LG NAS

Information von kgborn vor 16 StundenSicherheit

Nutzt wer LG NAS-Einheiten? In den NAS-Einheiten der LG Network Storage-Einheiten gibt es eine sehr unschöne Schwachstelle, die einen ...

Windows Update

Neue Version KB4099950 NIC Einstellungen gehen verloren

Information von sabines vor 21 StundenWindows Update2 Kommentare

Es ist eine neue Version des KB4099950 verfügbar, die das Problem mit den verlorenen Netzwerkeinstellungen lösen soll. Das Datum ...

Microsoft Office

MS Office 2019 ohne OneNote - OneNote App speichert nur in Cloud

Information von Deepsys vor 1 TagMicrosoft Office5 Kommentare

Microsoft zeigt deutlich wohin alles bei Ihnen geht, OneNote 2019 wird es nicht mehr geben, und die Windows 10 ...

Heiß diskutierte Inhalte
Festplatten, SSD, Raid
Server SSD: NVMe PCIe 3.0 RAID?
Frage von bouneeFestplatten, SSD, Raid15 Kommentare

Hallo liebe Admins, mir stellt sich gerade die Frage, ob ein neuer Server mit SSD NVMe PCIe 3.0 Sinn ...

Sonstige Systeme
Wie Normenkataloge im Unternehmen bereit stellen?
Frage von MuzzepuckelSonstige Systeme14 Kommentare

Hallo Kollegen, ich lese schon lange hier mit, nun mein ersrer Beitrag, bzw. Frage. :-) Wir benötigen für unsere ...

Windows 10
Windows 10 Startmenü-Einstellungen Systemweit festlegen
Frage von flotautWindows 1013 Kommentare

Guten Morgen liebe Admins, wir möchten bei uns am Lehrstuhl demnächst auf Windows 10 umsteigen. Wir installieren unsere PC's ...

LAN, WAN, Wireless
OpenVPN Client Fehlermeldungen
Frage von chris84LAN, WAN, Wireless12 Kommentare

Hallo Zusammen, wir nutzen seit kurzem einen neuen Router und den OpenVPN Client. Die VPN Verbindung klappt; allerdings kommen ...