Visual FoxPro 的疑难杂症

tstan135

请问在 SQL 里，如何把 record group 在一起？
不知哪里出错？每次都有 error。

SQL： GROUP BY clause is missing or invalid.

enry98

tstan135 于 13-2-2005 09:50  说 :
请问在 SQL 里，如何把 record group 在一起？
不知哪里出错？每次都有 error。

VFP 8 与 VFP 6 的SQL Group 语法已经更改了.......
你试试 =SYS(3099,70)转去与VFP 6/7 的语法看看 ，

然后  =SYS(3099,80)是 用回 VFP 8.0 ..........

tstan135

1.请问为什么在 multiuser environments 里，把 program 放在 WIN98 里 share 给一些 WIN98 与 WINXP 使用，当 program 被 WIN98 的 user 使用，在 WINXP 那儿打开就会有 error？

2.请问有没有解决的方法？

白日梦

什么 error message ？

假如是 XP 做 database server，是有 user limitation ，不能 9 个 user 以上同时 login。

tstan135

1.当 Win98 的 User 输入 data 时，WinXP SP1 的 User 打开 program 时就会有以上的 error。（Program 是放在 Win98 里，但其它的 Win98 在同一时间打开却不事。）

2.刚刚发现在 WinXP SP2 里就算没有其它 User 使用也完全打不开！


[ Last edited by tstan135 on 25-2-2005 at 10:42 AM ]

白日梦

看不到图片，麻烦再贴过。

enry98

你 试 用用看  simple file sharing.....在folder option -> view 里面 .........

你的只是 workgroup sharing , 没用 domain ？

tstan135

default 就是 simple file sharing..... 了。

我的只是 workgroup sharing , 没用 domain 。

enry98

再check 一下 你的WinXP setting ， 因为 我每天都这样 sharing ， 不论 SP1 or SP2 都不会有这样的问题.......除非 同时sharing的人数超出了10个......

tstan135

我的是从 Win98 share 给 WinXP 的。

你的应该是从 WinXP share 给其它电脑的吧？

enry98

tstan135 于 25-2-2005 11:25  说 :
我的是从 Win98 share 给 WinXP 的。

你的应该是从 WinXP share 给其它电脑的吧？

两者都有....... 如果 你换取 WinXP share 给 Win98 会有这样的问题吗 ？

tstan135

我的是从 Win98 share 给 Win98 和 WinXP 的。
如果是从 Win98 share 给 Win98 或 WinXP share 给 Win98 就没问题，而 WinXP share 给 WinXP 就不清楚了。

现在我已经解决了问题 2 了！
之前我是 create *.exe 的 shortcut 在 client 的 PC 里，所以在 WinXP SP2 里就打不开 program (Win98 或 WinXP SP1 就没问题)。现在唯有从新 build 一个 *.exe 给 WinXP SP2 使用。

可是问题 1 还没法解决!
只要有 User 正在输入资料，在 WinXP 打开 program 是就会有 error!

[ Last edited by tstan135 on 25-2-2005 at 12:09 PM ]

白日梦

试改 use \program\rental\address 成 use \program\rental\address share

tstan135

我在 form 里的 data environment 里有加进 address.dbf 而 command 是 INSERT INTO Address(rent_code, build_code) VALUES (pRent_code, thisform.combo1.Value) 这样应该怎样改？

白日梦

改VFP的设定，Tool -> Option -> Data tab -> disable [ ] Open exclusive
及在 set main 的 code 里加这行指令 Set Exclusive Off

tstan135

请问 Foxpro 可否做出以下的功能？要如何做？

Pic 01


Pic 02


当 row B get focus 时(Pic 1)，按 F2（Insert) 它就会在那儿增加一行（Pic2)。
还有其它功能象 Delete, Move ....

tstan135

白日梦 于 25-2-2005 03:47 PM  说 :
改VFP的设定，Tool -> Option -> Data tab -> disable [ ] Open exclusive
及在 set main 的 code 里加这行指令 Set Exclusive Off

试了您的方法还是不行。不知还有其它的解决的方法吗???

不知您是如何设计的???

enry98

如果 Win98 可以 用 , 这样 问题 可能在 WinXp.......

不过 ，你先 试一试 不要用data environment.........

在 form.load 里  

IF USED('address')
     SELECT address
ELSE
     SELECT 0
     USE address SHARED
ENDIF

form.destory

select address
use

------------------------------------
试用 mapping 如果可以.....

[ Last edited by enry98 on 26-2-2005 at 12:09 AM ]

白日梦

tstan135,
如果可以尽量不用 Data Environment，早前编的OK，更高级编程技术就如 enry98 所示范的。
楼上编码有更多优点
1. 可以开几份 data，比如说1个会计系统可以做几间公司的账。
   1 for A Company
   2 for B Company
   3 for C Company

2. 可以做 detection
   used() 开了没有
   on error ... use exclusive 查有无其他使用者，更详细的看回这贴楼上 itgenius 解答。

白日梦

tstan135 于 25-2-2005 04:13 PM  说 :
请问 Foxpro 可否做出以下的功能？要如何做？
当 row B get  ...

左边的 A-Z 其实就是 field / recno() 来的。
先 create table 固定了 26 个 records = Append Blank 26 次

当在 recno() = 2 按 insert button 时

nRec = Recno()
cState = State
If nRec < 26
Go nRec+1
Replace State With cState
Go nRec
Blank Field State
EndIf

[ Last edited by 白日梦 on 26-2-2005 at 08:51 AM ]