表别名

Question

打开表加上 in 0
use ji_ke.dbf in 0 alias aaa
use jing_ke.dbf in 0 alias bbb
use shang_ke.dbf in 0 alias ccc
use ying_ke.dbf in 0 alias ddd
if aaa.姓名="" .or. bbb.姓名="" .or. ccc.姓名="" .or. ddd.姓名="" then
  messagebox("请先输入成绩！")
  use in aaa
  use in bbb
  use in ccc
  use in ddd

Answer 1

为什么总是出现对话框提示“文件已经打开”？有什么方法可以避免（一开始总要用use 大开文件的呀）

Answer 2

在打开之前判断一下文件打开没有!
如下实例
if !used("ji_ke")
  use ji_ke.dbf in 0 alias aaa
endif

Answer 3

1.我是新建一个报表文件再将表中字段拖进去的，但当我在程序中向该表输入内容后，报表中却无内容？
2.动态地在组合框内添加数据项时，如下程序：kecheng="啊"use ji_ke.dbf in 0 alias ji
select 0
goto top
do while(!eof()) &&每加一个数据项就要多加一个空数据项？
  
  if ji_ke.课程<>kecheng then &&不能与空比较？
      kecheng=ji_ke.课程
      thisform.Combo2.additem(kecheng)
  endif      
  
  thisform.Combo2.selectedid(1)=.t.
  skip 1
loop
enddo
use每加一个数据项就要多加一个空数据项？如何去除该空的数据项？3.在以上程序中已用"select 0",那么"ji_ke.课程"是否正确,显示"找不到别名ji_ke"？
用"ji_ke.课程",显示"找不到别名ji";
直接用"课程",显示"找不到变量课程"。 

Answer 4

大明兄,ji_ke不是表别名，提示“找不到表别名ji_ke”

Answer 5

1、在打印时将记录移动到头，GO TOP
2、我你的使用方法不好，如下我的方法：
use ji_ke.dbf in 0 alias ji
select ji
go top
i = 1
scan
  thisform.Combo2.addlistitem(alltrim(ji.课程),i,1)
  i = i+1
endscan
thisform.combo2.listindex = 1
use in ji3、你在打开表时指定了表别名，所以ji_ke已经无效，有效的应是ji