spondon
Goto Top

Tool zur anzeige von PC Name und IP adresse

hallo zusammen
ich arbeit viel per remote mit VNC
um dem user es einfacher zu machen möchte ich ein icon auf dem desktop setzen und mit dem sollte er dann zu PC name und ip adresse kommen ganz einfach mit doppelklick auf das symbol

ich hatte ein tool von NT aber dies funktioniert nich tmehr soo stabiel

kennt jemand von euch so was ?? BGinfo passt mir nicht

brauche wirklich nur rechnername und IP


besten dank im voraus

greetz

Content-Key: 110969

Url: https://administrator.de/contentid/110969

Printed on: April 19, 2024 at 05:04 o'clock

Member: maretz
maretz Mar 10, 2009 at 09:31:17 (UTC)
Goto Top
Kleines script als batch geschrieben:

ipconfig
pause

Alternativ z.B. mittels Dameware die PCs übernehmen, dann haben die User neben der Uhr nen Dameware-Symbol was auch beides anzeigt... (der DW-Client wird eh remote installiert - du rennst nich zu jedem PC und machst turnschuh-installation)
Member: bastla
bastla Mar 10, 2009 at 09:32:37 (UTC)
Goto Top
Hallo spondon und willkommen im Forum!

Meinst Du etwas in der Art dieses Batches:
@echo off & setlocal enabledelayedexpansion
set "Aus=%computername%"  
for /f "tokens=2 delims=:" %%i in ('ipconfig^|findstr /i "adr"') do set "Aus=!Aus!,%%i"  
echo %Aus%
pause>nul
Grüße
bastla
Member: floetenfranz
floetenfranz Mar 10, 2009 at 09:37:25 (UTC)
Goto Top
moinsen spondon

schau mal hier

http://www-pc.uni-regensburg.de/systemsw/default.htm

und suche nach "pcname.exe"

salut
Member: dog
dog Mar 10, 2009 at 09:51:39 (UTC)
Goto Top
Mal abgesehen davon, dass BGInfo eigentlich das macht, was du willst:

<html>
	<head>
		<title>Rechnerinfo</title>
		<hta:application id="computerInfo"   
		applicationname"ComputerInfo"   
		singleInstance="yes"  
		scroll="yes">  
		<style type="text/css">  
			body {
				font-family: sans-serif;
				background-color: #E8E8D8;
			}
			button {
				margin: 5px;
				padding: 5px;
			}
		</style>
	</head>
	<body>
		<h1>Rechnerinfo</h1>
		<form action="">  
		<b>Name:</b> <p id="hostname"></p>  
		<b>User:</b> <p id="username"></p>  
		<b>IP Adresse(n):</b>
		<p id="ipaddr">  
		
		</p>
		<div style="text-align: right">  
			<button name="end" value="x" onClick="window.close();">OK</button>  
		</div>
		</form>
		<script language="VBScript">  

			Set wmiService = GetObject("winmgmts:\\.\root\cimv2")  
			Set qry = wmiService.ExecQuery("SELECT * FROM Win32_ComputerSystem")  
			Set obj = qry.ItemIndex(0)
			'Rechner  
			document.getElementById("hostname").innerHTML = obj.Caption  
			document.getElementById("username").innerHTML = obj.UserName  
			
			'IPs  
			Set qry = wmiService.ExecQuery("SELECT * FROM Win32_NetworkAdapterConfiguration WHERE IPEnabled = TRUE")  
			For Each itm in qry
				For Each ip in itm.IPAddress
					Set html = document.getElementById("ipaddr")  
					html.innerHTML = html.innerHTML & ip & "<br/>"  
				Next
			Next
			
			'Fenstergröße  
			Sub Window_onLoad()
				Window.SetTimeout "window.resizeTo( 250,300);", 500  
			End Sub
	</script>
	</body>
</html>

In eine leere Textdatei einfügen und mit der Endung .hta abspeichern, fertig.

Grüße

Max
Member: spondon
spondon Mar 10, 2009 at 09:56:58 (UTC)
Goto Top
besten dank ist noch nicht genau das was ich suche aber danke

es schaut aus wie in den eigenschaften vom Arbeitsplatz -> Computername hab leider grad kein screenshot da

greetz spondon
Member: spondon
spondon Mar 10, 2009 at 10:24:05 (UTC)
Goto Top
hallo max danke erst mal

bg info ist leider nicht ganz erwünscht und manchmal auch störend user hatt immer die info und zuviel sehen soll er ja auch nicht

leider hab ich in dem script eine fehler meldung face-sad

in zeile 36

zeichen 23

Anweisungsendeerwartet

was nun ???

das ist das beste und der user sieht nur das was er sehen muss
Mitglied: 45877
45877 Mar 10, 2009 at 10:51:20 (UTC)
Goto Top
nimm 90 euro in die hand und kauf die smartcode vnc manger, dass kann dir direkt anzeigen wo wer sitzt und hat noch viele andere features wie remote software uninstall, vnc deployment, remote taskmanager usw.

