初手请各位帮忙！有问题求教！

bangzzdzzgd 2004-01-09 08:07:58

想问一下，用ＡＳＰ来编查询数据库的页面，最好是用什么数据库？说说优／缺点！同时用哪种数据库较容易上手？

我想做一个查询的页面，根据输入的条件来查询．大家说说难吗？好果现在学，大概多久才能做出来？按最长的时间来算！

同时，如果大家知道网上有什么好的例子或者愿意帮忙给我做一个范例来的话，最感谢不过了！

在线等待，急用呀！

再次谢谢各位！

...全文

37 13 打赏收藏转发到动态举报

写回复

用AI写文章

13 条回复

切换为时间正序

请发表友善的回复…

发表回复

bangzzdzzgd 2004-01-10

打赏
举报

谢谢： xiejunhua(兵工厂) ： aspnetxp(脚本.Net)

xiejunhua 2004-01-10

打赏
举报

说明一下
sql=sql+" and city='"&city&"' " '城市字段如是文本加单引号

xiejunhua 2004-01-10

打赏
举报

不如自己到网上搜一下,多的是,学的话就先用Access吧,

name=request.form("name") '如查找一个人
old=request.form("old")
city=request.form("city")
sex=request.form("sex")

sql="select * from table_user where old='"&old&"' and name like '%"&name&"%' "
'查找年龄为某年 ,姓名模糊查询
if city<>empty then '判断city是否空值,
sql=sql+" and city="&city&" "
end if
if sex<>empty then
sql=sql+" and sex="&sex&" " '性别是数字字段
end if
set rs=server.createobject("adodb.recordset")
rs.open sql,cnndb,1,1

aspnetxp 2004-01-10

打赏
举报

</select>日－<select size="1" name="year1">
<option value=0></option>
<option value=2001>2001</option>
<option value=2002>2002</option>
<option value=2003 selected>2003</option>
<option value=2004>2004</option>
<option value=2005>2005</option>
<option value=2006>2006</option>
<option value=2007>2007</option>
<option value=2008>2008</option>
<option value=2009>2009</option>
<option value=2010>2010</option>
</select><font size="2">年</font>
<select size="1" name="month1">
<option value=0></option>
<option value=1>01</option>
<option value=2>02</option>
<option value=3>03</option>
<option value=4>04</option>
<option value=5>05</option>
<option value=6>06</option>
<option value=7>07</option>
<option value=8>08</option>
<option value=9>09</option>
<option value=10>10</option>
<option value=11>11</option>
<option value=12>12</option>
</select><font size="2">月</font><select size="1" name="day1">
<option value=0></option>
<option value=01>01</option>
<option value=02>02</option>
<option value=03>03</option>
<option value=04>04</option>
<option value=05>05</option>
<option value=06>06</option>
<option value=07>07</option>
<option value=08>08</option>
<option value=09>09</option>
<option value=10>10</option>
<option value=11>11</option>
<option value=12>12</option>
<option value=13>13</option>
<option value=14>14</option>
<option value=15>15</option>
<option value=16>16</option>
<option value=17>17</option>
<option value=18>18</option>
<option value=19>19</option>
<option value=20>20</option>
<option value=21>21</option>
<option value=22>22</option>
<option value=23>23</option>
<option value=24>24</option>
<option value=25>25</option>
<option value=26>26</option>
<option value=27>27</option>
<option value=28>28</option>
<option value=29>29</option>
<option value=30>30</option>
<option value=31>31</option>

</select>日
<INPUT type="submit" value="查询" name=tjcx_zl> <INPUT type="button" value="填写" id=button1 name=button1 onclick=button()> <INPUT type="submit" value="删除" name=delete_zl>
</td>
</tr>
</table>
<script language=vbscript>
sub button()
window.navigate "./zyqr.asp"
end sub

</script>
<table border="0" width="644" height="1">

<%
dim texname,year,month,Date1,year1,month1,Date2
dim sql9,sqlWhere

texname = Request.Form("txtname")
year = Request.Form("year")
month = Request.Form("month")
Date1 = Request.Form("day")
year1 = Request.Form("year1")
month1 = Request.Form("month1")
Date2 = Request.Form("day1")

sql9 = "select * from ozg"
sqlWhere = " where wtype = 24"

if texname <> Empty then
sqlWhere = sqlWhere & " and wauth = '" & texname & "' "
end if

if year <> Empty then
if Date1 = Empty then Date1 = "01"
if month = Empty then month = "01"
sqlWhere = sqlWhere & " and wdate >= '" & year & "-" & month & "-" & Date1 & "' "
end if

if year1 <> Empty then
if hDate2 = Empty then Date2 = "02"
if month1 = Empty then month1 = "02"
sqlWhere = sqlWhere & " and wdate <= '" & year1 & "-" & month1 & "-" & Date2 & "'"
end if

sql9 = sql9 & sqlWhere & " order by wauth,wsource desc"

if (Request.Form("tjcx_zl")="查询")or(Response.Expires=0) then
set RsHits=con.Execute(sql9)
if RsHits.EOF then
HTML="<p> </p><td nowrap width=500 align=center><img border=0 src=images/AG00090_.gif><h3>没有您要查询的资源确认单!</h3></td></tr><tr>"
Response.Write HTML
else
%>
<tr>
<td width=644 nowrap bgcolor="#333399" style="color: #FFFFFF" colspan="5">
选择 <a target="_self" href="yewu16.asp"><font color="#FFFFFF">发布人</font></a><font color="#FFFFFF">
<a target="_self" href="yewu17.asp"><font color="#FFFFFF">文章标题</font></a>
        <a target="_self" href="yewu18.asp"><font color="#FFFFFF">流水号</font></a>
   <a target="_self" href="yewu19.asp"><font color="#FFFFFF">提交日期</font></a></font></td>
