回 帖 发 新 帖 刷新版面

主题:请教

为什么我的发布目录在哪个目录下,我用安装包安装程序在选择安装目录时就必须选择和发布目录同一级的目录里呢?比如我的发布目录建在D:里则安装也只能放在D:下的一个目录里.否则提示附件错误.我的主程序这样的:
CLEAR
CLEAR ALL
*——避免多次运行程序
*——声明API函数“FindWindow”
DECLARE Integer FindWindow IN USER32.DLL String lpClassName,String lpWindowName
lpWindowName="小当家管理系统"
*——寻找窗口标题
IF .NOT. FindWindow(0,lpWindowName)==0 
   =MESSAGEBOX("程序已经运行了",48,"小当家管理系统")
   QUIT 
ENDIF
*——设置窗口标题
_Screen.Caption=lpWindowName
*——系统环境设置
set cons off            &&  禁止在窗口中显示
SET DEBUG OFF            &&    禁止在运行时调试程序
SET ESCAPE OFF            &&  禁止运行的程序在按ESC键被中断
SET TALK OFF            &&  关闭命令显示
SET SAFETY OFF          &&  覆盖时不要确认
SET STAT BAR OFF        &&  将状态栏关闭
SET SYSMENU OFF         &&  可关掉VFP系统菜单区域
SET SYSMENU TO          &&  关闭系统菜单
SET CENTURY ON          &&  显示四位年代
SET DATE YMD            &&  按照年月日的次序显示日
public cpath
cPath=sys(5)+sys(2003)
set default to (cPath)
public cUser
do form Forms\login
*——进入事件处理
READ EVENTS
*——退出事件处理后的执行的操作
QUIT

回复列表 (共3个回复)

沙发

路径设置错误!!!

板凳

CLEAR
CLEAR ALL
*——避免多次运行程序
*——声明API函数“FindWindow”
DECLARE Integer FindWindow IN USER32.DLL String lpClassName,String lpWindowName
lpWindowName="小当家管理系统"
*——寻找窗口标题
IF .NOT. FindWindow(0,lpWindowName)==0 
   =MESSAGEBOX("程序已经运行了",48,"小当家管理系统")
   QUIT 
ENDIF
*——设置窗口标题
_Screen.Caption=lpWindowName
*——系统环境设置
set cons off            &&  禁止在窗口中显示
SET DEBUG OFF            &&    禁止在运行时调试程序
SET ESCAPE OFF            &&  禁止运行的程序在按ESC键被中断
SET TALK OFF            &&  关闭命令显示
SET SAFETY OFF          &&  覆盖时不要确认
SET STAT BAR OFF        &&  将状态栏关闭
SET SYSMENU OFF         &&  可关掉VFP系统菜单区域
SET SYSMENU TO          &&  关闭系统菜单
SET CENTURY ON          &&  显示四位年代
SET DATE YMD            &&  按照年月日的次序显示日
public cpath,cUser
[color=FF0000]cpath=JUSTPATH(SYS(16,1))
CD (cpath)[/color]
do form Forms\login
*——进入事件处理
READ EVENTS
*——退出事件处理后的执行的操作
QUIT

3 楼

[quote]我在D盘下建了一个用于装发布给客户文件的目录,然后将family目录里的三个数据库文件复制到这个发布目录中,连遍后的.exe文件也保存到该目录里,同时将DATA目录里的表相关文件和VF6.0的三个库文件(VFP6R.DLL、VFP6RCHS.DLL、VFP6RENU.DLL)全部复制到该目录里,然后运行VF6.0,选择工具里的向导里的安装,[/quote]

将 [color=FF0000]DATA目录[/color],和 DATA目录中的,数据表文件(保持在DATA目录中),
全部复制到 D:\family 目录里。

我来回复

您尚未登录,请登录后再回复。点此登录或注册