If lnCount <= 255
   <b>lcstring = [CREATE TABLE ] + alltrim(lcTxt) + [(]</b>
   For ii = 1 to lnCount
       lcstring  = lcstring + <b>trim(eval(Field(ii))</b> + [ c(20),]
       if ii = lncount then
          * strip off last ","
          lcstring = left(lcstring,len(lcstring)-1)
       endif
   EndFor
   lcstring = lcstring + [)]
   &lcstring
Endif