请问有什么解决的方法吗?

用ACDsee 把图片 另存为  覆盖掉以前的图片就行.

原因就是你的图片里有点东西,  用记事本打开看看就知道了.

不是这个问题.这段代码的意思是什么?

 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

   'Response.Write "<script>alert('请不要非法上传！');history.back();</script>"
   'Response.end      

  把这两句给注释掉