ASP编程：一个复杂的E_mail地点判别函数（通用）...

专业性的服务。有的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>只要你想学,就没什么优缺点,上面那位大哥已经把网上的评论说了,但我认为想学哪个都一样,不然它就不可能在当今时代数字艺术方面存活到今天

仓酷云

先学习用frontpage熟悉html编辑然后学习asp和vbscript建议买书进行系统学习

交流是必要的，不管是生活还是学习我们都要试着去交流，通过交流我们可以学到很多我们自己本身所没有的知识，可以分享别人的经验甚至经历。

代码的可重用性差：由于是面向结构的编程方式，并且混合html，所以可能页面原型修改一点，整个程序都需要修改，更别提代码重用了。

虽然ASP也有很多网络教程。但是这些都不系统。都是半路出家，只是从一个例子告诉你怎么用。不会深入讨论，更不会将没有出现在例子里的方法都一一列举出来。

Session:这个存储跟客户端会话过程的数据，默认20分钟失效

它可通过内置的组件实现更强大的功能，如使用A-DO可以轻松地访问数据库。

运用经典的例子。并且自己可以用他来实现一些简单的系统。如果可以对他进行进一步的修改，找出你觉得可以提高性能的地方，加上自己的设计，那就更上一个层次了，也就会真正地感到有所收获。

如何更好的使自己的东西看上去很不错等等。其实这些都不是问题的实质，我们可以在实践中不断提升自己，不断充实自己。

弱类型造成潜在的出错可能：尽管弱数据类型的编程语言使用起来回方便一些，但相对于它所造成的出错几率是远远得不偿失的。