| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 686 人关注过本帖
标题:在 VFP 中,有没有一个函数能判断用户输入的字符串符合命名规则?
只看楼主 加入收藏
zjj1974
Rank: 2
等 级:论坛游民
威 望:1
帖 子:58
专家分:38
注 册:2014-8-10
结帖率:75%
收藏
已结贴  问题点数:5 回复次数:7 
在 VFP 中,有没有一个函数能判断用户输入的字符串符合命名规则?
在VFP中,有没有一个函数能判断用户输入的字符串符合命名规则?
例如:字符串中间不能有空格、+、-、&、*……

我本想用下在的方法来判断,但感觉太麻烦了

aa="增加新用户的用户名"
TRY
   LOCAL &aa.
CATCH  
   =MESSAGEBOX("你输入的用户名不正确,请重新输入!",0,"错误")
   CANCEL   
FINALLY
   ab=SQLEXEC(handle,"create user "+aa)  &&创建用名

ENDTRY         
搜索更多相关主题的帖子: 用户名 create 字符串 命名 
2014-08-14 20:45
sdta
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来 自:江苏省连云港市
等 级:版主
威 望:335
帖 子:9811
专家分:27017
注 册:2012-2-5
收藏
得分:2 
没有

坚守VFP最后的阵地
2014-08-14 20:50
zjj1974
Rank: 2
等 级:论坛游民
威 望:1
帖 子:58
专家分:38
注 册:2014-8-10
收藏
得分:0 
谢谢
2014-08-14 21:08
吹水佬
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
等 级:版主
威 望:451
帖 子:10559
专家分:42996
注 册:2014-5-20
收藏
得分:2 
看似有点麻烦,应该也可行:
FUNCTION _IsFileName(szFileName)
    IF ALINES(aTest, "_" + szFileName + "_", [\], [/], [:], [*], [?], ["], [<], [>], [|]) > 1
        MESSAGEBOX(szFileName + 0h0D + "不能包含下列字符:" + 0h0D + [\ / : * ? " < > |], 0, "提示")
        RETURN .F.
    ENDIF
    RETURN .T.
ENDFUNC
2014-08-14 21:13
qshuju
Rank: 3Rank: 3
等 级:论坛游侠
威 望:3
帖 子:217
专家分:112
注 册:2011-6-9
收藏
得分:2 
if "+" $ aa or "-" "+" $ aa or ……
 =MESSAGEBOX("你输入的用户名不正确,请重新输入!",0,"错误")
retrun
endif
2014-08-14 21:22
zjj1974
Rank: 2
等 级:论坛游民
威 望:1
帖 子:58
专家分:38
注 册:2014-8-10
收藏
得分:0 
4楼,5楼的方法都不错
但如果用户输入的是:45aas
创建的用户名就会有问题

回头看看,我的方法还算是比较简单的
2014-08-14 21:41
TonyDeng
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
等 级:贵宾
威 望:304
帖 子:25859
专家分:48889
注 册:2011-6-22
收藏
得分:2 
动态捕捉错误的方法虽然简单,但影响运行速度。通常,如果不是导致太复杂的编程,尽量回避用这种方式。

授人以渔,不授人以鱼。
2014-08-14 21:59
TonyDeng
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
等 级:贵宾
威 望:304
帖 子:25859
专家分:48889
注 册:2011-6-22
收藏
得分:0 
自己写的函数,地位与内置函数等同,问有什么函数能够实现……

授人以渔,不授人以鱼。
2014-08-14 22:13
快速回复:在 VFP 中,有没有一个函数能判断用户输入的字符串符合命名规则?
数据加载中...
 
   



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

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