如何累加？？？？？

释放压力

电梯直达

1^#

发表于 2010-1-10 06:06:56 | 只看该作者回帖奖励

|倒序浏览 |阅读模式

有10个同学，其中有三个同学是同一天生日，现在要写一段语句通过select 语句和循环语句将三名同学的姓名读出来且赋值给name,即name= a(0)+a(1)+a(2)，再以response.write name 输出，不知用数组如何写？？拜托各位了

收藏0

使用道具举报

尐妖

2^#

发表于 2010-1-10 06:06:59 | 只看该作者

楼主的代码怎么写的？

回复支持反对

使用道具举报

v九天〓云龙

3^#

发表于 2010-1-10 06:07:04 | 只看该作者

sql="select * from member where DateDiff('d',birthday,'"&Year(now())&"-"&Month(now())&"-"&Day(Now())&")=0 And DateDiff('m',birthday,'"&Year(now()&"-"&Month(now())&"-"&Day(now)&")=0 "
多了一个*号

回复支持反对

使用道具举报

封xin封mg

4^#

发表于 2010-1-10 06:07:08 | 只看该作者

语句如下:(数据库连接文件已经在上面了)
<%
set rs=server.createobject("adodb.recordset")
sql="select * from member where DateDiff('d',birthday,'"&Year(now())&"-"&Month(now())&"-"&Day(Now())&")=0 And DateDiff('m',birthday,'"&Year(now*()&"-"&Month(now())&"-"&Day(now)&")=0 "
rs.Open sql,conn,1,1
Do while not rs.EOF
Response.Write "今天生日的用户"&rs("membername")
rs.MoveNext
Loop
%>

错误提示:
错误类型：
Microsoft VBScript 编译器错误 (0x800A03EA)
语法错误
/0315/admin/case_tj/dealcount.asp, line 960, column 145
sql="select * from member where DateDiff('d',birthday,'"&Year(now())&"-"&Month(now())&"-"&Day(Now())&")=0 And DateDiff('m',birthday,'"&Year(now*()&"-"&Month(now())&"-"&Day(now)&")=0 "

上面错误提示说明以下这句话是错的.
sql="select * from member where DateDiff('d',birthday,'"&Year(now())&"-"&Month(now())&"-"&Day(Now())&")=0 And DateDiff('m',birthday,'"&Year(now*()&"-"&Month(now())&"-"&Day(now)&")=0 "

回复支持反对

使用道具举报

龙行天下

5^#

发表于 2010-1-10 06:07:12 | 只看该作者

谢谢，谢谢，我在一次感到了大家积极帮助的火热的心，只用一句话总结，世上还是好人多呀，再次表示感谢，等我测试完一定再回复。

回复支持反对

使用道具举报

小点点14504

6^#

发表于 2010-1-10 06:07:16 | 只看该作者

Set rs=con.Execute("select name from [user] where DateDiff('d',birthday,'"&Year(now())&"-"&Month(now())&"-"&Day(Now())&")=0 And DateDiff('m',birthday,'"&Year(now*()&"-"&Month(now())&"-"&Day(now)&")=0 ")

Do while not rs.EOF
Response.Write "今天生日的用户"&rs("name")
rs.MoveNext
Loop

回复支持反对

使用道具举报

星溯~~~~天空

7^#

发表于 2010-1-10 06:07:20 | 只看该作者

？为什么要累加？
用select循环直接用rs输出呢？
比如
Access数据库
Set rs=con.Execute("select name from [user] where DateDiff('d',birthday,'"&Year()&"-"&Month()&"-"&Day(Now)&")=0")
Do Until rs.EOF
Response.Write "今天生日的用户"&rs("name")
rs.MoveNext
Loop

回复支持反对

使用道具举报

一世豪杰

8^#

发表于 2010-1-10 06:07:24 | 只看该作者

再次表示感谢，我才学习不久，所以很多都不熟悉，希望以后多多指教。
但是按照这条语句进行查询，总是出现错误，说连接数据库时间超长，不知何故，望能解答。

回复支持反对

使用道具举报

别问我是谁

9^#

发表于 2010-1-10 06:07:28 | 只看该作者

Set rs=con.Execute("select name from [user] where DateDiff('d',birthday,'"&Year()&"-"&Month()&"-"&Day(Now)&")=0 And DateDiff('m',birthday,'"&Year()&"-"&Month()&"-"&Day(Now)&")=0 ")
加And连接即可

回复支持反对

使用道具举报

^o^星禾じ☆v

10^#

发表于 2010-1-10 06:07:32 | 只看该作者

感谢帮忙，我还有点没弄明白
DateDiff('d',birthday,'"&Year()&"-"&Month()&"-"&Day(Now)&"')=0"
这句好像有点问题，生日相同的只有月和日，所以必须取出birthday中的月、日与今天系统的月、日相减为0才对吧，不知说的是否对，再次谢谢回帖

回复支持反对

使用道具举报

		自动登录	找回密码
密码			注册

浏览过的版块