Database Search

TechHome

• Build a Delimited Dir List for FileAppend File List
• Case Conversion Algorithm
• Change Old File and Path to New One
• Check File Date and Delete Older Files in Directory
• Check if File is Open or Exists
• Compare Directories
• Compute File Sizes
• Copy Files and Archive Attribute
• Copying Files from a Given Date
• Copying files XCOPY
• Count Keywords in Several Files
• Delete First Few Lines of a File
• Delete Temp Files Older Than
• Delimit a List of Files
• Display - Write File Contents to Screen
• Display Files in a Dialog with Case Sensitivity
• Fastest File Search Methods
• File Append for ASCII files with Ctrl-Zs in them
• File Counting and Item Counting Loop
• File List Sorted by Size
• File Mask Matching
• File or Item Extraction Loop
• FileCopy Error Handling
• FileOpen Error 1077 - Capture Additional Error Information
• FileVerInfo Constants
• FilVerInfo Returns Incorrect Version
• Get a List of Hidden Files in a Directory
• Get Date when File was Last Accessed Created Modified
• Get File Ownership in NT
• Get File Sizes Recursively
• Get Oldest or Newest File
• Get Users Home Directory
• Isolate Filename in a File Path
• List Files with Alternate Data Streams
• Merge Files with Binary Functions
• Parse Data from ASCII file using FileRead
• Progress Bar during FileCopy
• Read Part of File with BinaryRead
• Removing EOFs
• Renaming Files on an Incremental Basis
• Search for Upper Ascii Chars in File
• Sort a Flat File
• Tricky Bulk FileRename
• Write Various Quote Marks to Files

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

Using FileAppend for ASCII files with Ctrl-Z's

Keywords: FileAppend ASCII Ctrl Z

The FileAppend function glues files together assuming they are binary files. Some files, mostly legacy files from older DOS programs, use a Ctrl-Z ( ^Z ) character to mark the end of data. This code shows how to glue two files onto a third when it is understood that the end of data in any of them may be indicated by a Ctrl-Z

The trick involves the shortening of the defined "good data" in the target buffer when a Ctrl-Z exists in it.

Source1="xxx.txt"     ;Must exist
Source2="yyy.txt"     ;Must exist
Target="target.txt"   ;May optionally exist

CtrlZ=Num2Char(26)

Size1=FileSize(Source1)
Size2=FileSize(Source2)
SizeTarg=0
If FileExist(Target) Then SizeTarg=FileSize(Target)
SizeTarg=SizeTarg+Size1+Size2       ; Target buffer must hold all the data

BufTarg=BinaryAlloc(SizeTarg)

If FileExist(target) Then BinaryRead(BufTarg,Target)

GoSub FixTarget
BufSrc1=BinaryAlloc(Size1)
BinaryRead(BufSrc1,Source1)
BinaryCopy(BufTarg,BinaryEodGet(BufTarg),BufSrc1,0,BinaryEodGet(BufSrc1))
BinaryFree(BufSrc1)


GoSub FixTarget
BufSrc2=BinaryAlloc(Size2)
BinaryRead(BufSrc2,Source2)
BinaryCopy(BufTarg,BinaryEodGet(BufTarg),BufSrc2,0,BinaryEodGet(BufSrc2))
BinaryFree(BufSrc2)


BinaryWrite(BufTarg,Target)
BinaryFree(BufTarg)

Exit


:FixTarget
If BinaryEodGet(BufTarg) > 0                     ;Any data in buffer at all??
   x=BinaryIndexEx(BufTarg,0,CtrlZ,@FWDSCAN,1)       ;Search for CtrlZ
   If x != -1                                     
       BinaryEodSet(BufTarg,x)                   ;Shorten buffer, removing CTRLZ
   EndIf
EndIf
Return

Article ID:   W13233

Filename:   File Append for ASCII files with Ctrl-Zs in them.txt

File Created: 2004:06:15:11:05:30

Last Updated: 2004:06:15:11:05:30