| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 800 人关注过本帖
标题:解决检验手机号码已存在的问题!望朋友帮个忙
取消只看楼主 加入收藏
zcxxtdnip
Rank: 1
等 级:新手上路
帖 子:12
专家分:0
注 册:2007-9-4
收藏
 问题点数:0 回复次数:1 
解决检验手机号码已存在的问题!望朋友帮个忙
<%
response.buffer="true"
If request.form("user")="" Then
response.write"<script>alert('请填写联系人姓名!');history.back()</script>"
response.end
End If
If request.form("tel")="" Then
response.write"<script>alert('请填写您联系电话!');history.back()</script>"
response.end
End If
if len(trim(request.form("tel")))<11 then
response.write"<script>alert('你的手机号码不够11位请重新填写!');history.back()</script>"
response.end
End If
%>
<!--#include file="CONN.ASP" -->
<%
dim rs,sql
set rs=server.createobject("adodb.recordset")
sql="select * from cdb where (id is null)"
rs.open sql,conn,1,3
rs.addnew
rs("user")=request.form("user")
rs("tel")=request.form("tel")
rs("dt")=now()
rs("productID")=request.form("productID")
rs("ip")=request.ServerVariables("remote_addr")
rs("url")=Request.ServerVariables("HTTP_REFERER")
rs.update
rs.close
set rs=nothing
conn.close
set conn=nothing
%>
在此代码的基础上添加“检验号码已存在的功能”
搜索更多相关主题的帖子: 手机号码 检验 朋友 
2007-09-11 16:54
zcxxtdnip
Rank: 1
等 级:新手上路
帖 子:12
专家分:0
注 册:2007-9-4
收藏
得分:0 
回复:(hmhz)

不行啊!还是能重复输入同一个号码

2007-09-12 09:22
快速回复:解决检验手机号码已存在的问题!望朋友帮个忙
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.029893 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved