在表单程序运行中，能否对表单的中的数据database进行动态修改？如能，应在何处编写什么代码？请高手指教。谢谢！
------解决方案--------------------------------------------------------
你只要把表打开了，数据来源想怎么搞都可以，比如:
use c:\tablename in 0 share
然后表单.init程序
thisform.combo1.RowSourceType=2
thisform.combo1.RowSource='tablename'
就可以了，你可以测试一下
------解决方案--------------------------------------------------------
- SQL code
先设一个表（如temp1.dbf）为表单的数据环境，然后在想设定另一个表（如MY.DBF）为数据环境时，直接select * from my.dbf into dbf temp1或select * from my.dbf into cursor temp1即可。加多个表：WITH THISFORM.DataEnvironment .ADDOBJECT("MyCursor1","Cursor") .MyCursor1.CursorSource="tmp.dbf" .ADDOBJECT("MyCursor2","Cursor") .MyCursor2.CursorSource="tmp1.dbf" .CloseTables() && 关闭所有的表和与数据环境相关的视图 .OpenTables() && 打开所有的表和与数据环境相关的视图 ENDWITH