我有一个用剪切器编写的旧系统程序。我已成功反编译RESCUE5中的程序。反编译器已将源文件写入.udf。我已对.udf文件进行了必要的更改,现在我将重新编译该程序。什么是最好的方法。
.udf文件的示例
/* ------ Rescue5 1.11 (c) APTware 1993,94 ------
Name: ACC_CN
Params: None.
Return: Logical
Example: ACC_CN()
..........................................................................
*/
FUNCTION ACC_CN()
LOCAL cStr := SPACE(1)
LOCAL cStr1 := SPACE(5)
LOCAL nNum, nNum1, nNum2, nNum3, nNum4, nNum5, nNum6, _Def, nNum7 := ;
0, nNum8 := 1
LOCAL nNum9 := 0, nNum10 := 0, nNum11 := 0
IF MEMVAR->T_CODE[1] = " "
SCROLL(21, 3, 21, 36)
SETPOS(21, 3)
DEVPOS(21, 3)
DEVOUT(PADC("No details entered ... Hit a key", 35))
SET(17, "OFF")
__WAIT("")
SET(17, "ON")
RETURN .F.
ENDIF
GET_REM()
SCROLL(21, 3, 21, 36)
SETPOS(21, 3)
DEVPOS(21, 5)
DEVOUT("Accept details and print ?")
SETPOSBS()
AADD(GETLIST, __GET({|_bDef|IF(_bDef == NIL, cStr, cStr := _bDef)}, ;
"conf", NIL, NIL, NIL))
READMODAL(GETLIST)
MEMVAR->GETLIST := {}
答案 0 :(得分:-1)
如果要在CLIPPER中进行编译,请使用CLIPPER语言的.PRG文件。您将获得DBF格式的数据库。查找适用于SQL数据库的应用程序可能会有所帮助。这是将DBF文件导入SQL的非常简单的方法。
此外,您可以将DBF文件导入Microsoft Access。
如果环顾四周,您可能会发现Nantucket Clipper 5.2e。这是非常稳定和友好的。
您可能会找到一个叫Straley或类似名字的人的书。