请问8楼:怎样进入关于数据库集的内容,谢谢。
版主Tiger5392先生:今天编写了自动产生月分立表的代码,但就是在&&***那一句过不去,余下的代码编得不知有否问题,请您指正,谢谢。
set talk off
set safety off
close all
ldDate1=date(2010,8,21)
ldDate2=date(2011,10,30)
lcxm='张三'
for i=year(ldDate1)to year(ldDate2)
for j=month(ldDate1)to month(ldDate2)
ctable='m'+str(year(i)*100+month(j),6) &&****
use (ctable)in 1
append blank
repl xm with Icxm
if not found
lcSQL='create table( 'm'+str(year(i)*100+month(j),6),(xm c(10)'
FOR k=1 TO 31
cComstr="ALTER IcSQL ADD COLUMN ms"+CHRTRAN(STR(k,2),' ','0')+" n(1)"
&cComstr
ENDFOR
endif
endfor
endfor