Please help with: how to get a long string into 400 char length peices?

[RiCK_420_333]

I have a file which I will import to a variable, but this variable might be very long,

and I would like to make it into pieces no longer than 400 char if it is over that.

This is what I wrote, however I can't seem to get it quite right, it prints one line short, then the rest at 400, then another short one at the end. I want it to post 400 each time til it has less than 400 charsters to post then it will sho whatever is left on the last one.

an excerpt of my code with the issue:

$len = StringLen($QueueListFormated)
        $i = 0
        $bufferlength = 400
        While $len > 0
            $i = $i + 1
            If $len > $bufferlength Then
                $trim = $len - $bufferlength
                $value = StringTrimRight($QueueListFormated, $trim)
                _ArrayAdd($QueueList, $value)
                $QueueListFormated = StringTrimLeft($QueueListFormated, $bufferlength)
            Else
                $value = $QueueListFormated
                _ArrayAdd($QueueList, $value)
                $QueueListFormated = StringTrimLeft($QueueListFormated, $len)
            EndIf
            $len = StringLen($QueueListFormated)
        WEnd

If someone can either help me fix up my code a lil, or offer me a better way to go about this, I would greatly appreciate it. Thanks to all!!

[ken82m]

Try This

$len = StringLen($QueueListFormated)
$i = 0
$bufferlength = 400
While $len > 0
$i = $i + 1
If $len > $bufferlength Then
[b]  $value = StringLeft($QueueListFormated, 400)[/b]
  _ArrayAdd($QueueList, $value)
  $QueueListFormated = StringTrimLeft($QueueListFormated, $bufferlength)
Else
  $value = $QueueListFormated
  _ArrayAdd($QueueList, $value)
  $QueueListFormated = StringTrimLeft($QueueListFormated, $len)
EndIf
$len = StringLen($QueueListFormated)
WEnd

Edited October 7, 2008 by ken82m

[RiCK_420_333]

Try This

expandcollapse popup

  $value = StringLeft($QueueListFormated, 400)

Thanks for suggesting me something to try, I did try it but it didn't fiix it, still prints out a short, then long, then short, then long, 
instead of all long til the last one.  *shrug*.


            
        

        

        
            

    
        

        
            
        
    

        
    

    
    

    

                    
                    
                        
                    
                    
                

                    

                    
                    






    

    

    
        
            
                


    
        
    

                
                
                    
                        

                    
                
            
        
        
            
                


ken82m
            
            
                Posted October 7, 2008
                
            
        
    
    
        


ken82m
            
        
        
            
                
                    


    
        
    

                    
                    
                        

                    
                
            
            
                Active Members
                
            
            
                
                    
                        
                            
                                
                            
                                 586
                            
                                
                            
                        
                        
                    
                
            
            
                

            
        
    
    
        



    
        
            
                
                    
                    
                    
                    
                    
                
            
            
                
                    
                    
                        
                        
                        
                        
                        
                        
                            
                                
                            
                            
                            
                            
                            
                            
                        
                    
                
                
            
        

        
           
           Posted October 7, 2008
           
            
            
                
                
            
        
    

    

    

    
        
        
            hmmm you got me.
I tested it this way and it works like it should writing to the text file

;400 a's   400 b's   400 c's   220 d's
$QueueListFormated = "aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa

aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa

aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa

aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa

aaaabbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbb

bbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbb

bbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbb

bbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbb

bbbbcccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc

cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc

cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc

cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc

ccccdddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddd

dddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddddd

dddddddddddddddddddddddddddddddd"
$len = StringLen($QueueListFormated)
$i = 0
$bufferlength = 400
While $len > 0
$i = $i + 1
If $len > $bufferlength Then
  $value = StringLeft($QueueListFormated, $bufferlength)
  FileWriteLine("C:\Test.txt", $value)
  $QueueListFormated = StringTrimLeft($QueueListFormated, $bufferlength)
Else
  $value = $QueueListFormated
  FileWriteLine("C:\Test.txt", $value)
  $QueueListFormated = StringTrimLeft($QueueListFormated, $len)
EndIf
$len = StringLen($QueueListFormated)
WEnd

 "I believe that when we leave a place, part of it goes with us and part of us remains... Go anywhere, when it is quiet, and just listen.. After a while, you will hear the echoes of all our conversations, every thought and word we've exchanged.... Long after we are gone our voices will linger in these walls for as long as this place remains."

[smashly]

Hi,

#include <Array.au3> ;Only needed for _ArrayDisplay()

$String = FileRead(@WindowsDir & "\setuplog.txt"); just a test file that had 765145 characters
$sLen = StringLen($String)
$Offset = StringRight($String, $sLen - (Floor($sLen/400) * 400))
$aString = StringRegExp($String, "(?s)(.{400})", 3)

If Not IsArray($aString) Then   
    Dim $aString[1]
    $aString[0] = $String
Else
    ReDim $aString[Ubound($aString) + 1]
    $aString[Ubound($aString) - 1] = $Offset
EndIf   

_ArrayDisplay($aString)

Cheers

Edited October 7, 2008 by smashly