| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 442 人关注过本帖
标题:关于提示ASP信息的请教
取消只看楼主 加入收藏
xiangbide
Rank: 1
等 级:新手上路
帖 子:3
专家分:0
注 册:2011-11-18
结帖率:0
收藏
已结贴  问题点数:20 回复次数:2 
关于提示ASP信息的请教
我在网上下了一段代码,是关于粥谱的,但是本人不会ASP,哪位大虾帮小弟改改
以下这段代码当找不到数据时,就会打开空网页(网页无内容),我想加个“提示信息”,比如:“请重新输入”类似这样的话,怎么加啊?在哪加啊?
代码如下:
---------------------------------------------------------------------------------------------------------
<!--#include file="conn.asp"-->
<!--#include file="page.asp"-->
<%
title=Request.form("title")
'Response.Write title
Set mm=new Cls_PageView
With mm
    '设置每一页的记录条数据为30条
    .PageSize=40
    '得到数据库连接
    .GetConn=Conn
    .GetTbName="zhoupu"
    .GetField="id,title"
    .GetWhere="title like '%"&title&"%'"
    .GetKey="id"
    .GetOrder="id"
End With
'返回Recordset
Set Rs=mm.GetRs()

i = 0

iCols = 5
iColsPercent = FormatPercent(1 / iCols, 0)
%>
<form method="POST" action="search.asp">
请输入您要查询的粥名:<input type="text" name="title" size="22" value="<%=title%>">
<input type="submit" value="查询" name="B1"></form>


<p><br>



喝粥的好处<br>
<br>
  1.容易消化。白米熬煮温度超过60摄氏度就会产生糊化作用,熬煮软熟的稀饭入口即化,下肚后非常容易消化,很适合肠胃不适的人食用。 <br>
  2.增强食欲,补充体力。生病时食欲不振,清粥搭配一些色泽鲜艳又开胃的事物,既能促进食欲,又为虚弱的病人补充体力。 <br>
  3.防止便秘。稀饭含有大量的水分,平日多喝粥,除能果腹止饥之外,还能为身体补充水分,有效防止便秘。 <br>
  4.预防感冒。天冷时,清早起床喝上一碗热粥,可以帮助保暖、增加身体御寒能力,能预防受寒感冒。 <br>
  5.防止喉咙干涩。对于喉咙不适、发言疼痛的人,温热的粥汁能滋润喉咙,有效缓解不适感。 <br>
  6.调养肠胃。胃功能较弱或溃疡患者,平日应少食多餐、细嚼慢咽,很适合喝稀饭调养肠胃。 <br>
  7.延年益寿。喝粥可以延年益寿,五谷杂粮熬煮成粥,含有更丰富的营养素与膳食纤维,对于年长、牙齿松动的人或病人,多喝粥可防小病,更是保健养生的最佳良方。 </p>


<table border="1" width="654" id="table1" cellpadding="5" style="border-collapse: collapse;vertical-align:middle;"><tr>
<%
Do While (i<=mm.PageSize-1) and not rs.eof

   If i > 0 And i Mod iCols = 0 Then Response.Write "</tr><tr>"
   i = i + 1
%>
        <td><a target="_blank" href="moon.asp?id=<%=Rs("id")%>"><%=Rs("title")%></a></td>
<%
   Rs.MoveNext
Loop

Do While i < iPageSize
   If i Mod iCols = 0 Then
       Response.Write "</tr><tr>"
   End If
   i = i + 1
   Response.Write "<td></td>"
Loop
Rs.close
set Rs=nothing
Response.Write "</tr>"
Response.Write "</table>"
Response.Write mm.ShowPage()
%>
搜索更多相关主题的帖子: 提示信息 include title file 
2011-11-18 14:23
xiangbide
Rank: 1
等 级:新手上路
帖 子:3
专家分:0
注 册:2011-11-18
收藏
得分:0 
!!!没人回啊?
2011-11-18 18:17
xiangbide
Rank: 1
等 级:新手上路
帖 子:3
专家分:0
注 册:2011-11-18
收藏
得分:0 
回复 3楼 cnfarer
能告诉我怎么写吗?我不懂ASP,嘿嘿
2011-11-19 00:52
快速回复:关于提示ASP信息的请教
数据加载中...
 
   



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

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