标题:數據庫計算
只看楼主
akxiang
Rank: 1
等 级:新手上路
帖 子:72
专家分:0
注 册:2007-7-5
得分:0 
現在改為“數字”了。我的數據庫在另一臺server上面,不好帖。
2007-08-16 16:05
akxiang
Rank: 1
等 级:新手上路
帖 子:72
专家分:0
注 册:2007-7-5
得分:0 
然後是一個百分比的數。就是這樣子的。
2007-08-16 16:07
qhscqb
Rank: 1
等 级:新手上路
威 望:1
帖 子:343
专家分:0
注 册:2007-2-3
得分:0 
回复:(akxiang)那請問如果是字符的,是不是用以下就...
cint(rs("aa"))

编程快乐,快乐编程! 没有最好,只有更好!
2007-08-16 16:07
akxiang
Rank: 1
等 级:新手上路
帖 子:72
专家分:0
注 册:2007-7-5
得分:0 

對,我用:“cint(rs("aa"))”如下:

<%
aa=rs("a")
if cint(rs("a"))>90 then
str="<font color=#ff0000>"&aa&"</font>"
else
str="<font color=#00ff00>"&aa&"</font>"
response.write str
end if
%>

沒有報錯,但沒有顯示出結果來呢?

2007-08-16 16:14
ayue222
Rank: 3Rank: 3
等 级:新手上路
威 望:6
帖 子:341
专家分:0
注 册:2007-7-25
得分:0 
<%
dim aa,str
aa=rs("a")
if cint(aa)>90 then
str="<font color=#ff0000>"&aa&"</font>"
else
str="<font color=#00ff00>"&aa&"</font>"
response.write str
end if
%>
2007-08-16 16:17
qhscqb
Rank: 1
等 级:新手上路
威 望:1
帖 子:343
专家分:0
注 册:2007-2-3
得分:0 
看看能不能用TRIM函数将两边的空格取掉

编程快乐,快乐编程! 没有最好,只有更好!
2007-08-16 16:20
akxiang
Rank: 1
等 级:新手上路
帖 子:72
专家分:0
注 册:2007-7-5
得分:0 

我的源代碼如下:
<%set conn=server.createobject("adodb.connection")
conn.open "driver={microsoft access driver (*.mdb)};dbq="&server.mappath("ce.mdb")
%>
<%
exec="select * from ce order by id=61 "
set rs=server.createobject("adodb.recordset")
rs.open exec,conn,1,1
%>


<%
dim aa,str
aa=rs("a")
if cint(aa)>90 then
str="<font color=#ff0000>"&aa&"</font>"
else
str="<font color=#00ff00>"&aa&"</font>"
response.write str
end if
%>

這樣都沒有報錯了,可是就是沒有顯示出來呀。網頁打開後是空的呀。

2007-08-16 16:22
qhscqb
Rank: 1
等 级:新手上路
威 望:1
帖 子:343
专家分:0
注 册:2007-2-3
得分:0 
什么都没有显示吗?你将代码改成以下试试。、
<%
dim aa,str
aa=rs("a")
if cint(aa)>90 then
str="<font color=#ff0000>大于90</font>"
else
str="<font color=#00ff00>小于90</font>"
response.write str
end if
%>

编程快乐,快乐编程! 没有最好,只有更好!
2007-08-16 16:23
qhscqb
Rank: 1
等 级:新手上路
威 望:1
帖 子:343
专家分:0
注 册:2007-2-3
得分:0 
以下是引用akxiang在2007-8-16 16:22:02的发言:

我的源代碼如下:
<%set conn=server.createobject("adodb.connection")
conn.open "driver={microsoft access driver (*.mdb)};dbq="&server.mappath("ce.mdb")
%>
<%
exec="select * from ce order by id=61 "
set rs=server.createobject("adodb.recordset")
rs.open exec,conn,1,1
%>


<%
dim aa,str
aa=rs("a")
if cint(aa)>90 then
str="<font color=#ff0000>"&aa&"</font>"
else
str="<font color=#00ff00>"&aa&"</font>"
response.write str
end if
%>

這樣都沒有報錯了,可是就是沒有顯示出來呀。網頁打開後是空的呀。

那是什么?好象是order by id desc吧!


编程快乐,快乐编程! 没有最好,只有更好!
2007-08-16 16:26
akxiang
Rank: 1
等 级:新手上路
帖 子:72
专家分:0
注 册:2007-7-5
得分:0 
我改了,但效果一樣呀,沒有顯示出來。會不會同我的系統有關呢? 還是什麼的。

我才學的ASP。
2007-08-16 16:27



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-163174-1-1.html




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

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