break up string by 255 characters

[ralphtrent]

Hi
If I want to take a string that is large lets say 410 characters. A database char field can only hold 255. how can I split up the string by 255. The split command will not work because you need a dealimiter. I do not want to go by a dealimiter but by number of charaters. Any help is greatly apprecitated.

 

[mitchadams]

Try this, I haven't tested it...
(if you have any syntax problems see

http://www.devguru.com)

function split(mystring){
var string1 = mystring;
var string2;

for (i=0;i=255;i++){
	string2 = string2 + string1.charAt(i);
}
}

this could be modified to get the next 255 chars aswell if you want...

let me know how you get on.

Mitch

 

[mitchadams]

ignore that I was in Javascript mode...

i'll get back to you.

 

[mitchadams]

Left(string1, 255)

 

[ralphtrent]

left will not work because that will only get the first 255 char from left, i would then need to use mid(string, 256, 510) and then do some programming to see if I need another mid or if I can just do a right. Im am trying to avoid as much coding as possible.

 

[dbMark]

I don't see how you can do it without a loop. By the way, some database fields are limited to 254, not 255 characters. Here is a sample loop copying it into arrays which are simpler to dimension:

Dim i, myarray(50)

For i = 1 to 50
    ' 50 * 254 = 12,700 chars max in string
    ' increase or decrease array size as desired
    myarray(i)=""  'init all as empty string
Next

For i=1 to len(mystring) Step 254
    myarray(i)=mid(mystring,i,i+253)
Next

 

[ralphtrent]

I keep getting Typy Mismatch on this line:
myarray(i)="" 'init all as empty String
any idea?

 

[ralphtrent]

I got past that error, but this does not work at all. I keep getting out of subscript error. I pu i-1 in the step 254 step and that does not work.

 

[PHV]

i = 0
While Len(mystring) > 0
  myarray(i) = Left(mystring, 254)
  i = i + 1
  mystring = Mid(mystring , 255)
Wend

Hope This Help
PH.