USE 点菜
DELETE all
PACK
USE 菜谱
IF NOT EOF()
COPY to diancai FIELDS 菜编号,菜名,单价 FOR 点菜标志=.t.
ENDIF
USE
USE 点菜
APPEND FROM diancai FIELDS 菜编号,菜名,单价
replace ALL 点菜.数量 WITH 1
replace ALL 点菜.金额 WITH 单价&&点菜.单价*点菜.数量
replace ALL 点菜.单号 WITH ALLTRIM(str(thisform.text1.Value))
USE
USE 帐单
APPEND FROM 点菜 FIELDS 单号,菜编号,菜名,单价,数量,金额
USE
select 4
USE 就餐
APPEND BLANK
replace 就餐.单号 WITH ALLTRIM(str(thisform.text1.Value))
replace 就餐.日期 WITH thisform.text2.Value
replace 就餐.桌号 with
replace 就餐.人数 with val()
replace 就餐.收银员 with
use
ERASE diancai
USE 菜谱
replace ALL 菜谱.点菜标志 WITH .f.
USE
MESSAGEBOX("提交成功！",48+0+0,"信息提示")
这是设计的点餐界面的提交按钮的代码，运行之后或者表单运行后放置一段时间就会出现不能访问选定表。不知道是我数据库建立的不对还是表的关联有问题。我把截图和程序都上传了，希望有大牛帮忙看看。现在就差这个窗体有问题了。

没打算建立项目，但这个问题跟项目没关系吧？

我在想是不是我数据库建立的不对，应该只有一个数据库？
就是copy to diancai这段代码是拷贝到数据库还是表里？

请问如何用表单的数据环境？我数据环境里都添加表了

谢谢。我下午上课调试的时候我是重新连接了数据库，之前用了两个数据库，分别都有表，后来把他们重新分配了舍弃了一个数据库，然后在提交按钮里的末尾加了一条clos all，然后把其他表单里定位到另一个数据库的表重新弄了一下，暂时就没问题了，我也会备份出来一份试试您给的方法看看，一直测试的是提交，取消这个还没看。