荔园在线
荔园之美，在春之萌芽，在夏之绽放，在秋之收获，在冬之沉淀
[回到开始]
[上一篇][下一篇]
发信人: nicq (NoName), 信区: Homepage
标 题: asp代码精华(二)
发信站: 荔园晨风BBS站 (Wed Apr 23 13:25:58 2003), 站内信件
asp编程有用的例子（一）
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=vbs cript % >
< % 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="测试对话框"% >
< % s cript language='javas cript' >
alert("< %=yourvar% >")
< /s cript >
11.有没有办法保护自己的源代码，不给人看到
答：可以去下载一个微软的Windows s cript Encoder，它可以对asp的脚本和客户端javas
cript/vbs cript脚本进行加密。。。不过客户端加密后，只有ie5才能执行，服务器端脚本
加密后，只有服务器上安装有s cript engine 5（装一个ie5就有了）才能执行。
12.怎样才能将 query string 从一个 asp 文件传送到另一个？
答：前者文件加入下句： Response.Redirect("second.asp?" &
Request.ServerVariables("QUERY_STRING"))
13.global.asa文件总是不起作用?
答：只有web目录设置为web application, global.asa才有效，并且一个web application
的根目录下 global.asa才有效。IIS4可以使用Internet Service Manager设置
application setting 怎样才能使得htm文件如同asp文件一样可以执行脚本代码？
14.怎样才能使得htm文件如同asp文件一样可以执行脚本代码？
答：Internet Sevices Manager - > 选择default web site - >右鼠键- >菜单属性-〉主
目录- > 应用程序设置（Application Setting）- > 点击按钮 "配置"- > app mapping -
>点击按钮"Add" - > executable browse选择 \WINNT\SYSTEM32\INETSRV\ASP.DLL
EXTENSION 输入 htm
method exclusions 输入PUT.DELETE 全部确定即可。但是值得注意的是这样对htm也要由
asp.dll处理，效率将降低。
15.如何注册组件
答：有两种方法。
第一种方法：手工注册 DLL 这种方法从IIs 3.0一直使用到IIs 4.0和其它的Web Server。
它需要你在命令行方式下来执行，进入到包含有DLL的目录，并输入：regsvr32
component_name.dll 例如 c:\temp\regsvr32 AspEmail.dll
它会把dll的特定信息注册入服务器中的注册表中。然后这个组件就可以在服务器上使用了
，但是这个方法有一个缺陷。当使用这种方法注册完毕组件后，该组件必须要相应的设置
NT的匿名帐号有权限执行这个dll。特别是一些组件需要读取注册表，所以，这个注册组件
的方法仅仅是使用在
服务器上没有MTS的情况下，要取消注册这个dll，使用：regsvr32 /u aspobject.dll
example c:\temp\regsvr32 /u aneiodbc.dll
第二种方法：使用MTS(Microsoft Transaction Server) MTS是IIS 4新增特色，但是它提供
了巨大的改进。MTS允许你指定只有有特权的用户才能够访问组件，大大提高了网站服务器
上的安全性设置。在MTS上注册组件的步骤如下：
1) 打开IIS管理控制台。
2) 展开transaction server，右键单击"pkgs installed"然后选择"new package"。
3) 单击"create an empty package"。
4) 给该包命名。
5) 指定administrator帐号或则使用"interactive"（如果服务器经常是使用
administrator 登陆的话）。
6) 现在使用右键单击你刚建立的那个包下面展开后的"components"。选择 "new then
component"。
7) 选择 "install new component" 。
8) 找到你的.dll文件然后选择next到完成。
要删除这个对象，只要选择它的图标，然后选择delete。
附注：特别要注意第二种方法，它是用来调试自己编写组件的最好方法，而不必每次都需要
重新启动机器了。
16. ASP与Access数据库连接：
<%@ language=VBs cript%>
<%
dim conn,mdbfile
mdbfile=server.mappath("数据库名称.mdb")
set conn=server.createobject("adodb.connection")
conn.open "driver={microsoft access driver (*.mdb)};uid=admin;pwd=数据库密码;
dbq="&mdbfile
%>
-- (S-Term)Sorry, i'm not here
※ 来源:·荔园晨风BBS站 bbs.szu.edu.cn·[FROM: 192.168.0.180]
[回到开始]
[上一篇][下一篇]
荔园在线首页 友情链接：深圳大学 深大招生 荔园晨风BBS S-Term软件 网络书店