foxpro中可以多用户操作同一表如何处理

[XGHUNJ]

foxpro中可以实现多用户操作同一表吗？

[wwwwb]

set excl off
程序开头加入

[十豆三]

可以，共享打开，不过这方面程序要小心设计。

请参考：
Visual Foxpro中的多用户及数据缓冲问题
http://dev.csdn.net/article/64169.shtm

[XGHUNJ]

可以说的详细点吗，在程序过程中还需要加其他的语句吗？
我现在是：
1.一个程序安装在不同用户机上，用户需更新服务器上的同一个表。
2.使用的是VFP6.0

[everyday1212]

楼主是在做C/S吗？

[XGHUNJ]

是啊，想写多个用户操作同一个表的程序

[孤影No1]

处理这个问题有两种方法：
第一种是在查看时，只用共享方式打开表，只有在写入记录或更改记录时，用记录锁定或表锁定，再行更新表。
使用这种方法，要注意及时解锁。
第二种方法，用的是表缓冲。

[xuzuning]

很简单
你这是文件服务方式，而不是4楼说的C/S方式
需要注意的是：
1、要将服务器上表所在目录映射成本地驱动器，因为通常是有访问口令的
2、要关闭数据表的独占方式
3、要启用行缓存
至于应用程序，与单用户程序没有任何差别

贴一个我在用的（你根据情况自己一修改一下）
ConnectLAN.prg

*** 连接网络,并设置共享方式
PARAMETERS nMode

IF TYPE('根目录') = 'U' THEN
	PUBLIC 根目录, 工作目录, 项目代码
ENDIF

Declare Integer WinExec in kernel32 string, integer 
DO CASE
	CASE EMPTY(nMode)
		SET DEFAULT TO (JUSTPATH(SYS(16)) + "\")
		IF DIRECTORY('z:\') = .T. THEN
			WinExec ([net use z: \\10.34.137.11\通用问卷 jszx /user:admin /delete], 0) &&需修改，见net命令的帮助
		ENDIF
	OTHERWISE
		WinExec ([net use Z: \\10.34.137.11\通用问卷 jszx /user:admin], 0) &&需修改，见net命令的帮助

		IF DIRECTORY('z:\') = .F. THEN
			WAIT WINDOW '正在连接服务器' TO s TIMEOUT 1
		ENDIF

		IF DIRECTORY('z:\') = .F. THEN
			WAIT WINDOW '连接失败' NOWAIT
			根目录 = SYS(5) + CURDIR()
		ELSE
			根目录 = 'z:\'
			连线方式 = '[在线]'
		ENDIF
		SET DEFAULT TO &根目录
		SET EXCLUSIVE OFF
		SET MULTILOCKS ON
		CURSORSETPROP("buffering", 3, 0)
ENDCASE

主程序中
ConnectLAN(1) &&连接服务器
DO FROM 表单
READ EVENTS
ConnectLAN() &&关闭连接

[XGHUNJ]

谢谢各位~
在用户A一直打开程序，其他用户还可以打开程序吗？

[xuzuning]

当然可以

[XGHUNJ]

3Q，
在请教个问题~我从控件集中拖了一个表格（grid），运行后无法修改表中的内容，提示控件只读，可是readonly我已经设置成.f.了啊？