| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
共有 948 人关注过本帖
标题:小白问题,如何查询并显示
只看楼主 加入收藏
y12692189
Rank: 1
等 级:新手上路
帖 子:52
专家分:0
注 册:2021-9-23
结帖率:63.64%
收藏
已结贴  问题点数:20 回复次数:6 
小白问题,如何查询并显示
sql2000数据库,库名:sfxt,表名:yzdh,字段:id,yzdz,lxdh,tjsj,sf

如何输入一个关键字,查询数据库中的数据并显示出来?

有没有现成的asp代码给发一段?输入框、按钮都做好了,不知道按钮的执行命令放在哪儿?

VFP转过来学习的老白(50岁中年小白)

代码如下:如果有大神给改一下就更好了
程序代码:
<!--#include file="conn.asp" -->
<%
if request("cxdh")<>"" or request("cxdh.x")<>"" then
'查询数据
strSQL = "select * from  yzdh  where yzdz like  '%"&request("telc")&"%' or lxdh like  '%"&request("telc")&"%' "
ExecSQL(strSQL)
'strsql="select * from  yzdh  where yzdz like  '%"&request("telc")&"%' or lxdh like  '%"&request("telc")&"%'"



end if


if request("BEdit")<>"" or request("BEdit.x")<>"" then
'修改数据
strSQL = "update yzdh set yzdz='"&request("yzdz")&"',lxdh = '"&request("lxdh")&"' where id = '"&request("id")&"'"
'response.write strSQL
'response.end
ExecSQL(strSQL)
end if

if request("BDel")<>"" or request("BDel.x")<>"" then
'删除数据
strSQL = "update yzdh set sf = 0 where id =  "&request("id")&" "
ExecSQL(strSQL)
end if

if request("BAdd")<>"" or request("BAdd.x")<>"" then
'增加数据
strSQL = "insert into yzdh(yzdz,lxdh)  values('"&request("yzdz")&"','"&request("lxdh")&"')  "
ExecSQL(strSQL)
end if
%>

<html>

<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>业主电话管理</title>
<style>

.tbradius
{
border-color: #cfc4a6;
border-width: 1px;
border-style: solid;
border-radius: 0.4em;
background-color:#f2ecdc
}

.tbradius1 {border-color: #cfc4a6;
border-width: 1px;
border-style: solid;
border-radius: 0.4em;
background-color:#f2ecdc
}
</style>
</head>

<body topmargin="0" leftmargin="0" rightmargin="0" bottommargin="0" bgcolor="#e9e0c9">
<table border="1" width="100%" cellspacing="3" cellpadding="0" style="border-width: 0">
    <tr>
        <td class="tbradius" style="background-color: #685A37" height="25"> 
        <font color="#FFFFFF">&nbsp;
        <span style="font-size: 12px; font-weight: 700">业主电话管理</span> </font></td>
    </tr>
</table>

    <tr>
        <td>
        <p align="left">地址:  <input type="text" name="telc" size="20" style="border: 1px solid #C0C0C0; padding-left: 4px; padding-right: 4px; padding-top: 1px; padding-bottom: 1px" value = "30-1-">    <input type="submit" value=" 查询 " name="cxdh">
        </td>
    </tr>
    


