Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen

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

vbsribt protokoll in text datei

Frage Microsoft

Mitglied: Belearas

Belearas (Level 1) - Jetzt verbinden

30.01.2009, aktualisiert 09:33 Uhr, 3325 Aufrufe, 2 Kommentare

Guten Morgen und einen wunderschönen guten Freitag!

Ich habe gestern mal ein bisschen gebastelt und mir ein script erstellt.

anschließend hätte ich versucht, das er mir das ergebniss in eine text datei erstellt,
ohne msg box. doch ich scheitere kläglich...

das script sieht mal so aus:


Set wmiobj = GetObject("winmgmts://localhost/root/cimv2:Win32_BIOS")
Set wshShell = WScript.CreateObject( "WScript.Shell" )
strComputerName = wshShell.ExpandEnvironmentStrings( "%COMPUTERNAME%" )
strUserName = wshShell.ExpandEnvironmentStrings( "%USERNAME%" )
WScript.Echo "Computer Name: " & strComputerName & strUserName
For each ver in wmiobj.Instances_
MsgBox ver.SerialNumber
Next


funktioniert ganz gut, nur möchte ich eben
das ganze in eine text datei erstellt haben, wie ich eine
text datei erstelle, würde ich so machen:



Dim FSO
Dim Datei
Set FSO = CreateObject("Scripting.FileSystemObject")
Set Datei = Fso.CreateTextFile("Beispiel.txt", True)
Datei.WriteLine("Erzeugte Datei, wahnsinn! nicht war?...")
Datei.Close


Doch wie kann ich nun die beiden scripts so verbinden das es
funktioniert? Hoffe ich finde ein kleines genie das mir helfen kann.


Liebe Grüße
Mitglied: AndreasHoster
30.01.2009 um 10:33 Uhr
Wenn man soweit gekommen ist, dürfte der Rest ja eigentlich auch kein Problem sein:
01.
Set FSO = CreateObject("Scripting.FileSystemObject") 
02.
Set Datei = Fso.CreateTextFile("Beispiel.txt", True) 
03.
Set wmiobj = GetObject("winmgmts://localhost/root/cimv2:Win32_BIOS") 
04.
Set wshShell = WScript.CreateObject( "WScript.Shell" ) 
05.
strComputerName = wshShell.ExpandEnvironmentStrings( "%COMPUTERNAME%" ) 
06.
strUserName = wshShell.ExpandEnvironmentStrings( "%USERNAME%" ) 
07.
Datei.WriteLine("Computer Name: " & strComputerName & strUserName) 
08.
For each ver in wmiobj.Instances_ 
09.
Datei.WriteLine(ver.SerialNumber) 
10.
Next 
11.
Datei.Close
Bitte warten ..
Mitglied: Belearas
30.01.2009 um 10:57 Uhr
ja hätte dran denken sollen... aber wenn man ansteht kommt nur mehr blödsinn raus =)

ich danke dir recht herzzlich ;)
Bitte warten ..
Ähnliche Inhalte
Neue Wissensbeiträge
Google Android

Cyanogenmod alternative Downloadquelle

(5)

Tipp von Lochkartenstanzer zum Thema Google Android ...

Batch & Shell

Batch als Dienst bei Systemstart ohne Anmeldung ausführen

(5)

Tipp von tralveller zum Thema Batch & Shell ...

Sicherheits-Tools

Sicherheitstest von Passwörtern für ganze DB-Tabellen

(1)

Tipp von gdconsult zum Thema Sicherheits-Tools ...

Heiß diskutierte Inhalte
Windows Server
gelöst Exchange HyperV Prozessorlast (19)

Frage von theoberlin zum Thema Windows Server ...

Windows Server
Server mit Netzwerkaussetzern (18)

Frage von SarekHL zum Thema Windows Server ...

LAN, WAN, Wireless
gelöst Batchdatei um einen Proxy einzustellen (14)

Frage von CrystalFlake zum Thema LAN, WAN, Wireless ...

Netzwerke
Vorschlag Hotelverkabelung (14)

Frage von FA-jka zum Thema Netzwerke ...