5． 卸载组件
  
   ⑴.使用regsvr32注册的组件，使用-u开关卸载：
  
  
   注意：先进入组件dll所在的目录，然后使用“regsvr32 –u dll_file_name”卸载；卸载后重启IIS即可。
  
   ⑵．使用MTS注册的组件，先在“组件服务”中删除对应的应用程序，然后再执行步骤 ⑴ 以彻底卸载组件。
  
  
   6． Dll组件存放位置和权限设定
  
   ⑴．我们只需要把编译生成的Dll文件拷贝出来即可，其他的文件不用做处理
   ⑵．要把Dll放到Web站点之外，如system32目录里，防止被下载
   ⑶．Dll的文件权设置为System读取，Internet用户遍历文件夹/运行文件
   ⑷．Dll在IIS中去掉所有的权限，如读取，脚本自愿访问等
   经过上述处理，可以确保Dll文件的安全。
  
   7． 其他
  
   如何在组件中使用Asp的对象以方便的将Asp代码移植为COM组件？
  
  
   五、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:\test.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">
   请选择文件：<input type="file" name="file1" class="input"><br><br>
   请选择文件：<input type="file" name="file2" class="input"><br><br>
   </form>
   <br><br>
   <a href="javascript:document.Upload.submit();"> 提 交 </a>
   </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"
   %>  做人要厚道，请注明转自酷网动力(www.ASPCOOL.COM)。