<table border="0" width="100%" cellspacing="3" cellpadding="0">
    <tr>
        <td style="border-bottom:1px solid #C0C0C0; border-left-width: 1px; border-right-width: 1px; background-color:#CFC4A6" width="100" height="30" align="center" class="tbradius">
        <span style="font-size: 9pt"><b>编号</b></span></td>
        <td style="border-bottom:1px solid #C0C0C0; border-left-width: 1px; border-right-width: 1px; background-color:#CFC4A6" width="120" height="30" align="center" class="tbradius">
        <b><span style="font-size: 9pt">地址</span></b></td>
        <td style="border-bottom:1px solid #C0C0C0; border-left-width: 1px; border-right-width: 1px; background-color:#CFC4A6" width="70" height="30" align="center" class="tbradius">
        <b><span style="font-size: 9pt">电话</span></b></td>
        <td style="border-bottom:1px solid #C0C0C0; border-left-width: 1px; border-right-width: 1px; background-color:#CFC4A6" width="70" height="30" align="center" class="tbradius">
        <b><span style="font-size: 9pt">添加时间</span></b></td>
        <td style="border-bottom:1px solid #C0C0C0; border-left-width: 1px; border-right-width: 1px; background-color:#CFC4A6" width="100" height="30" class="tbradius">
        <p align="center"><b><span style="font-size: 9pt">操作</span></b></td>
    </tr>    

        <%
        set rs_yzdh= Server.CreateObject("ADODB.Recordset")
        strsql="select top 100 * from yzdh where sf = 1 order by id desc"
        rs_yzdh.open strsql,strconn,1,1
        do while (not rs_yzdh.EOF)

        %>
    <form id="form_<%=rs_yzdh("id")%>">
    <tr>
        <td style="border-left-width: 1px; border-right-width: 1px" width="100" height="32"><input id="id" name="id" value = "<%=rs_yzdh("id")%>" style="width:100% ; height:100%" readonly  class="tbradius"></td>
        <td style="border-left-width: 1px; border-right-width: 1px" width="70" height="32"><input id="yzdz" name="yzdz" value="<%=rs_yzdh("yzdz")%>" style="width:100% ; height:100%" class="tbradius"></td>
        <td style="border-left-width: 1px; border-right-width: 1px" width="70" height="32"><input id="lxdh" name="lxdh" value="<%=rs_yzdh("lxdh")%>" style="width:100% ; height:100%" class="tbradius"></td>
        <td style="border-left-width: 1px; border-right-width: 1px" height="32" width="100"><input id="tjsj" name="tjsj" value="<%=rs_yzdh("tjsj")%>" style="width:100% ; height:100%" class="tbradius" size="1"></td>
        <td style="border-left-width: 1px; border-right-width: 1px" width="100" align="center" class="tbradius"><input border="0" src="images/save.png" name="BEdit" width="32" height="32" type="image"><input border="0" src="images/delete.png" name="BDel" width="32" height="32" type="image"></td>
    </tr>        
    <tr>
        <td style="border-left-width: 1px; border-right-width: 1px;height:5px" colspan="7" width="100" background="images/line.png"><img border="0" src="images/line.png" width="6" height="5"></td>
    </tr>    
    </form>
        
        
        
        <%    
        rs_yzdh.movenext
        loop
        rs_yzdh.close:set rs_yzdh= nothing
        %>








    <form id="form_0">
    <tr>
        <td style="border-left-width: 1px; border-right-width: 1px" width="100" height="32"  class="tbradius"><img border="0" src="images/auto.png" width="32" height="32"></td>
        <td style="border-left-width: 1px; border-right-width: 1px" width="70" height="32"><input id="yzdz" name="yzdz" value="" style="width:100% ; height:100%" class="tbradius"></td>
        <td style="border-left-width: 1px; border-right-width: 1px" width="70" height="32"><input id="lxdh" name="lxdh" value="" style="width:100% ; height:100%" class="tbradius1"></td>
        <td style="border-left-width: 1px; border-right-width: 1px" height="32" width="100"><input id="busw" name="bzsw" value="" style="width:100% ; height:100%" class="tbradius" size="1"></td>
        <td style="border-left-width: 1px; border-right-width: 1px" width="100" align="center" class="tbradius">
        <input border="0" src="images/save.png" name="BAdd" width="32" height="32" type="image"></td>
    </tr>        
    </form>
</table>
</body>

</html>


[此贴子已经被作者于2023-7-10 18:15编辑过]

搜索更多相关主题的帖子: request class input name style 
2023-07-10 18:02
yiyanxiyin
Rank: 16Rank: 16Rank: 16Rank: 16
等 级:版主
威 望:9
帖 子:176
专家分:1253
注 册:2023-6-29
收藏
得分:20 
这种写法代码逻辑很混乱, 现在前端框架非常强大,  可以用vue element ui + asp(asp仅做后端,只操作数据等后端业务, 不要涉及html界面),  asp只返回数据丢给前端,  前后端通过ajax通信, 数据采用json
2023-07-10 18:39
y12692189
Rank: 1
等 级:新手上路
帖 子:52
专家分:0
注 册:2021-9-23
收藏
得分:0 
高手,您说的我不太懂,也不想学太高深的东西了,我想实现的就是一个能输入地址查电话的网页,没那么复杂
2023-07-10 18:57
yiyanxiyin
Rank: 16Rank: 16Rank: 16Rank: 16
等 级:版主
威 望:9
帖 子:176
专家分:1253
注 册:2023-6-29
收藏
得分:0 
非要改上面的代码 你得看看FORM的用法
2023-07-10 18:58
yiyanxiyin
Rank: 16Rank: 16Rank: 16Rank: 16
等 级:版主
威 望:9
帖 子:176
专家分:1253
注 册:2023-6-29
收藏
得分:0 
要学也不能学被淘汰的技术 除非你在维护老系统
2023-07-10 19:00
y12692189
Rank: 1
等 级:新手上路
帖 子:52
专家分:0
注 册:2021-9-23
收藏
得分:0 
好的,再问个小白问题,一个网页可以同时查询两个服务器的数据吗?
2023-07-10 19:37
yiyanxiyin
Rank: 16Rank: 16Rank: 16Rank: 16
等 级:版主
威 望:9
帖 子:176
专家分:1253
注 册:2023-6-29
收藏
得分:0 
可以
2023-07-11 09:54
快速回复:小白问题,如何查询并显示
数据加载中...
 
   



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

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