$string = fillright("kixtart",10)

or:

$string = fillright("kixtart",50,"*")

hmmm ... think maybe i like padleft() and padright better ... fillleft() has too many L's in it ?

code:

---

function FillRight($string,$length,optional $filler)
 dim $i,$padding
 $fillright = ""
 if vartypename($string) <> "string"
  return
 endif
 if vartypename($length) <> "long"
  return
 else
  if $length < 0
   return
  endif
 endif
 if $filler and vartypename($filler) = "string"
   $filler = substr($filler,1,1)
 else
   $filler = " "
 endif
 for $i = 0 to $length
  $padding = $padding + $filler
 next
 $fillright = substr($string,1,$length) + substr($padding,1,$length-len($string))
endfunction

---

-Shawn

[ 22 November 2001: Message edited by: Shawn ]