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

VB Computername in den Zwischenspeicher

Frage Entwicklung VB for Applications

Mitglied: Auggiman

Auggiman (Level 1) - Jetzt verbinden

02.03.2010 um 09:34 Uhr, 7925 Aufrufe, 13 Kommentare

Leider bin ich nicht wirklich in VB drin, brauche dennoch Hilfe

Hallo zusammen,

ich muss zwecks Dateispeichern in einem Makro den Computernamen per VB auslesen und in den Zwischenspeicher legen. Leider brachte die Suche bei Google nicht den gewünschten Erfolg. Auch habe ich mich noch nicht wirklich mit VB auseinandergesetzt.

Vielleicht kann mir jemand helfen oder sogar das Script dafür hier benennen.

Vielen Dank schonmal.

Grüße
Stefan
Mitglied: HStumpf
02.03.2010 um 11:25 Uhr
Hallo,

was soll zum Einsatz kommen
VBScript:
On Error Resume Next
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * from Win32_ComputerSystem",,48)
For Each objItem in colItems
Wscript.Echo "Name: " & objItem.Name
Next
--> Beippiel zeigt den Namen in der Console an

oder

soll Visual Basic zum Einsatz kommen?

Horst
Bitte warten ..
Mitglied: Auggiman
02.03.2010 um 11:29 Uhr
Hallo Horst,

vielen Dank erstmal für die Antwort.

Es soll Visual Basic zum Einsatz kommen.

Grüße
Stefan
Bitte warten ..
Mitglied: HStumpf
02.03.2010 um 12:00 Uhr
Hallo,

Dim strCNAME As String=System.Windows.Forms.SystemInformation.ComputerName()
oder
Dim strCNAME As String=System.Environment.MachineName()
Bitte warten ..
Mitglied: Auggiman
02.03.2010 um 12:58 Uhr
Hallo nochmal,

er macht immer wieder Probleme in VBA. Bei Dim strCNAME sagt er unerwarteter Fehler. Nehme ich den ersten Code kommt die Meldung: Keine Objektreferenz.

Was mache ich falsch?

Grüße
Stefan
Bitte warten ..
Mitglied: HStumpf
02.03.2010 um 14:40 Uhr
Hallo,

bei VBA siehts anders aus:

Dim strcname As String
strcname = Environ("COMPUTERNAME")

Horst
Bitte warten ..
Mitglied: Auggiman
02.03.2010 um 21:42 Uhr
Hallo Horst,

vielen Dank. Das funktioniert soweit. Allerdings wird der Computername bis jetzt nicht im Zwischenspeicher abgelegt. Mir fehlt noch was, richtig?

Grüße
Stefan
Bitte warten ..
Mitglied: Biber
02.03.2010 um 22:15 Uhr
Moin Auggiman,

Mir fehlt noch was, richtig?
Vielleicht ein vernünftiger Prozess?

Warum um Gates willen willst du denn
  • über ein VBA-Geraffel, das normalerweise nur im Kontext einer Excel/Outlook/Word/Sonstwas-Office-Appz leben kann
  • eine Umgebungsvariable auslesen
  • und die in den Zwischenspeicher legen???

Bitte schreib jezz' nich, diese Brünette aus der Buchhaltung möchte gern ein Excel-Makro "Computernamen zum Copy&Paste bereitlegen" haben, damit sie das dann mit Strg-C in ihre Outlook-Signatur einfügen kann...

Wie sieht denn der ganze Plan aus, der zu diesem "Upps, wofür dieses Werkzeug wohl gut sein mag?"-Durchprobieren geführt hat?

Grüße
Biber
Bitte warten ..
Mitglied: Auggiman
02.03.2010 um 22:23 Uhr
Hallo,

nix Buchhaltung, eher Kundenseitig

Ich nutze ein Makrotool, welches Userabläufe interaktiv ablaufen lässt. Dazu gehört u.a. das Öffnen einer Word Datei und dann wieder das Speichern unter einem anderen Namen. Da ich hier eine Trennung für mehrere Rechner benötige, bin ich leider auf das Auslesen aus dem Zwischenspeicher als Variable beschränkt. Sprich, ich kann den Dateinamen zwar eingeben lassen, möchte aber den Rechnernamen mit einfügen. Allerdings kann das Makrotool auch VBA und somit könnte ich den Computernamen in den Zwischenspeicher einlesen und ihn später wieder herausholen.

Dafür die ganze Aktion.

Und Durchprobieren ist nicht. Soweit läuft alles, nur das Auslesen klemmt eben. ich nutze auch aktiv google und Co., aber irgendwo hakt noch was.

