查人人中国名人网金冠冷风机:ASP+数据库
来源：百度文库 编辑：查人人中国名人网 时间：2024/04/30 00:04:05
数据库里有很多要素，但是要根据用户的要求显示某一个要素，该怎么写呀？？？？？？？
在程序的一边我已经写好了被选的要素让用户选择，但是在写读库是写的变量不认，总是说 项目在所需的名称或序数中未被发现。
一下是我写的程序，帮忙看看一下，谢谢（其中yaosu就是用户选择的要显示的要素）
dim a(30)
n=0
set table1=server.CreateObject("adodb.connection")
table1.open "dsn=zdz;UID=ybywb;PWD=zyt029;Database=elementinfo;"
set rs1=table1.execute("select * from tabTimeData where StationNum='"&dianhao&"' and ObservTimes >'"& shijian &"' order by ObservTimes")
while (not rs1.eof) and (n<30 )
%>
<%
a(n)=rs1("yaosu")
rs1.movenext
n=n+1
wend
rs1.close
table1.close
在程序的一边我已经写好了被选的要素让用户选择，但是在写读库是写的变量不认，总是说 项目在所需的名称或序数中未被发现。
一下是我写的程序，帮忙看看一下，谢谢（其中yaosu就是用户选择的要显示的要素）
dim a(30)
n=0
set table1=server.CreateObject("adodb.connection")
table1.open "dsn=zdz;UID=ybywb;PWD=zyt029;Database=elementinfo;"
set rs1=table1.execute("select * from tabTimeData where StationNum='"&dianhao&"' and ObservTimes >'"& shijian &"' order by ObservTimes")
while (not rs1.eof) and (n<30 )
%>
<%
a(n)=rs1("yaosu")
rs1.movenext
n=n+1
wend
rs1.close
table1.close
set table1=server.CreateObject("adodb.connection")
table1.open "dsn=zdz;UID=ybywb;PWD=zyt029;Database=elementinfo;"
set rs1=server.createobject("adodb.recordset")
rs1.open "select * from tabTimeData where StationNum='"&dianhao&"' and ObservTimes >'"& shijian &"' order by ObservTimes",table1,1,1
do while not rs1.eof
response.write rs1("yaosu")
rs1.movenext
loop
rs1.close
table1.close
如果你的SQL语句没有错的话，这样应该是可以的！
可能是字段名..不对...先仔细检查一下..
set rs1=table1.execute("select * from tabTimeData where StationNum='"&dianhao&"' and ObservTimes >'"& shijian &"' order by ObservTimes")
可能是这句话有错误
你把*改成所有字段的名字试一下