找回密码
 马上注册

QQ登录

只需一步,快速开始

查看: 1259|回复: 0

ASP 编程中20个很有用的例子(合肥世杰学院)

[复制链接]
d
0 0
  @ME: 
发表于 2008-7-10 22:46:19 | 显示全部楼层 |阅读模式
  • 吉安交友查询:性别: 年龄: ~ 高级查找
  • 马上注册,结交更多吉安好友,享用更多功能,让你轻松玩转吉安论坛。

    您需要 登录 才可以下载或查看,没有账号?马上注册

    ×
    学习辅导:ASP 编程中20个非常有用的例子
    时间:2008-7-10 17:25:33  发稿:钱朝勇  点击: 8
    1.如何用Asp判断你的网站的虚拟物理路径
    答:使用Mappath方法
    < p align="center" >< font size="4" face="Arial" >< b >
    The Physical path to this virtual website is:
    < /b >< /font >
    < font color="#FF0000" size="6" face="Arial" >
    < %= Server.MapPath("\")% >
    < /font >< /p >

    2.我如何知道使用者所用的浏览器?
    答:使用the Request object方法

    strBrowser=Request.ServerVariables("HTTP_USER_AGENT")
    If Instr(strBrowser,"MSIE") < > 0 Then
      Response.redirect("ForMSIEOnly.htm")
    Else
      
    Response.redirect("ForAll.htm")
    End If

    3.如何计算每天的平均反复访问人数
    答:解决方法
    < % startdate=DateDiff("d",Now,"01/01/1990")
    if strdate< 0 then startdate=startdate*-1
    avgvpd=Int((usercnt)/startdate) % >
    显示结果

    < % response.write(avgvpd) % >
    that is it.this page have been viewed since November 10,1998

    4.如何显示随机图象

    < % dim p,ppic,dpic
    ppic=12
    randomize
    p=Int((ppic*rnd)+1)
    dpic="graphix/randompics/"&p&".gif"
    % >
    显示
    < img src="< %=dpic% >" >

    5.如何回到先前的页面
    答:< a href="< %=request.serverVariables("Http_REFERER")% >" >
    preivous page< /a >
    或用图片如:< img src="arrowback.gif" alt="< %=request.serverVariables("HTTP_REFERER")% >" >

    6.如何确定对方的IP地址
    答:< %=Request.serverVariables("REMOTE_ADDR)% >

    7.如何链结到一副图片上
    答:< % @Languages=vbscript % >
    < % response.expires=0
    strimagename="graphix/errors/erroriamge.gif"
    response.redirect(strimagename)
    % >

    8.强迫输入密码对话框
    答:把这句话放在页面的开头
    < % response.status="401 not Authorized"
    response.end
    % >

    9.如何传递变量从一页到另一页
    答:用 HIDDEN 类型来传递变量
    < % form method="post" action="mynextpage.asp" >
    < % for each item in request.form % >
    < input namee="< %=item% >" type="HIDDEN"
    value="< %=server.HTMLEncode(Request.form(item)) % >" >
    < % next % >
    < /form >

    10.为何我在 asp 程序内使用 msgbox,程序出错说没有权限
    答:由于 asp 是服务器运行的,如果可以在服务器显示一个对话框,那么你只好等有人按了确定之后,你的程序才能继续执行,而一般服务器不会有人守着,所以微软不得不禁止这个函数,并胡乱告诉你 (:) 呵呵) 没有权限。但是ASP和客户端脚本结合倒可以显示一个对话框,as follows:
    < % yourVar="
    测试对话框
    "% >
    < % script language='javas cript' >
    alert("< %=yourvar% >")
    < /s cript >


    详情请登陆www.sje.cn
    八区报名地址:安徽省合肥市政务文化新区潜山路与习友路交叉口(合肥市体育中心对面)
    八区乘车路线:
    ·火车站、客运总站、旅游汽车站:129路路公交到香径站下,149路公交车到五十四中站下;
    ·新亚汽车站:12路公交车到五十四中站下;
    ·南门换乘中心:坐1路公交车到金东路口换乘126到五十四中站下;
    ·合肥汽车站、昌运汽车站:149路公交车到五十四中站下。
    报名一处:电话:0551-3521919 手机:15956935025 QQ:151720977
    报名二处:电话:0551-3522929 手机:15056975868 QQ:151720979
    u507651
    您需要登录后才可以回帖 登录 | 马上注册

    本版积分规则

    QQ|Archiver|手机版|小黑屋|吉安论坛 ( 赣ICP备2021010355号|赣公网安备36082102000120号 )值班电话:13410000095 站点地图

    GMT+8, 2025-1-31 18:47 , Processed in 0.077058 second(s), 30 queries .

    Powered by Discuz! X3.5

    © 2001-2024 Discuz! Team.

    快速回复 返回顶部 返回列表