Grüße
Stefan
Bitte warten ..
Mitglied: HStumpf
02.03.2010 um 22:41 Uhr
Hallo,

Zwischenspeicher = Zwischenablage?

http://www.online-excel.de/excel/singsel_vba.php?f=28

Horst
Bitte warten ..
Mitglied: Biber
03.03.2010 um 10:53 Uhr
Moin Auggiman,

Ich nutze ein Makrotool, welches Userabläufe interaktiv ablaufen lässt. Dazu gehört u.a. das Öffnen einer Word Datei und dann wieder das Speichern unter einem anderen Namen. Da ich hier eine Trennung für mehrere Rechner benötige, bin ich leider auf das Auslesen aus dem Zwischenspeicher als Variable beschränkt. Sprich, ich kann den Dateinamen zwar eingeben lassen, möchte aber den Rechnernamen mit einfügen. Allerdings kann das Makrotool auch VBA und somit könnte ich den Computernamen in den Zwischenspeicher einlesen und ihn später wieder heraushole
Das hört sich für mich alles nicht so an, als würde sich irgendjemand die Patentrechte darauf sichern lassen wollen oder auch nur, dass jemand dieses Gestrunkele als Arbeitsprobe der eigenen Skriptfähigkeiten bei einem Bewerbungsgespräch vorlegen möchte.

Gibt es den keinen anderen Weg? Welcher Namenskonvention folgen denn diese bearbeiteten/geclonten Worddateien sonst so?
Ich meine, wenn sich der "neue" Name wenigstens vollständig generieren ließe, z.B. als Kombination von Alt-Dateiname+Username oder Rechnername+Datum oder ähnlich, dann könntest du wenigtens dieses (wie du es scherzhaft genannt hast) "interaktive" Strg-C-Drücken wegschmelzen.

Und zum andern... wenn du die "Dateinamen durch Unterbringen von %computername% im Namen" kenntlich machen willst, dann liegt der Verdacht nahe, dass diese Dateien noch ein weiteres Mal halbautomatisiert weiterverarbeitet werden müssen.

Das hört sich alles irgendwie eher gewachsen als gesund an.

Magst du mal den ganzen Prozess skizzieren?

P.S. Ist wirklich nicht so, dass ich keinen Spass am Skripten hätte.
Aber ich finde, es sollte nicht alles umgesetzt werden, was technisch im Bereich der Runtertippselbaren liegt.

Grüße
Biber
Bitte warten ..
Mitglied: Auggiman
03.03.2010 um 11:22 Uhr
Hallo Biber, Hallo Horst,

nachdem ich bis spät nachts noch gebastelt habe und Eure Hilfe sehr schätze, aber auch Eure Bedenken, habe ich mit nochmals genauer mit dem Tool auseinandergesetzt und nutze nun die Funkton, das er mir den Hostnamen aus einer Datei ausliest, die ich vorher festlege und als Variable festlegt.

Ich wollte es eigentlich schon vollautomatisieren, aber wenn es nicht funktioniert, dann lasse ich es doch. So habe ich doch noch ein wenig zu tun.

Evtl. aber gibt es die Möglichkeit, unter Win XP mit Office 2003 Prof. ein kleines VBS zu erstellen, welches mir den Hostnamen ausliest und in eine Textdatei namens hostname.txt schreibt.

Wäre dies möglich?

Nochmals vielen, vielen Dank für Eure Mühe(n).

Grüße
Stefan
Bitte warten ..
Mitglied: Biber
03.03.2010 um 13:00 Uhr
Moin Auggiman,

nochmals zum Verständnis:
  • eine Umgebungsvariable %COMPUTERNAME% gibt es ohnehin auf jedem Windowsrechner.
  • der Inhalt dieser Variablen %COMPUTERNAME% lässt sich auch (unter einigen Windowsversionen) mit einer Winz-Exe namens hostname.exe abfragen als "Hostname".
  • Und natürlich könnte auch dieser Hostnam/computername in eine einzeilige Textdatei geschrieben werden. Macht ihn aber weder aktueller noch verkässlicher noch konsistenter.

