| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 536 人关注过本帖
标题:如何给读出的邮箱地址加上连接 等问题
只看楼主 加入收藏
seija
Rank: 1
等 级:新手上路
帖 子:3
专家分:0
注 册:2007-5-22
收藏
 问题点数:0 回复次数:4 
如何给读出的邮箱地址加上连接 等问题

1现在是这样的<INPUT name=text11 value=<%=rs("邮箱")%>>

2如何判断读出字符穿里有'@'就是 如何判断邮箱的添写

3如何判断读出字符的第几位是什么

4下面是一段在添加时判断是否有重复的 代码 可是总是提是出错.现在我注释掉了 判断的语句就可以运行了 但还是想知道 为什么着样就运行不了 要改的话 应该怎么改呢??
set rs=server.createobject("adodb.recordset")
set rs1=server.createobject("adodb.recordset")

conn = "DBQ=" + server.mappath("address.mdb") + ";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"

sql1="select * from 专家联络方式 where 联系人='"&lianxiren&"'"

rs1.Open sql1,conn,1,1

if rs.EOF or rs.bof then
sql="...添加语句..."
rs.Open sql,conn,1,1 (着句忘了加上了)
response.write "<script language=JavaScript>" & chr(13) & "alert('添加成功!');" & "history.back()" & "</script>
set rs=nothing
end if
else
response.write "<script language=JavaScript>" & chr(13) & "alert('此信息已添加!');" & "history.back()" & "</script>
end if
rs1.Close
set rs1=nothing

[此贴子已经被作者于2007-5-22 15:18:43编辑过]

搜索更多相关主题的帖子: 地址 server recordset 
2007-05-22 13:47
seija
Rank: 1
等 级:新手上路
帖 子:3
专家分:0
注 册:2007-5-22
收藏
得分:0 

自己顶下吧 都没人理我~

2007-05-22 14:53
shdyh977
Rank: 1
等 级:新手上路
威 望:1
帖 子:109
专家分:0
注 册:2007-5-22
收藏
得分:0 

set rs=server.createobject("adodb.recordset")
set rs1=server.createobject("adodb.recordset")

conn = "DBQ=" + server.mappath("address.mdb") + ";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"

sql1="select * from 专家联络方式 where 联系人='"&lianxiren&"'"

rs1.Open sql1,conn,1,1

if rs1.EOF then
sql="...添加语句..."
response.write "<script language=JavaScript>" & chr(13) & "alert('添加成功!');" & "history.back()" & "</script>
else
response.write "<script language=JavaScript>" & chr(13) & "alert('此信息已添加!');" & "history.back()" & "</script>
end if
rs1.Close
set rs1=nothing

看看可不可以

2007-05-22 15:03
lq7350684
Rank: 6Rank: 6
等 级:贵宾
威 望:20
帖 子:5089
专家分:98
注 册:2006-11-6
收藏
得分:0 
if rs.EOF or rs.bof then
sql="...添加语句..."
response.write "<script language=JavaScript>" & chr(13) & "alert('添加成功!');" & "history.back()" & "</script>
set rs=nothing
end if去掉
else
response.write "<script language=JavaScript>" & chr(13) & "alert('此信息已添加!');" & "history.back()" & "</script>
end if
rs1.Close
set rs1=nothing
2007-05-22 15:05
seija
Rank: 1
等 级:新手上路
帖 子:3
专家分:0
注 册:2007-5-22
收藏
得分:0 
前几个问题 也说下啊 呵呵
2007-05-22 15:15
快速回复:如何给读出的邮箱地址加上连接 等问题
数据加载中...
 
   



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

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