来源:自学PHP网 时间:2015-04-17 11:59 作者: 阅读:次
[导读] 智思留言本4.1正式版,发表留言上传附件可以直接上传ASP执行文件.If Action="addsave" Then KeywordsFilter(FilterKeyWord)Dim RequestU,intCount,i,formName,FileSavePath,FileSaveName,uploadsDirVarR......
|
智思留言本4.1正式版,发表留言上传附件可以直接上传ASP执行文件.
'If Action="addsave" Then KeywordsFilter(FilterKeyWord)
Dim RequestU,intCount,i,formName,FileSavePath,FileSaveName,uploadsDirVar
RelatePath=""
FileSavePath="./ufiles/"&Year(Date())&"/"&Right("0"&Month(Date()),2)&"/"'"ufiles/2009/"
'Set RequestU=new UpLoadClass
'RequestU.FileType="gif/jpg/rar/zip/7z/swf/bmp/png/jpeg"
'RequestU.SavePath=FileSavePath
'RequestU.MaxSize=20000*1024 '20M
'RequestU.Charset="UTF-8"
'RequestU.Open()
Set RequestU=New FreeASPUpload
'If HasPermission(9) Then
'uploadsDirVar=Server.MapPath(FileSavePath)
'RequestU.Save(uploadsDirVar)
RequestU.Upload()
'End If
![]() 修复方案:
你懂的.. |
自学PHP网专注网站建设学习,PHP程序学习,平面设计学习,以及操作系统学习
京ICP备14009008号-1@版权所有www.zixuephp.com
网站声明:本站所有视频,教程都由网友上传,站长收集和分享给大家学习使用,如由牵扯版权问题请联系站长邮箱904561283@qq.com