As a small mapbasic application, it could look like this:
dim s as string
dim i as integer
dim N as integer
s = "alter table xxx (drop "
N = tableinfo(xxx,TAB_INFO_NCOLS)
for i = 163 to N
s = s+columninfo(xxx,"COL"+str$(i),COL_INFO_NAME)
if i=N then
s = s+")"
else
s = s+","
end if
next
run command s
xxx is the tablename.
------------------------------
Uffe Kousgaard
CEO
ROUTEWARE
Roskilde
------------------------------