仓酷云

 找回密码
 立即注册
搜索
热搜: 活动 交友 discuz
查看: 392|回复: 9
打印 上一主题 下一主题

[学习教程] ASP编程:一个复杂的E_mail地点判别函数(通用)...

[复制链接]
若天明 该用户已被删除
跳转到指定楼层
楼主
发表于 2015-1-16 22:57:43 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式

马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。

您需要 登录 才可以下载或查看,没有帐号?立即注册

x
专业性的服务。有的ASP商提供垂直型的应用服务,针对某一特定行业提供应用服务。函数―――――――――――――――――
|Author:I94Self|
|E_mail:I94Self@hotmail.com|
|HTTP://www.I94Self.com|
|Pleasesaveauthorinformation|
―――――――――――――――――


判别E_mail输出是不是准确

FunctionIsValidE_mail(E_mail)
判别E_mail地点中是不是有@标记,假如没有@标记大概@标记在E_mail字符第一个或最初一个,则函数都前往False,并加入函数。
E_mailArray=Split(E_mail,"@")
IfUBound(E_mailArray)1Then
IsValidE_mail=False
ExitFunction
EndIf
判别E_mail地点中是不是有连在一同的..标记(包含了...或有数个.毗连的标记),假如有,则函数都前往False,并加入函数。
IfInStr(E_mail,"..")>0Then
IsValidE_mail=False
ExitFunction
EndIf
判别E_mail地点中@后的字符串是不是有.字符,假如没有.标记大概.标记在E_mail字符第一个,则函数都前往False,并加入函数。
IfInStr(E_mailArray(1),".")<=0Then
IsValidE_mail=False
ExitFunction
EndIf
判别E_mail地点中.后的字符串是不是即是2字符或3字符,假如不即是,则函数都前往False,并加入函数。
Number=Len(E_mailArray(1))-InStrRev(E_mailArray(1),".")
IfNumber2AndNumber3Then
IsValidE_mail=False
ExitFunction
EndIf
ForEachE_mailArrayContentInE_mailArray
判别E_mail地点中@前是不是有字符,假如没有,则函数都前往False,并加入函数。
IfLen(E_mailArrayContent)<=0Then
IsValidE_mail=False
ExitFunction
EndIf
判别E_mail地点中是不是含有除abcdefghijklmnopqrstuvwxyz_-和数字之外的不法字符,假如含有,则函数前往False,并加入函数。
ForNumber=1ToLen(E_mailArrayContent)
E_mailStr=Lcase(Mid(E_mailArrayContent,Number,1))
IfInStr("abcdefghijklmnopqrstuvwxyz_-.",E_mailStr)<=0AndNotIsNumeric(E_mailStr)Then
IsValidE_mail=False
ExitFunction
EndIf
Next
判别E_mail地点中@前后的字符串中是不是第一个和是最初一个字符是.字符,假如是,则函数都前往False,并加入函数。
IfLeft(E_mailArrayContent,1)="."OrRight(E_mailArrayContent,1)="."Then
IsValidE_mail=False
ExitFunction
EndIf
Next
没有发明E_mail地点中有非常字符,函数前往True,函数停止。
IsValidE_mail=True
EndFunction



</p>只要你想学,就没什么优缺点,上面那位大哥已经把网上的评论说了,但我认为想学哪个都一样,不然它就不可能在当今时代数字艺术方面存活到今天
乐观 该用户已被删除
沙发
发表于 2015-1-20 06:45:04 | 只看该作者
弱类型造成潜在的出错可能:尽管弱数据类型的编程语言使用起来回方便一些,但相对于它所造成的出错几率是远远得不偿失的。
若天明 该用户已被删除
板凳
 楼主| 发表于 2015-1-28 22:12:10 | 只看该作者
如何更好的使自己的东西看上去很不错等等。其实这些都不是问题的实质,我们可以在实践中不断提升自己,不断充实自己。
小女巫 该用户已被删除
地板
发表于 2015-1-30 12:06:49 | 只看该作者
运用经典的例子。并且自己可以用他来实现一些简单的系统。如果可以对他进行进一步的修改,找出你觉得可以提高性能的地方,加上自己的设计,那就更上一个层次了,也就会真正地感到有所收获。
金色的骷髅 该用户已被删除
5#
发表于 2015-2-2 22:18:59 | 只看该作者
它可通过内置的组件实现更强大的功能,如使用A-DO可以轻松地访问数据库。
深爱那片海 该用户已被删除
6#
发表于 2015-2-8 12:56:41 | 只看该作者
Session:这个存储跟客户端会话过程的数据,默认20分钟失效
愤怒的大鸟 该用户已被删除
7#
发表于 2015-2-25 15:00:24 | 只看该作者
虽然ASP也有很多网络教程。但是这些都不系统。都是半路出家,只是从一个例子告诉你怎么用。不会深入讨论,更不会将没有出现在例子里的方法都一一列举出来。
谁可相欹 该用户已被删除
8#
发表于 2015-3-7 22:32:08 | 只看该作者
代码的可重用性差:由于是面向结构的编程方式,并且混合html,所以可能页面原型修改一点,整个程序都需要修改,更别提代码重用了。
活着的死人 该用户已被删除
9#
发表于 2015-3-15 15:12:54 | 只看该作者
交流是必要的,不管是生活还是学习我们都要试着去交流,通过交流我们可以学到很多我们自己本身所没有的知识,可以分享别人的经验甚至经历。
10#
发表于 2015-3-22 01:45:46 | 只看该作者
先学习用frontpage熟悉html编辑然后学习asp和vbscript建议买书进行系统学习
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

QQ|Archiver|手机版|仓酷云 鄂ICP备14007578号-2

GMT+8, 2024-12-24 11:22

Powered by Discuz! X3.2

© 2001-2013 Comsenz Inc.

快速回复 返回顶部 返回列表