--> Wenn und weil es eine immer vorhandene, immer aktuelle Umgebungsvariable %COMPUTERNAME% gibt, deshalb sollte diese auch als Umgebungsvariable aktuell abgefragt werden... OHNE Zwischenclonerei als Textdatei, ini-Dateiwert oder selbst benamste Variable "myComputername".
--> bedeutet: wenn du diesen ver###te Variableninhaltet Environ("COMPUTERNAME") in einem VBA-Makro brauchst, dann genau wie in dieser Zeile angegeben.
---> Wenn Du den Rechnernamen erst dann brauchst, wenn du die Word-Dateien weiterverarbeitest, dann ergänze die Info erst dann (beim Abholen/Kopieren/Lesen der "Rechner"spezifischen Datei-Version.

Grüße
Biber
Bitte warten ..
Mitglied: Auggiman
22.04.2010 um 09:48 Uhr
Hallo zusammen,

ich habe nun eine andere Möglichkeit genutzt:

echo %computername% >C:\hostname.txt

Das hat mir geholfen.

Dennoch vielen Dank nochmals für Eure Unterstützung.

Grüße
Stefan
Bitte warten ..
Ähnliche Inhalte
Windows Netzwerk
Anmeldedaten von Domänencontrollern zwischenspeichern bei Netzwerkzugriff
Frage von EinsteinJuniorWindows Netzwerk4 Kommentare

Hallo, in einem kleinen Büro das per VPN an unseren Hauptsitz angebunden ist, steht ein Windows 8.1 PC der ...

TK-Netze & Geräte
Durchsage für ELA zwischenspeichern - Asterisk?
gelöst Frage von BirdyBTK-Netze & Geräte3 Kommentare

Hallo zusammen, ich habe mal wieder eine kleine Herausforderung zu bestreiten und hoffe, dass vielleicht jemand schonmal soetwas umgesetzt ...

Windows Tools
Zwischenspeicher TS RDP-Verbindung
Frage von YannoschWindows Tools3 Kommentare

Hallo zusammen, Die Eckdaten vorneweg: Win 2k8R2 TS-Server Durch Gruppenrichtlinie verwaltet allerdings keine GR zum Clip/Zwischenspeichern Ist durch ca. ...

Windows Server
ComputerNAme und DNSeintrag
gelöst Frage von homermgWindows Server3 Kommentare

Hey Leute, ich kann mich nicht ganz erinnern aber gab es nicht ein Problem wenn ein Domänenrechner xy123 heißt ...

Neue Wissensbeiträge
Batch & Shell

Open Object Rexx: Eine mittlerweile fast vergessene Skriptsprache aus dem Mainframebereich

Information von Penny.Cilin vor 8 StundenBatch & Shell8 Kommentare

Ich kann mich noch sehr gut an diese Skriptsprache erinnern und nutze diese auch heute ab und an noch. ...

Humor (lol)

"gimme gimme gimme": Automatischer Test stolpert über Easter Egg im man-Tool

Information von Penny.Cilin vor 10 StundenHumor (lol)6 Kommentare

Interessant, was man so alles als Easter Egg implementiert. Ist schon wieder Ostern? "gimme gimme gimme": Automatischer Test stolpert ...

MikroTik RouterOS

Mikrotik - Lets Encrypt Zertifikate mit MetaROUTER Instanz auf dem Router erzeugen

Anleitung von colinardo vor 1 TagMikroTik RouterOS8 Kommentare

Einleitung Folgende Anleitung ist aus der Lage heraus entstanden das ein Kunde auf seinem Mikrotik sein Hotspot Captive Portal ...

Sicherheit

Sicherheitslücke in HP-Druckern - Firmware-Updates stehen bereit

Information von BassFishFox vor 1 TagSicherheit1 Kommentar

Ein weiterer Grund, dass Drucker keinerlei Verbindung nach "auswaerts" haben sollen. Unter Verwendung spezieller Malware können Angreifer aus der ...

Heiß diskutierte Inhalte
Windows Server
RDP macht Server schneller???
Frage von JaniDJWindows Server17 Kommentare

Hallo Community, wir betrieben seit geraumer Zeit diverse virtuelle Maschinen und Server mit Windows Server 2012. Leider haben wir ...

Windows 10
Windows 10 dunkler Bildschirm nach Umfallen
Frage von AkcentWindows 1015 Kommentare

Hallo, habe hier einen Windows 10 Rechner der von einem User umgefallen wurde (Beine übers Knie, an den PC ...

Windows 10
Bitlocker nach Verschlüsselung nicht mehr aufrufbar!
gelöst Frage von alexlazaWindows 1013 Kommentare

Hallo, ich besitze ein HP ZBook 17 G4 mit einem Windows 10 Pro Betriebssystem. Bei diesem Problem handelt sich, ...

Batch & Shell
Neuste Datei via PowerShell kopieren
gelöst Frage von kaiuwe28Batch & Shell11 Kommentare

Hallo zusammen, ich hatte mir mit Hilfe der Suche im Forum einen kleinen Code von colinardo rausgesucht und versucht ...