</tr>
<tr align="center">
<%
do until RsHits.EOF
temptxt1=left(RsHits("wsubject"),50)
temptxt2=RsHits("wdate")
temptxt3=left(RsHits("wname"),50)
temptxt4=left(RsHits("wauth"),10)
temptxt5=left(RsHits("wsource"),50)
Response.Write"<td width=40 nowrap bgcolor=LemonChiffon><INPUT type=radio name=radio value="&temptxt3&"></td>"
Response.Write"<td width=70 nowrap bgcolor=LemonChiffon>"&temptxt4&"</td>"
Response.Write"<td width=260 nowrap bgcolor=LemonChiffon><a href=ftp://172.21.4.112/cust/"&temptxt3&">"&temptxt1&"</a></td>"
Response.Write"<td width=100 nowrap bgcolor=LemonChiffon>"&temptxt5&"</td>"
Response.Write"<td width=85 nowrap bgcolor=LemonChiffon>"&temptxt2&"</td></tr><tr align=center>"
RsHits.MoveNext
loop
%>
</tr>
</table>
<p></p>

<%
end if
end if%>
</form>
</center>
</body>
</html>

<%con.Close %>

aspnetxp 2004-01-10

打赏
举报

<%@ Language=VBScript %>
<%Response.Expires=0%>
<html>
<head>
<title>资源确认单</title>
</head>
<%
set con=server.CreateObject("ADODB.Connection")
con.Open "dsn=customer;uid=sa;pwd=sa"
set rs=server.CreateObject("ADODB.Recordset")
rssql="select wauth,wworknum from ozg where wname='"&Request.Form("radio")&"'"
rs.Open rssql,con
set cmd=server.CreateObject("ADODB.Command")
set cmd.ActiveConnection=con
%>
<body background="custmas/analysis/images/back.gif">
<table border="0" width="582" align=center>
<tr>
<td width="574" height="18" colspan="2"></td>
</tr>
<tr>
<td width="36" height="22">
<p align="left"><img border="0" src="./images/BD10253_.GIF" width="21" height="20">
</td>
<td width="532" height="22">
<b><i><font color="#000080" size="4"><u>
资源确认单： </u></font></i></b>
</td>
</tr>
</table>

<%
dim do_del
do_del=Request.Form("delete_zl")
if do_del="删除" then
if Request.Form("radio")=empty then
%>
<script language=vbscript>
msgbox"请选择要删除的文章!"
</script>
<%
else
if (rs("wworknum")=session("userwork")) or (session("userlegalpower")=0) then
map_del="./datum/"&Request.Form("radio")
path_del=server.MapPath(map_del)
set fs=server.CreateObject("Scripting.FileSystemObject")
fs.DeleteFile (path_del)
sql_del="delete from ozg where wname='"&Request.Form("radio")&"'"
cmd.CommandText=sql_del
cmd.Execute(sql_del)
%>
<script language=vbscript>

window.navigate "./yewu1.asp"
</script>
<%
else
%>
<script language=vbscript>
msgbox"您没有删除此文章的权限!"
</script>
<%
end if
end if
rs.Close
end if
%>

<center>
<table border="0" width="675" height="1">
<tr>
<form action="yewu1.asp" method=post id=form1 name=form1>
<td width=675 nowrap align=center height="1">
<font size="2">姓名：</font><select name=txtname size=1>
<option></option>
<%
set rs0=server.CreateObject("ADODB.Recordset")
sql0="select distinct wauth from ozg where wtype=24"
rs0.Open sql0,con
if rs0.EOF=false then
rs0.MoveFirst
while not rs0.EOF
Response.Write "<option value="&rs0("wauth")&">"&rs0("wauth")&"</option>"
rs0.MoveNext
wend
else
Response.Write "<option> 无</option>"
end if
rs0.Close
%>
</select><font size="2">时间：</font><select size="1" name="year">
<option value=0></option>
<option value=2001>2001</option>
<option value=2002>2002</option>
<option value=2003 selected>2003</option>
<option value=2004>2004</option>
<option value=2005>2005</option>
<option value=2006>2006</option>
<option value=2007>2007</option>
<option value=2008>2008</option>
<option value=2009>2009</option>
<option value=2010>2010</option>
</select><font size="2">年</font>
<select size="1" name="month">
<option value=0></option>
<option value=1>01</option>
<option value=2>02</option>
<option value=3>03</option>
<option value=4>04</option>
<option value=5>05</option>
<option value=6>06</option>
<option value=7>07</option>
<option value=8>08</option>
<option value=9>09</option>
<option value=10>10</option>
<option value=11>11</option>
<option value=12>12</option>
</select><font size="2">月</font><select size="1" name="Day">
<option value=0></option>
<option value=01>01</option>
<option value=02>02</option>
<option value=03>03</option>
<option value=04>04</option>
<option value=05>05</option>
<option value=06>06</option>
<option value=07>07</option>
<option value=08>08</option>
<option value=09>09</option>
<option value=10>10</option>
<option value=11>11</option>
<option value=12>12</option>
<option value=13>13</option>
<option value=14>14</option>
<option value=15>15</option>
<option value=16>16</option>
<option value=17>17</option>
<option value=18>18</option>
<option value=19>19</option>
<option value=20>20</option>
<option value=21>21</option>
<option value=22>22</option>
<option value=23>23</option>
<option value=24>24</option>
<option value=25>25</option>
<option value=26>26</option>
<option value=27>27</option>
<option value=28>28</option>
<option value=29>29</option>
<option value=30>30</option>
<option value=31>31</option>

bangzzdzzgd 2004-01-10