Visual Foxpro：在.exe文件中提供命令行工具

Question

我将一个相当大的应用程序作为.exe文件App55.exe与适当的.dll文件一起分发。我想为系统管理员（现在我）提供执行命令行指令的工具，例如VALIDATE DATABASE，或者专门打开其中一个表并重新索引，最好是在这个应用程序中。 这是可能的 - 不包括专门打开所有表格和c的代码。有没有人可能有一个实用工具。

谢谢

Answer 1

我确实将它作为一个实用程序，但该实用程序也有一些我不想透露的代码:(我不能因为这个原因而给出项目，但是你很简单应该这样做：

使用具有Editbox和命令按钮的表单创建项目。 Editbox（比如edtCode）是你编写代码的地方。单击该按钮时，将编译并运行您的代码。这是点击代码：

Local lcCode, lcTemp
lcCODE = thisform.edtCode.Value
lcTemp = FORCEPATH(SYS(2015)+'.prg',SYS(2023))
STRTOFILE(m.lcSQL,m.lctemp)
COMPILE (m.lcTemp)
* on error do myErrHandler with ...
DO (m.lcTemp)
* on error
Erase (m.lcTemp)

PS：这适用于VFP6 SP3及更高版本。

Answer 2

这是我在程序菜单中使用的内容： CodeBlock是一个运行时FoxPro解释器。它允许您执行驻留在备注字段，文件或字符串中的未编译代码块，即使在运行时环境中也是如此。

http://www.cycla.com/software/codeblock.htm

Answer 3

我们在创建假命令窗口（EditBox）时执行类似操作，并在按下Enter时在KeyPress方法中执行处理。如果选择了一个文本补丁，我们执行它;否则，执行输入的最后一行。我们使用EXECSCRIPT（）来执行实际操作。逻辑还有一点（例如，当不在'last'行时处理Enter键等等），但这是一般的想法。