water Posted June 8, 2009 Posted June 8, 2009 $trimchar = 4 $inFile = "C:\xampp\htdocs\test\kennislong.txt" $outFile = "C:\xampp\htdocs\test\kennislong_trimmed.txt" If FileExists($outFile) Then FileDelete($outFile) $text = FileRead($inFile) If $text = -1 Then MsgBox(0, "Error", "Unable to open file.") Exit EndIf $text = StringStripWS($text,2) FileWrite($outFile, StringTrimRight($text, $trimchar)) StringStripWS: Strips the white space in a string. Whitespace includes Chr(9) thru Chr(13) which are HorizontalTab, LineFeed, VerticalTab, FormFeed, and CarriageReturn. Whitespace also includes the null string ( Chr(0) ) and the standard space ( Chr(32) ). My UDFs and Tutorials: Spoiler UDFs: Active Directory (NEW 2024-07-28 - Version 1.6.3.0) - Download - General Help & Support - Example Scripts - Wiki ExcelChart (2017-07-21 - Version 0.4.0.1) - Download - General Help & Support - Example Scripts OutlookEX (2021-11-16 - Version 1.7.0.0) - Download - General Help & Support - Example Scripts - Wiki OutlookEX_GUI (2021-04-13 - Version 1.4.0.0) - Download Outlook Tools (2019-07-22 - Version 0.6.0.0) - Download - General Help & Support - Wiki PowerPoint (2021-08-31 - Version 1.5.0.0) - Download - General Help & Support - Example Scripts - Wiki Task Scheduler (2022-07-28 - Version 1.6.0.1) - Download - General Help & Support - Wiki Standard UDFs: Excel - Example Scripts - Wiki Word - Wiki Tutorials: ADO - Wiki WebDriver - Wiki
idenniske Posted June 8, 2009 Author Posted June 8, 2009 $trimchar = 4 $inFile = "C:\xampp\htdocs\test\kennislong.txt" $outFile = "C:\xampp\htdocs\test\kennislong_trimmed.txt" If FileExists($outFile) Then FileDelete($outFile) $text = FileRead($inFile) If $text = -1 Then MsgBox(0, "Error", "Unable to open file.") Exit EndIf $text = StringStripWS($text,2) FileWrite($outFile, StringTrimRight($text, $trimchar)) StringStripWS: Strips the white space in a string. Whitespace includes Chr(9) thru Chr(13) which are HorizontalTab, LineFeed, VerticalTab, FormFeed, and CarriageReturn. Whitespace also includes the null string ( Chr(0) ) and the standard space ( Chr(32) ). Thans water that was what i wanted
Recommended Posts
Create an account or sign in to comment
You need to be a member in order to leave a comment
Create an account
Sign up for a new account in our community. It's easy!
Register a new accountSign in
Already have an account? Sign in here.
Sign In Now