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 Verwendung von vbscript.regexp zum entfernen von AW: RE: ect. aus eMail Subject

Mitglied: Shadow88

Shadow88 (Level 1) - Jetzt verbinden

02.07.2013 um 17:42 Uhr, 1779 Aufrufe, 2 Kommentare, 1 Danke

Hallo zusammen,

bin gerade an einem VBA-Code zugange, der mir eMails aus einem Outlook Order + Unterordner automatisch inkl. hinzufügen von Datum und Uhrzeit in den Subject auf ein Laufwerk speichert.

Dazu gehört natürlich auch die Bereinigung von Sonderzeichen wie z.b. den Doppelpunkt. Das Funktioniert mit den Sonderzeichen auch einwandfrei, nun möchte ich allerdings noch die Tags wie RE:, AW:, FW:, WG: usw. im Subject entfernen. Habe das ganze auch schon mal in einem anderen Script gesehen, bei mir klappt es allerdings nicht.

Was mache ich falsch?

Der Code meiner Clean-Funktion:

01.
Function StripIllegalChar(StrInput) 
02.
 
03.
 
04.
   Dim RegX            As Object 
05.
 
06.
    Set RegX = CreateObject("vbscript.regexp") 
07.
 
08.
    RegX.IgnoreCase = True 
09.
    RegX.Global = True 
10.
    
11.
    
12.
    RegX.Pattern = "(RE:|Re:|AW:|FW:|WG:|SV:|Antwort:)" 
13.
    StripIllegalChar = RegX.Replace(StrInput, "") 
14.
    
15.
    RegX.Pattern = "[\" & Chr(34) & "\!\@\#\$\%\^\&\*\(\)\=\+\|\[\]\{\}\`\'\;\:\<\>\?\/\,]" 
16.
    StripIllegalChar = RegX.Replace(StrInput, "") 
17.
 
18.
ExitFunction: 
19.
      
20.
 Set RegX = Nothing 
21.
      
22.
End Function

Vielen Dank für Eure Unterstützung im Voraus!

Beste Grüße
Mitglied: bastla
02.07.2013 um 17:51 Uhr
Hallo Shadow88!

Wenn Du ein zweimaliges Ersetzen per "RegExp" durchführen willst, musst Du das Ergebnis zwischenspeichern - also etwa:
01.
    RegX.Pattern = "(RE:|Re:|AW:|FW:|WG:|SV:|Antwort:)" 
02.
    strTemp = RegX.Replace(StrInput, "") 
03.
    
04.
    RegX.Pattern = "[\" & Chr(34) & "\!\@\#\$\%\^\&\*\(\)\=\+\|\[\]\{\}\`\'\;\:\<\>\?\/\,]" 
05.
    StripIllegalChar = RegX.Replace(strTemp, "")
Grüße
bastla
Bitte warten ..
Mitglied: Shadow88
02.07.2013 um 18:06 Uhr
Zitat von bastla:
Hallo Shadow88!

Wenn Du ein zweimaliges Ersetzen per "RegExp" durchführen willst, musst Du das Ergebnis zwischenspeichern -
also etwa:
01.
    RegX.Pattern = "(RE:|Re:|AW:|FW:|WG:|SV:|Antwort:)" 
02.
>     strTemp = RegX.Replace(StrInput, "") 
03.
>     
04.
>     RegX.Pattern = "[\" & Chr(34) & 
05.
> "\!\@\#\$\%\^\&\*\(\)\=\+\|\[\]\{\}\`\'\;\:\<\>\?\/\,]" 
06.
>     StripIllegalChar = RegX.Replace(strTemp, "") 
07.
> 
Grüße
bastla

Hallo Bastla,

Danke für die schnelle Antwort! Klappt nun einwandfrei!

Vielen Dank!

Shadow88
Bitte warten ..
Ähnliche Inhalte
VB for Applications
Vbscript.regexp suche nach Variable
gelöst Frage von deutsch73VB for Applications5 Kommentare

Hallo, Das Script soll den Text Datum das ist ein Beispieltext durchsuchen. Wenn "das" gefunden wird sollen die nächsten ...

Peripheriegeräte
Bios Orbsmart AW-01
gelöst Frage von BadgerPeripheriegeräte

Hallo, ich habe heute eine sehr spezielle Frage: Hat zufällig wer einen Orbsmart AW-01 in Verwendung, wo ich eine ...

Exchange Server
Exchange Certificate Subject Mismatch
Frage von griddiExchange Server2 Kommentare

Hallo Community, bei einem Kunden möchte ich TLS-Verschlüsselung beim SMTP-Relay einrichten. Folgende Infos für euch: - Exchange 2007 - ...

Windows 10

Werbematerial zu Windows Produkten Aufsteller ect

gelöst Frage von zeroblue2005Windows 106 Kommentare

Hallo Zusammen, heute mal keine technische Frage, sondern mehr aus den Bereich Marketing. Wir selbst sind ein kleines Systemhaus ...

Neue Wissensbeiträge
CMS
Erneut kritische Zero-Day-Lücke in Drupal
Tipp von Reini82 vor 16 MinutenCMS

Laut einem Bericht auf t3n gibt es eine Schwere Sicherheitslücke in Drupal die auch schon ausgenutzt wird. Betroffen sind ...

Sicherheit

MikroTik-Router patchen, Schwachstelle wird ausgenutzt

Information von kgborn vor 20 StundenSicherheit

Am 23. April 2018 wurde von Mikrotik ein Security Advisory herausgegeben, welches auf eine Schwachstelle im RouterOS hinwies. Mikrotik ...

Windows 10

Microcode-Updates KB4090007, KB4091663, KB4091664, KB4091666 für Windows 10

Information von kgborn vor 1 TagWindows 101 Kommentar

Kurze Information für Administratoren von Windows 10-Systemen, die mit neueren Intel CPUs laufen. Microsoft hat zum 23. April 2018 ...

iOS
Updates für Iphone und Co
Information von sabines vor 1 TagiOS

Gestern abend ist iOS 11.3.1 erschienen, ein kleineres Update, dass einige Lücken schließt und "Lahmlegen" nach einem Display Tausch ...

Heiß diskutierte Inhalte
Batch & Shell
Powershell: Im AD nach Rechnern mit bestimmten IP-Adressen suchen
gelöst Frage von Raven42Batch & Shell36 Kommentare

Hallo zusammen, ich suche nach einer Möglichkeit nach Computern im AD zu suchen , deren IP-Adresse mit 10.11.12. beginnt. ...

C und C++
Frage1 C Programmierung-Makefile Frage2 PHP-Programmierung HTTP-Fehler 404
Frage von KatalinaC und C++34 Kommentare

Hallo, ich habe 2 Fragen, die nichts miteinander zu tun haben aber mit denen ich mich gerade beschäftige: 1. ...

Windows Server
Alten DC entfernen
Frage von smartinoWindows Server24 Kommentare

Hallo zusammen, ich habe hier eine Umgebung übernommen und erstmal einen DCDIAG gemacht. Dabei fällt auf, daß eine ganze ...

Ausbildung
Wie gelingt ein guter Einstieg in die FiSi-Ausbildung? (Umschulung)
Frage von SiAnKoAusbildung23 Kommentare

Schönen guten Tag, ich bin SiAnKo und habe seit dem 1.04.2018 eine Umschulung als FiSi angefangen. Ich möchte natürlich ...