谁可相欹 发表于 2015-1-16 23:19:41

ASP网站制作之又一个EMail效验函数(by Loutonghua)

ASP脚本是采用明文(plaintext)方式来编写的。函数<%
functionIsValidEmail(email)

dimnames,name,i,c

Checkforvalidsyntaxinanemailaddress.

IsValidEmail=true
names=Split(email,"@")
ifUBound(names)1then
IsValidEmail=false
exitfunction
endif
foreachnameinnames
ifLen(name)<=0then
IsValidEmail=false
exitfunction
endif
fori=1toLen(name)
c=Lcase(Mid(name,i,1))
ifInStr("abcdefghijklmnopqrstuvwxyz_-.",c)<=0andnotIsNumeric(c)then
IsValidEmail=false
exitfunction
endif
next
ifLeft(name,1)="."orRight(name,1)="."then
IsValidEmail=false
exitfunction
endif
next
ifInStr(names(1),".")<=0then
IsValidEmail=false
exitfunction
endif
i=Len(names(1))-InStrRev(names(1),".")
ifi2andi3then
IsValidEmail=false
exitfunction
endif
ifInStr(email,"..")>0then
IsValidEmail=false
endif

endfunction
%>
</p>ASP最大的缺点在于网络的安全性和可靠性,企业将经营数据放在开放的平台上,最大的担忧就是如何保证这些数据不被其他人破坏。

海妖 发表于 2015-1-17 23:11:11

如何学好ASP,以前也有人问过,把回答给你转过来看看能否对你有帮助:

再见西城 发表于 2015-1-19 11:56:37

从事这个行业,那么你可以学ASP语言,简单快速上手,熟练dreamweav排版,写asp代码,熟练photoshop处理图片,打好基础就行了

兰色精灵 发表于 2015-1-24 11:40:07

以HTML语言整合(HTML负责界面上,ASP则负责功能上)形成一个B/S(浏览器/服务器)模式的网页程序。

乐观 发表于 2015-2-1 09:42:21

跟学别的语言一样,先掌握变量,流程控制语句(就是ifwhileselect)等,函数/过程,数组

谁可相欹 发表于 2015-2-7 02:09:32

下载一个源代码,然后再下载一个VBScript帮助,在源代码中遇到不认识的函数或是其他什么程序,都可以查帮助进行解决,这样学习效率很高。

冷月葬花魂 发表于 2015-2-19 15:53:45

另外因为asp需要使用组件,所以了解一点组件的知识(ADODB也是组件)

老尸 发表于 2015-3-6 15:06:27

以HTML语言整合(HTML负责界面上,ASP则负责功能上)形成一个B/S(浏览器/服务器)模式的网页程序。

透明 发表于 2015-3-13 02:38:12

我想问如何掌握学习节奏(先学什么再学什么)最好详细点?

柔情似水 发表于 2015-3-20 10:33:07

最近在学asp,不要问我为什么不直接学.net,因为公司网站是asp做的所以有这个需要,卖了本书asp入门到精通,对里面的六大内置对象老是记不住,还有很多属性和方法看的头晕。
页: [1]
查看完整版本: ASP网站制作之又一个EMail效验函数(by Loutonghua)