电脑网络 手机数码 生活 游戏 体育运动 明星影音 休闲爱好 文化艺术 就业职场 教育科学 健康医疗 商业理财 情感家庭 地区 其他

asp查询记录如何重复列取???

2023-09-30 10:05:40

dim users,strInfo
users = Request.Form("user")
If Len(users) = 0 Then
Response.Write("会员账号不能为空")
Exit Sub
End If
***.open "select * from Users where user=" & users & "",con,1,1
If rs.bof And rs.eof Then
Response.Write("该会员账号不存在!!!")
Exit Sub
Else
If IsNull(rs("dl")) or rs("dl") = "" Then
Response.Write("该账号未冲值!剩余时间0天!")
Exit Sub
End If

strInfo = "会员账号:" & rs("User") & " 姓名:" & rs("Names") & " 冲值时间:" & rs("Times")
Response.Write strInfo 这里是返回的用户资料
End If
rs.close
con.close
Set rs = Nothing
Set con = Nothing



以上代码是由一个VB程序提交用户名进行查询就可以获得并返回该用户的部分信息!
我想实现就算数据库里有重复的用户名记录也要全部返回,
比如有2个叫‘小王’的,就返回2个人的信息!而不是一个。

请问高手这段代码如何加以修改能实现这样的功能??

好评回答
dim users,strInfo
users = Request.Form("user")
If Len(users) = 陈我0 Then
Response.Write("会员账号不能为空")
Exit Sub
End If
***.open "select * from Users where user=" & users & "",con,1,1
If rs.bof And rs.eof Then
Response.Write("该会员账号不存在!!!")
Exit Sub
Else
If IsNull(rs("dl")) or rs("dl") = "" Then
Response.Write("该账号未冲值!剩余时间0天!")
Exit Sub
End If

Do While Not Rs.EOF
strInfo = "会员账号:" & rs("User") & " 姓名:" & rs("Names") & " 冲值时间:" & rs("Times")
Response.Write strI跑司几县未续承则nfo &"<br />"这里是返回的用户资料
Rs.MoveNext
loop

End If
rs.close
con.close
Set rs = Nothing
Set con = Nothing
相关推荐
  • 如何用sql语句查询重复记录
  • sql语句如何查询不重复记录
  • mysql 查询怎么去除重复列
  • 查询及删除重复记录
  • sql查询按两个字段查询重复记录
  • 如何查询出指定列不重复的所有记录信息?
  • 怎么通过sql查询表中某个字段重复的记录
  • © 融合问答