易截截图软件、单文件、免安装、纯绿色、仅160KB

[ASP中使用三层架构] 5.Error处理类

    看到有朋友说前面一章讲得没必要,想想也确实.本来是没有打算讲这些基础的,只是行文起来没有约束,就荡开到基础知识上面了.
    从这节开始,将会给大家介绍ASP中的三大通用类,它贯穿于我所设计的三层架构中,是对ASP语法的扩展,可以提高很多细节处理上的效率,可以算是一点点框架的味道.
    本节介绍错误处理类,类名Con_Error,在代码页面之初就进行初始化,实例名为e,以下的e.add 即使用该错误类的实例化对象进行操作.
    
    
    方法介绍:
    e.Add(ByVal vErrorMessage ) 记录一个错误,并且设置 e.Error = true . 在程序检测用户名合法性等地方发现错误时,就调用这个方法,记录一个错误信息.
    例如,用户登陆时密码错误,则调用 e.add("您的账号或密码错误") .这时候,错误对象e中便记录了一个错误,错误对象的属性e.Error=true .在后续操作中,可以使用错误对象的这个属性进行判断.
    例如:
    出现错误后弹出小窗口提示错误,并返回前一页.
    if e.Error then
        e.Alert_Back "请重新登录!"  'Alert_Back 的作用在后面介绍.
    end if
    
    e.Alert_Back(ByVal vMessage) 使用Javascript弹出一个错误提示框,显示目前所有的错误列表,Alert_Back(vMessage)中的vMessage显示在最后一行,用于提示用户在看到这个错误信息后需要采取的步骤.  并且返回到前一页. 这个方法的代码贴出来,大家会更好理解:
    Public Sub Alert_Back(ByVal vMessage)
        strJSMessage = JSMessage & vMessage     'JSMessage用于存储e对象中的错误列表,每个错误之间用\n分开.
        %>
        <script language="javascript" >
        <!--//
            alert("<%=strJSMessage %>");        '弹出提示错误框.
  


相关文档:

asp图片滚动

<%
Const New_img=10     
set rs_Product=server.createobject("adodb.recordset")
sqltext="select top " & New_img & " * from 0791idc_Product order by ID"
rs_Product.open sqltext,conn,1,1
if not rs_Product.EOF then%>
<div align='center' id='demo' style='o ......

asp网页里,sql常用操作语句!

添加、删除、修改使用
db.Execute(Sql)命令执行操作
╔----------------╗
☆ 数据记录筛选 ☆
╚----------------╝
注意:单双引号的用法可能有误(没有测式)
 
Sql = "Select
Distinct
字段名 from 数据表"
Distinct函数,查询数据库存表内不重复的记录
 
......

如何配置ASP运行环境

1.如果您的操作系统为Windows 98,请运行 Windows98的安装光盘。在其Add-ons\pws目录下找到pws的安装程序,运行安装即可
2.如果操作系统为 Windows 2000 以上,可以按图4.1.1的方法安装 IIS:
打开【控制面板】,找到 【添加/删除程序】→【添加/删除WINDOWS组件】,
弹出 【Windows 组件向导】 ,选择 【Internet ......

asp获取一个文件夹及其子文件夹下的所有图片地址

原文链接:http://www.iwapr.cn/article/daima/30.html
ASP/Visual Basic代码
<%   
dim picurl,all_picurl   
 
'皆是全局变量:分别定义图片的链接地址;所有指定文件夹(包括指定文件夹的子文件夹下图片url地址)   
 
picurl=""   &n ......

asp连接access数据例子

<%Dim connstrconnstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("Stu.mdb")
Set bb = Server.CreateObject("ADODB.Connection")
bb.Open connstr%>
<html>
<head>
<meta http-equiv="content-Language" content="zh-cn" />
<meta http-equiv="Content-Type ......
© 2009 ej38.com All Rights Reserved. 关于E健网联系我们 | 站点地图 | 赣ICP备09004571号