标题:VFP命令,单独使用没问题,但是放入程序就出错!
只看楼主
蓝点
Rank: 1
等 级:新手上路
帖 子:2
专家分:0
注 册:2009-10-10
结帖率:100%
已结贴  问题点数:20 回复次数:3 
VFP命令,单独使用没问题,但是放入程序就出错!
*sort
*zw    主文件DBF路径文件名
*fw    生成副文件DBF路径文件名
*px    生成文件的排序字段
*sj    排序升降    1 为升,2为降,不写为降
Parameters zw,fw,px,sj
If !Empty(zw)
    If File(zw)
        Set Exclusive On
        *Try
            Use (zw)  
            if sj=1        
            *messagebox (zw,fw)   
                messagebox ("sort on "+px+"/A to "+fw)
                sort on "+px+" to fw
            else if sj="2" or sj=""
            *messagebox ("333","444")   
                sort to zw on "+px+"/D
            endif
            Use
        *messagebox ("555","666")
        dele file zw
        rename fw to zw

        *Catch
        *    Messagebox ("请先关闭文件:'"+zw+"'"+Space(5),48,'信息提示')
        *Endtry
    Else
        Messagebox ("指定的文件:'"+zw+"'不存在!"+Space(5),48,'信息提示')
    Endif
Endif

主要是想做个排序功能的EXE,可是每次到sort on这里就说语句出错,单独在命令窗口使用的时蛮好的,求高手帮忙.
搜索更多相关主题的帖子: 命令 VFP 
2009-10-10 21:29
qjbzjp
Rank: 13Rank: 13Rank: 13Rank: 13
来 自:尧的故乡
等 级:贵宾
威 望:48
帖 子:1914
专家分:4397
注 册:2007-3-14
得分:7 
直接用sort on px to fw  就行,用引号和加号的用意是什么?"+px+"


相互学习,互相交流,共同提高。
2009-10-11 11:12
sd_tysd
Rank: 5Rank: 5
等 级:职业侠客
威 望:1
帖 子:81
专家分:319
注 册:2009-7-23
得分:7 
回复 2楼 qjbzjp
他那px是字段名,不知道什么地方负的值。
2009-10-11 18:04
蓝点
Rank: 1
等 级:新手上路
帖 子:2
专家分:0
注 册:2009-10-10
得分:0 
这是我写的一个EXE,用于VB中引用.PX是一个参数变量.问题以经解决,结贴.
2009-10-11 19:36



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-288096-1-1.html




关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.226424 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved