• 首页
• 服务器租用
• 企业邮箱
• 虚拟主机
• 网站程序
• 营销推广
• 网站建设
• 域名注册
• 前端开发
• 网站备案

• 当前位置：创新互联 >> 常见问题 >> 网站程序 >> asp程序 >> Asp深度揭密之四

Asp深度揭密之四

• 作者：创新互联 文章来源：网站程序部 点击数： 更新时间：2010-09-26
• 一、IIS最优化配置
  1．Web站点选项卡：IP、端口、虚拟主机、连接、日志
  2．ISAPI筛选器：加入PHP和JSP支持
  3．主目录配置选项卡：I IS权限设定(结合文件权)、执行许可、应用程序保护、映射、缓冲、父路径、出错信息
  4．其他选项卡：自定义错误、Http头、目录安全性、文档
  5．文件压缩带来的好处和坏处
  二、其他
  1． 发送邮件（JMail；Ms smtp）
  使用Microsoft Smtp发送电子邮件
  ⑴．安装Microsoft SMTP Service
  ⑵．设置Microsoft SMTP Service
  ⑶．代码部分：
  mail_smtp.asp
  ＜%
  sub sendmail(fromwho,towho,subject,body)
  dim mymail
  set mymail = server.createobject("cdonts.newmail")
  mymail.from = fromwho
  mymail.to = towho
  mymail.subject = subject
  mymail.body = body
  mymail.send
  set mymail = nothing
  end sub
  %＞
  该子程序接受4个与下列各条对应的参数。
  l 邮件发送者的email地址
  l 邮件接收者的email地址
  l 邮件主题
  l 邮件内容
  使用方法：
  ＜%
  fromWho=…
  toWho=…
  Subject=…
  Body=…
  IF toWho <> "" THEN
  sendMail fromWho, toWho, Subject, Body
  END IF
  %＞
  使用Jmail发送Email
  略，有兴趣可以和我探讨，Jmail这个软件我也有。
  2． 解压Zip文件（Wscript.Shell和Winzip command line；Java组件）
  ⑴．安装Winzip 8.1以上
  ⑵．安装Winzip command line
  ⑶．将工作目录的文件权设置为Internet用户可以读取、写入和修改
  ⑷．代码部分：
  unzip_a_zipfile.asp
  ＜%
  '用shell对象启动程序
  'zip_path是具体zip文件的路径，如c: est.zip
  'path是存放解压后文件的路径
  'ond是命令行参数
  set wshshell = server.createobject("wscript.shell")
  issuccess = wshshell.run ("wzunzip -ond "&zip_path&" "&path,1,true)
  '删除zip文件
  set myfileobject=server.createobject("scripting.filesystemobject")
  myfileobject.deletefile zip_path
  '判断是否成功以继续操作
  if issuccess = 0 then
  '成功
  ...
  else
  '失败
  ...
  end if
  %>
  3． 操作XML文件
  本次交流时间有限，有时间再做详细探讨，林业可以登录成都创新互联论坛，和更多的人进行交流。
  4．文件上传
  ⑴．安装文件上传组件Asp fileup（支持多文件上传，文件类型及大小判断，文件上传后改名等）
  ⑵．重起IIS以使上传组件生效
  ⑶．设置上传目录的文件权为Internet用户可以读取、写入和修改
  ⑷．代码部分
  upload_file.htm
  ＜style type="text/css"＞
  ＜!--
  .input {background-color: #FFFFFF; border-bottom: black 1px solid;border-left: black 1px solid; border-right: black 1px solid;border-top: black 1px solid; color: #000000;font-family: Georgia; font-size: 9pt;color: midnightblue;}
  a:link {color: #1B629C; text-decoration: none}
  a:hover {color: #FF6600; text-decoration: underline}
  a:visited {text-decoration: none}
  --＞
  ＜/style＞
  ＜center＞
  ＜form enctype="multipart/form-data" method="post" action="upload_file.asp" name="Upload"＞
  ＜input type="hidden" name="CopyrightInfo" value="http://www.chinaasp.com"＞
  请选择文件： 请选择文件： ＜/form＞
  ＜br＞ ＜a href="javascript:document.Upload.submit();"＞ 提 交 ＜/center＞
  upload_file.asp
  ＜%
  on error resume next
  '定义获得文件后缀的函数
  function getfileextname(filename)
  pos=instrrev(filename,".")
  if pos＞0 then
  getfileextname=mid(filename,pos+1)
  else
  getfileextname=""
  end if
  end function
  '定义获取文件正名的函数
  function getfilename(filename)
  lens=len(filename)-len(getfileextname(filename))-1
  getfilename=left(filename,lens)
  end function
  '创建文件上传组件的对象
  set fileup=server.createobject("chinaasp.upload")
  '循环读取用户上传的文件，并保存在服务器上
  for each f in fileup.files
  '当用户没有选择文件或文件大小超过10m时返回到选择上传文件的页面
  if f.filename="" or f.filesize＞10485500 then response.redirect "upload_file.htm"
  '获取保存的路径
  path=server.mappath("upload_file.asp")
  path=left(path,len(path)-15)
  '保存文件
  f.saveas path&getfilename(f.filename)&"."&getfileextname(f.filename) <
  next
  response.redirect "upload_file.htm"
  %＞
  5．驱动器/目录/文件操作
  本次交流时间有限，有时间再做详细探讨
  6． Asp编写与调试经验：
  cookies和session如何选择、cookies数量陷阱、页面过期和缓冲设定、移植性如何保证、如何应付内部服务器500错误……
  1．Cookies和Session的选择：
  ⑴．共同特点
  ⑵．不同之处：
  ①．工作方式
  ②．过期条件
  ③．对服务器的性能影响
  2．Cookies数量陷阱：
  IIS可以保存一般的cookies不超过20个，再定义新的Cookies以前的Cookies的值就丢失了，这样对大型应用显然局限性非常大，如何解决这个问题呢？
  答案是使用二维Cookies。
  例子：
  测试一维Cookies数量极限：
  test_cookies_1.asp
  ＜%
  for i=1 to 50
  response.cookies("cookies_"&i)=i
  next
  %＞
  test_cookies_2.asp
  ＜%
  for i=1 to 50
  response.write request.cookies("cookies_"&i)&" next
  %＞
  效果：
  先访问test_cookies_1.asp，再访问test_cookies_2.asp,，发现了什么？
  test_cookies_3.asp
  ＜%
  for i=1 to 50
  response.cookies("cookies_"&i)=i
  next
  for i=1 to 50
  response.write request.cookies("cookies_"&i)&" next
  %＞
  效果：
  没有Cookies丢失！！！！
  测试二维Cookies数量极限：
  test_cookies_4.asp
  ＜%
  for i=1 to 301
  response.cookies("tuht")("cookies_"&i)=i
  next
  %＞
  test_cookies_5.asp
  ＜%
  for i=1 to 301
  response.write request.cookies("tuht")("cookies_"&i)&" next
  %＞
  效果：
  使用这种方式可以使用201*20=4020个Cookies！！！！
  3．页面过期和缓冲设定
  ＜%
  '过期和缓冲处理
  response.buffer=true
  response.cachecontrol="no-chache"
  response.expiresabsolute=now()-1
  response.expires=0
  %＞
  html中还可以做设定：
  ＜meta content="no-cache" http-equiv="Pragma"＞
  ＜meta HTTP-EQUIV="Expires" CONTENT="0"＞
  4．移植性的保证
  ⑴．包含文件
  ＜!--#include file="top.asp" --＞
  ⑵．使用server.mappath寻找文件路径，避免在页面中直接使用绝对路径
  ⑶．尽量使用组件封装业务逻辑 }
  5．调试内部服务器500的错误
  ⑴．设置IIS显示具体的错误信息
  ⑵．分步调试，由上而下
  ⑶．打印某些重要的变量的值，检查是否为我们预期
  ⑷．根据经验来判断错误
  6． 操作Word文档
  ⑴．安装Office 2000，其中Word 2000必选
  ⑵．设置IE中Internet的安全性：ActiveX控件和插件全部启用
  ⑶．设置工作目录的文件权为Internet及System读取/修改/写入
  ⑷．编写模版course.dot
  ⑸．具体代码：
  opr_doc_inc.asp
  ＜%
  Response.write "Dim Var_Num" & chr(13)
  Response.write " V
• 如何利用ASP实现邮箱访问 :上一篇
  改mdb为asp所带来的灾难 :下一篇