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

VBScript - Textdatei einlesen bzw. beschreiben

Frage Entwicklung VB for Applications

Mitglied: Heyneb

Heyneb (Level 1) - Jetzt verbinden

03.08.2007, aktualisiert 05.08.2007, 23899 Aufrufe, 4 Kommentare

Hallo Leute!

Ich würde gerne ein VBScript so abändern, das anstatt bei einem Fehler eine MSGBOX erscheint, der Fehler an eine Texdatei angehängt wird.

IST-Zustand:
If err.Number <> 0 Then
MsgBox "Fehler2: " & err.Number & " " & err.Description
err.Clear

Meine Frage lautet nun, wie öffne ich eine Textdatei in VBS und beschreibe diese (ich kanns leider nur in VB)

Vielen Dank

MFG heyneb
Mitglied: AndreasHoster
03.08.2007 um 17:26 Uhr
Set fso = CreateObject("Scripting.FileSystemObject")
Set oFile = fso.OpenTextFile("C:\log.txt",8,true)
If err.Number <> 0 Then
oFile.WriteLine "Fehler2: " & err.Number & " " & err.Description
err.Clear
oFile.close
Bitte warten ..
Mitglied: Heyneb
04.08.2007 um 13:32 Uhr
Wow! das funktioniert!!

Vielen Dank du warst mir eine große Hilfe!

Gruß Heyneb
Bitte warten ..
Mitglied: Heyneb
04.08.2007 um 14:53 Uhr
Nochmal ne doofe Frage:

Wenn ich, wenn kein Fehler aufgetreten ist, auch eine meldung in die Textdatei schreiben will, welchen error-Level muss ich dann angeben?

MFG Heyneb
Bitte warten ..
Mitglied: bastla
05.08.2007 um 17:38 Uhr
Hallo ][Heyneb!

... welchen error-Level muss ich dann angeben?
Entweder auf "err.Number = 0" prüfen oder einfach so:
01.
Set fso = CreateObject("Scripting.FileSystemObject") 
02.
Set oFile = fso.OpenTextFile("C:\log.txt",8,true) 
03.
If err.Number <> 0 Then 
04.
    oFile.WriteLine "Fehler2: " & err.Number & " " & err.Description 
05.
    err.Clear 
06.
Else 
07.
    oFile.WriteLine "Kein Fehler aufgetreten."  
08.
End If 
09.
oFile.close
Grüße
bastla
Bitte warten ..
Neuester Wissensbeitrag
Windows 10

Powershell 5 BSOD

(8)

Tipp von agowa338 zum Thema Windows 10 ...

Ähnliche Inhalte
Batch & Shell
gelöst Powershell - In Textdatei suchen und ersetzen (5)

Frage von Raaja89 zum Thema Batch & Shell ...

Entwicklung
gelöst Get ip from external txt file and use in vbscript (5)

Frage von thankusomuch zum Thema Entwicklung ...

C und C++
String einlesen in Array und wieder ausgeben von hinten (4)

Frage von Protected zum Thema C und C ...

Heiß diskutierte Inhalte
Microsoft
Ordner mit LW-Buchstaben versehen und benennen (21)

Frage von Xaero1982 zum Thema Microsoft ...

Netzwerkmanagement
gelöst Anregungen, kleiner Betrieb, IT-Umgebung (18)

Frage von Unwichtig zum Thema Netzwerkmanagement ...

Windows Update
Treiberinstallation durch Windows Update läßt sich nicht verhindern (17)

Frage von liquidbase zum Thema Windows Update ...