Database Search

TechHome

• !!Processing Templates Files with BinaryTag - Insider Tech Notes
• Binary Sort Two Different Fields
• BinaryPeek versus BinaryPeekStr
• BinaryPoke and Bit Swapping Discussion
• BinaryRead File Line by Line
• BinaryReplace With NULL Characters
• BinarySort Considerations
• BinarySort Example
• BinaryXlate Explanation
• Convert to UTF-8
• Could Not Allocate Binary Buffer Error
• Create Zero Length Binary Value
• CryptAcquireContext Gets a Handle to a Key Container within a CSP
• Example of Keeping Track of Multiple Pointers
• Extract Line 79 from a File
• Insert a Delimiter Every 5 Chars
• Nested Binary Sort
• Offset beyond binary EOD
• Parsing Dilemma
• Remove Line from File that Contains a string
• Remove Line from File
• Replace First Instance of a String in a File
• Retrieve last line from a File
• Search and Replace Another Example
• Search and Replace in Binary Buffer
• Splitting Registry Binary Entry for Writing to INI File
• System Ini writing multiple device lines to
• System.Ini and Device lines
• Use Binary Functions to Edit INI Files
• Use BinaryRead Like FileRead
• Using BinaryPeek to Find Null 00 Character

Can't find the information you are looking for here? Then leave a message over on our WinBatch Tech Support Forum.

Remove Line from File that Contains a string

;remove line from file
;Assumes a standard ascii text file
infile = "C:\TEMP\TEST.TXT"
outfile = "C:\TEMP\TESTOUT.TXT"
searchstr = "FindMe"
inbuf = BinaryAlloc(FileSize(infile))
outbuf = BinaryAlloc(FileSize(infile))
BinaryRead(inbuf, infile)
searchptr = BinaryIndexEx(inbuf, 0, searchstr, @fwdscan, 0) ;Ignore Case
if searchptr != -1
   ;Look for end of line
	eol = BinaryIndexEx(inbuf, searchptr, @lf, @fwdscan, 0)
	eolplusone = eol+1
	;Look for beginning of line
	bol = BinaryIndexEx(inbuf, searchptr, @lf, @backscan, 0)
	bolplusone = bol+1
	if bol != -1 
	   ;This is not the first line of the file
		;copy everything up to the previous @LF to the output buffer
		BinaryCopy(outbuf, 0, inbuf, 0, bolplusone)
	endif
	outeod = BinaryEODGet(outbuf)
	if eol != -1 ;This is not the last line of the file
		;copy everything after the @LF to the output buffer
		length = BinaryEODGet(inbuf)-eolplusone 
		if length!=0 ;handle file thats last line contains @lf
		   BinaryCopy(outbuf,outeod, inbuf, eolplusone, length )
		endif
	endif	
	BinaryWrite(outbuf, outfile)
else
	Message(searchstr,"Not found in this file")
endif
BinaryFree(inbuf)
BinaryFree(outbuf) 

Article ID:   W15892

File Created: 2004:03:30:15:41:30

Last Updated: 2004:03:30:15:41:30