- functionchkEmail(email)
- onerrorresumenext
- dimi,l,pos1,pos2
- chkEmail=true
- ifisnull(email)thenchkEmail=false:exitfunction
- pos1=instr(email,"@")
- pos2=instrRev(email,".")
- ifnot(pos1>0)ornot(pos2>0)orpos1>pos2then
- chkEmail=false
- endif
- iferr.number<>0thenerr.clear
- endfunction
如果您对该产品感兴趣，请填写办理（客服微信：xiaoxiongyidong）
发表评论
◎欢迎参与讨论，请在这里发表您的看法、交流您的观点。