| 本月文章推荐 |
简单的检查输入email是否合法程序发表日期：2000-11-12
|
|
function chkEmail(email)
on error resume next dim i,l,pos1,pos2 chkEmail=true if isnull(email) then chkEmail=false:exit function pos1= instr(email,"@") pos2=instrRev(email,".") if not(pos1>0) or not (pos2>0) or pos1>pos2 then chkEmail=false end if if err.number<>0 then err.clear end function |
| 上一篇：转换html代码子程序
人气:11641 下一篇：检查来访IP是否合法的实际应用 人气:11415 |
| 浏览全部的内容
Dreamweaver插件下载 网页广告代码 祝你圣诞节快乐 2009年新年快乐 |
