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 VBScript Zeichen am Ende eines Strings löschen

Mitglied: waldgnarf

waldgnarf (Level 1) - Jetzt verbinden

13.08.2008, aktualisiert 18:56 Uhr, 17138 Aufrufe, 3 Kommentare

Hallo,
mit Mid,Left,Right ist es nur möglich Zeichen am Anfang zu löschen oder am Anfang Stellen stehen zu lassen.
Gibt es eine Möglichkeit in VBScript die letzten 4 stellen zu löschen, wenn der String Dateinamen sind die Untereinander stehen?

STRING vor Script:
test.txt
o.txt

STRING nach Script:
test
o



Gruß waldgnarf
Mitglied: AndreasHoster
13.08.2008 um 13:32 Uhr
Was ist eigentlich am Anfang stehen lassen anderes als am Schluß zu löschen (außer der Formulierung)?
left(STRING,len(STRING)-4) löscht die letzten 4 Zeichen raus, bzw. lässt alles außer den letzten 4 Zeichen stehen.
Und produziert einen Fehler, falls der String zu kurz ist.
Bitte warten ..
Mitglied: bastla
13.08.2008 um 13:34 Uhr
Hallo waldgnarf!

Wenn Du Dich auf 4 Zeichen festlegen willst, dann
01.
S = Left(S, Len(S) - 4)
Wenn Du alles ab dem letzten "." entfernen willst, dann
01.
S = Left(S, InStrRev(S, ".") - 1)
Im ersten Fall solltest Du eigentlich noch kontrollieren, ob der String mindestens 4 Zeichen lang ist, im zweiten Fall, ob es überhaupt einen "." gibt - daher jeweils verbesserter Ansatz:
01.
If Len(S) >=4 Then S = Left(S, Len(S) - 4) 
02.
If InStrRev(S, ".") > 0 Then S = Left(S, InStrRev(S, ".") - 1)
Grüße
bastla
Bitte warten ..
Mitglied: waldgnarf
13.08.2008 um 18:55 Uhr
Achso geht das hatte ich nicht gefunden, Danke schön
Bitte warten ..
Ähnliche Inhalte
VB for Applications

VBScript: Hexwert durch Zeichen (String) ersetzen

gelöst Frage von GurkenhobelVB for Applications12 Kommentare

Hallo Gemeinde, ich benötige wieder einmal Euer sachkundiges Expertenwissen. Und zwar möchte ich ältere Textdokumente (erstellt um 2000, evtl. ...

Visual Studio

VBScript Zeichenfolge aus String entfernen

gelöst Frage von Leogal0010Visual Studio1 Kommentar

Hallo, Community! Ich habe da ein Problem: Ich schreibe einen kleinen "LAN-Chat" mit VBScript/VBS. D.h. auf einem Laufwerk, auf ...

Batch & Shell

Zeichen aus einem String entfernen

gelöst Frage von JimStarBatch & Shell3 Kommentare

Guten Tag zusammen, ich möchte folgendes tun: In einer Textdatei, steht eine Zeile. Diese beinhaltet z.B.: Diese Textzeile muss ...

Batch & Shell

VBScript String als hexadezimale Zahl ausgeben

Frage von citroendsvierBatch & Shell5 Kommentare

Hallo zusammen, ich suche eine Möglichkeit, eine Variable aus VBScript als hexadezimale Zahl auszugeben. Bevor ich das ganze manuell ...

Neue Wissensbeiträge
Windows 10

USB Maus und Tastatur versagen Dienst unter Windows 10

Erfahrungsbericht von hardykopff vor 1 TagWindows 105 Kommentare

Da steht man ziemlich dumm da, wenn der PC sich wegen fehlender USB Tastatur und Maus nicht bedienen lässt. ...

Administrator.de Feedback
Update der Seite: Alles zentriert
Information von Frank vor 2 TagenAdministrator.de Feedback18 Kommentare

Hallo User, die größte Änderung von Release 5.8 ist das Zentrieren der Webseite (auf großen Bildschirmen) und ein "Welcome"-Teaser ...

Humor (lol)

WhatsApp-Nachrichten endlich auch per Bluetooth versendbar

Information von BassFishFox vor 2 TagenHumor (lol)4 Kommentare

Genau darauf habe ich gewartet! ;-) Der beliebte Messaging-Dienst WhatsApp erhält eine praktische neue Funktion: Ab dem nächsten Update ...

Google Android

Googles "Android Enterprise Recommended" für Unternehmen

Information von kgborn vor 3 TagenGoogle Android3 Kommentare

Hier eine Information, die für Administratoren und Verantwortliche in Unternehmen, die für die Beschaffung und das Rollout von Android-Geräten ...

Heiß diskutierte Inhalte
Windows Server
Standortvernetzung zu einem Strato VServer (Windows)
Frage von matzefratze81Windows Server10 Kommentare

Moin, ich komme aus einem Enterprise-Umfeld und habe den Fehler gemacht, dass ich mich auf ein kleines Unternehmen eingelassen ...

Grafikkarten & Monitore
4k EIZO Monitor, Fernseher und Splitter
Frage von LerxxeyGrafikkarten & Monitore9 Kommentare

Hallo Zusammen, vielleicht könnt ihr mir bei einem Problem helfen wo ich einfach nicht mehr weiterkomme Und zwar haben ...

Router & Routing
WRT keine Verbindung zum Web Interface
Frage von ILeonardRouter & Routing9 Kommentare

Hallo, Ich habe einen TP-Link WR841n mit wrt geflasht, das Problem ist ich kann mich mit 192.168.1.1 nicht verbinden. ...

Humor (lol)
Nerd Zeitschrift gesucht
Frage von 2SeitenHumor (lol)6 Kommentare

Hey Zusammen, Ich suche eine Zeitschrift bei der es ums technische Basteln geht. Pc zusammenschrauben, Arduino Projekte, Server Tipps ...