账号通
    

账号  

密码  

3429

查看

14

回复
主题:急[求助]为什么上传不了图片,提示非法上传 [收藏主题] 转到:  
reed821 当前离线

8

主题

0

广播

0

粉丝
添加关注
级别:学前班

用户积分:251 分
登录次数:6 次
注册时间:2007/5/11
最后登录:2010/6/17
reed821 发表于:2010/6/17 11:35:00   | 显示全部帖子 查看该作者主题 楼主 
科汛智能建站系统
以下是引用nanwoni在2010-5-31 9:34:00的发言:

还是不行,我觉得应该是这段代码的问题.Function IsSelfRefer()
   Dim sHttp_Referer, sServer_Name
   sHttp_Referer = CStr(Request.ServerVariables("HTTP_REFERER"))
   sServer_Name = CStr(Request.ServerVariables("SERVER_NAME"))
   If Mid(sHttp_Referer, 8, Len(sServer_Name)) = sServer_Name Then
   IsSelfRefer = True
   Else
   IsSelfRefer = False
   End If
  End Function

 
嗯 对 这句话注释了也没效果

 
  支持(0) | 反对(0) 回到顶部顶端 回到底部底部
<上一主题 | 下一主题 >
Powered By KesionCMS Version X1
厦门科汛软件有限公司 © 2006-2016 页面执行0.06250秒 powered by KesionCMS 9.0