问题12-反编译VFP后遇到的一个问题,UPDATE语句中出现乱码请帮忙看一下。急!!!(50分)

  • 主题发起人 主题发起人 thlt
  • 开始时间 开始时间
T

thlt

Unregistered / Unconfirmed
GUEST, unregistred user!
我在学习反编译VFP程序时遇到一句乱码,是关于UPDATE语句的。
哪位VFP老手帮忙看一下,下面???处是什么?
UPDATE ON XXDM FROM SCHOOL ???EClause[C3] XXMC ???EClause[D1] SCHOOL.XXMC , XZ ;
???EClause[D1] SCHOOL.XZ
-------------------------- 全文如下:
LCMSG = ' 正在置换学校名称性质... '
WAIT WINDOW AT SROWS() / 2 + 1 , (SCOLS() - LEN(LCMSG)) / 2 - 15 NOCLEAR NOWAIT LCMSG
SELECT 1
USE ./xxjzgtj/teacher
GO TOP
RYBH0 = RYBH
do
WHILE .NOT. EOF()
IF RYBH > RYBH0
RYBH0 = RYBH
ENDIF
SKIP
ENDDO
RYBH0 = ALLTRIM(RYBH0)
SELECT 2
USE ./xxjzgtj/school
INDEX ON XXDM TO ./xxjzgtj/code0
SELECT 1
INDEX ON XXDM TO ./xxjzgtj/code
I = 1
do
WHILE I < VAL(RYBH0) + 1
II = STR(I / VAL(RYBH0) * 100,3) + '%'
lcMsg = " 正在置换学校名称性质[&ii.]... "
WAIT WINDOW AT SROWS() / 2 + 1 , (SCOLS() - LEN(LCMSG)) / 2 - 15 NOCLEAR NOWAIT LCMSG
SET FILTER TO RYBH = RIGHT('000' - ALLTRIM(STR(I)),3)
UPDATE ON XXDM FROM SCHOOL ???EClause[C3] XXMC ???EClause[D1] SCHOOL.XXMC , XZ ;
???EClause[D1] SCHOOL.XZ
I = I + 1
ENDDO
WAIT CLEAR
= MESSAGEBOX(' 已将全部教职工代码库按学校代码库进行名称性质置换! ','提示信息')
CLOSE ALL
THISFORM.RELEASE
---------------------- 这里先谢过了!我剩余的分不多,请见谅!
 
不清楚啊,第一个应该是 set ,后面俩应该是 = 吧
估计就是用
EClause[D1] SCHOOL.XXMC 替换原来的学校名称,
EClause[D1] SCHOOL.XZ 替换原来的学校性质吧,
 
VFP没玩快十年了,不好意思,实在搞不清楚??是何物
 
不好意思, 帮不了你:)
 
to 来如风:
谢谢,我照你说的进行修改后,VFP还是提示:“命令中含有不能识别的短语或关键字”
 
SET FILTER TO RYBH = RIGHT('000', 3-LEN(ALLTRIM(STR(I))) + RYBH ;
UPDATE ON XXDM FROM SCHOOL set EClause[C3]=SCHOOL.XXMC,EClause[D1]= SCHOOL.XZ
 
不好意思,VFP不懂
 
:“命令中含有不能识别的短语或关键字”
============
一部分一部分的删,直到不出现错误提示,可以定位错误
 
后退
顶部