ASP初学者求教 ASP代码

[复制链接]
查看11 | 回复2 | 2009-6-11 12:38:25 | 显示全部楼层 |阅读模式
欢迎:范县新型农村合作医疗县内住院病人登记表
医疗机构:
=#"&date()&"# order by id desc"set rs=server.createobject("adodb.recordset")rs.open exec,conn,1,1%>
登记日期家庭地址患者姓名合作医疗证号性别年龄诊断住院科室主管医师联系电话入院日期是否在院
第页 [url=]">[/url] [url=]">下页[/url] 第页 [url=]">[/url] [url=]">上页[/url] 没有任何记录!pagecount then%>没有任何记录!第页 [url=]">[/url] [url=]">上页[/url] [url=]">下页[/url]
这样就没问题了,这分好多呀
回复

使用道具 举报

千问 | 2009-6-11 12:38:25 | 显示全部楼层
if not (rs.bof and rs.eof) thenresponse.write "你查找你的内容为空"response.end()end if
回复

使用道具 举报

千问 | 2009-6-11 12:38:25 | 显示全部楼层
代码如下:-------------------------------------------------------On Error Resume Next Set Conn = Server.CreateObject("ADODB.Connection") Conn.Open Connstr If Err ThenErr.ClearSet Conn = NothingResponse.Write "数据库连接出错,请打开conn.asp文件检查连接字串。"Response.End End If------------------Err使系统自定义的不用自己定义,你把下面的代码加行就可以了-----------------------------------
If Err ThenErr.ClearSet Conn = NothingResponse.Write "数据库连接出错,请打开conn.asp文件检查连接字串。"Response.End
End If参考资料:http://hi.baidu.com/maoniu_1

已赞过已踩过<
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

主题

0

回帖

4882万

积分

论坛元老

Rank: 8Rank: 8

积分
48824836
热门排行