s-code.com
Member: MCClane
MCClane Mar 10, 2009 at 13:03:33 (UTC)
Goto Top
Hab das Script mal minimal geändert
Der Fehler sollte jetzt weg sein.
<html>
	<head>
		<title>Rechnerinfo</title>
		<hta:application id="computerInfo"   
		applicationname"ComputerInfo"   
		singleInstance="yes"  
		scroll="yes">  
		<style type="text/css">  
			body {
				font-family: sans-serif;
				background-color: #E8E8D8;
			}
			button {
				margin: 5px;
				padding: 5px;
			}
		</style>
	</head>
	<body>
		<h1>Rechnerinfo</h1>
		<form action="">  
		<b>Name:</b> <p id="hostname"></p>  
		<b>User:</b> <p id="username"></p>  
		<b>IP Adresse(n):</b>
		<p id="ipaddr">  
		
		</p>
		<div style="text-align: right">  
			<button name="end" value="x" onClick="window.close();">OK</button>  
		</div>
		</form>
		<script language="VBScript">  

			Set wmiService = GetObject("winmgmts:\\.\root\cimv2")  
			Set qry = wmiService.ExecQuery("SELECT * FROM Win32_ComputerSystem")  
			'Set obj = qry.  
			'Rechner  
			For Each objItem in qry 
			document.getElementById("hostname").innerHTML = objItem.Caption  
			document.getElementById("username").innerHTML = objItem.UserName  
			Next
			

			
			'IPs  
			Set qry = wmiService.ExecQuery("SELECT * FROM Win32_NetworkAdapterConfiguration WHERE IPEnabled = TRUE")  
			For Each itm in qry
				For Each ip in itm.IPAddress
					Set html = document.getElementById("ipaddr")  
					html.innerHTML = html.innerHTML & ip & "<br/>"  
				Next
			Next
			
			'Fenstergröße  
			Sub Window_onLoad()
				Window.SetTimeout "window.resizeTo( 350,450);", 500  
			End Sub
	</script>
	</body>
</html>
Member: spondon
spondon Mar 10, 2009 at 13:19:51 (UTC)
Goto Top
Besten DANK euch allen

Genau so hab ich mir das vorgestellt ist echt super so

DANKE DANKE DANKE

Greetz Spondon
Member: dog
dog Mar 10, 2009 at 15:39:07 (UTC)
Goto Top
hehe MCClane, darauf bin ich auch gekommen...als ich grade nicht am Computer war ;)

Was ich trotzdem nicht verstehe ist, warum der Code auf einem Server 2008 problemlos läuft und auf einem XP Client nicht. Naja, Bills Welt...

Grüße

Max
Member: technix
technix Mar 16, 2009 at 09:49:16 (UTC)
Goto Top
Supersache, danke MCClane

auf sowas habe ich auch schon gewartet.
Ich habe nur mal die Größe für mich etwas geändert.

Läuft bei mir auf jedem MS System
Member: spondon
spondon Mar 18, 2009 at 09:55:35 (UTC)
Goto Top
hallo zusammen

mir ist was aufgefallen was mir doch noch nicht soo gefällt

die verkleinerung vom fenster ich hab die endgrösse angepasst aber der resize kpmmt ja immernoch gibt es da eine möglich keit den zu umgehen
ich bin leider noch nicht der html spezialist

besten dank

ps läuft super
Member: baiersdorf
baiersdorf Mar 24, 2009 at 12:08:11 (UTC)
Goto Top
Hallo,
das ist super, aber auf XP funktioniert es nicht, kannst du mir sagen warum nicht.
Die Seite wird korrekt angezeigt, darum tippe ich auf einen Fehler im Script, aber mit VB kenne ich mich nicht aus.
Wäre SUPER wenn du das hinbekommen würdest !!.
mfg
Karl
Member: H3LLV1574
H3LLV1574 May 13, 2009 at 12:29:20 (UTC)
Goto Top
Hallo, ich bekomme bei dem Script leider (unter XP) die Fehlermeldung

Es ist ein Laufzeitfehler aufgetreten.
Möchtne sie den Debugmodus starten?

Zeile33
Fehler: unterstützt diese Eigenschaft der Methode nicht.: 'qryItemIndex'


// Zeile 33 = Set qry = wmiService.ExecQuery("SELECT * FROM Win32_ComputerSystem")

Wäre klasse wenn jemand den Fehler finden würde.
Member: dog
dog May 13, 2009 at 16:39:44 (UTC)
Goto Top
Verwende den zweiten geposteten Code von MCClane, dann klappts auch mit den Nachbarn XP.

Grüße

Max
Member: H3LLV1574
H3LLV1574 May 18, 2009 at 08:12:05 (UTC)
Goto Top
Hm, Tatsache...

Ich hätte wetten können, ich habe das schon vorher verwendet...

Besten Dank face-smile
Member: H3LLV1574
H3LLV1574 May 18, 2009 at 08:17:51 (UTC)
Goto Top
Hat zufällig noch jemand eine Erweiterung in der Tasche, die den Benutzernamen (also nicht den Accountnamen),

Und vielleicht noch die Kapazitäten auf den Festplatten ausließt?

Dank und Gruß