这段代码错在哪里了,各位帮帮忙!
程序代码:
set safety off public mypath mypath="" mypath=getfile("xls") if len(alltrim(mypath))=0 messagebox("你未选择任何表文件!",48,"提示") ELSE Import From (mypath) Type xls lcTmpDbfName=Juststem(Dbf()) ac=Fcount("&lcTmpDbfName") For m.lnI=1 To ac lcStr="Alter Table "+ "&lcTmpDbfName Rename Column "+Field(m.lnI)+" To "+Evaluate(Field(m.lnI)) &lcStr. ENDFOR USE bsc表 EXCLUSIVE ZAP APPEND FROM "&lcTmpDbfName" GO TOP DELETE PACK SELECT &mypath DELETE FILE (mypath).DBF messagebox("数据导入成功!",48,"提示") ENDIF 怎么总是运行到ac=Fcount("&lcTmpDbfName")提示"找不到别名",请大家帮帮忙!