使用动易的朋友经常遇到后台上传图片出错，提示：
Microsoft VBScript 运行时错误 错误 ';800a005e';
无效使用 Null
\Include\PowerEasy.UPfile.asp,line 63
以下是解决办法：
用以下代码替换Start.asp中Sub InitVar()内容。
Sub InitVar()
If Not(LCase(Mid(ScriptName, InStrRev(ScriptName, "/") + 1)) = "upfile.asp" or LCase(Mid(ScriptName, InStrRev(ScriptName, "/") + 1)) = "imokerupfile.asp") Then
If Request("page") <> "" Then
CurrentPage = PE_CLng(Request("page"))
Else
CurrentPage = 1
End If
MaxPerPage = PE_CLng(Trim(Request("MaxPerPage")))
If MaxPerPage <= 0 Then MaxPerPage = 20
SearchType = PE_CLng(Trim(Request("SearchType")))
strField = Trim(Request("Field"))
Keyword = ReplaceBadChar(Trim(Request("keyword")))
If Request("ComeUrl") = "" Then
ComeUrl = Trim(Request.ServerVariables("HTTP_REFERER"))
Else
ComeUrl = Trim(Request("ComeUrl"))
End If
Action = Trim(Request("Action"))
End If
arrSubDomains = Split("|" & strSubDomains, "|")
ObjInstalled_FSO = IsObjInstalled(objName_FSO)
If ObjInstalled_FSO = True Then
Set fso = Server.CreateObject(objName_FSO)
End If
FoundErr = False
ErrMsg = ""
Site_Sn = Replace(Replace(LCase(Request.ServerVariables("SERVER_NAME") & InstallDir), "/", ""), ".", "")
arrCardUnit = Array("点", "天", "月", "年", "元", "卡")
arrUserType = Array("个人会员", "企业会员（创建者）", "企业会员（管理员）", "企业会员（普通成员）", "企业会员（待审核成员）")
arrFileExt = Array(".html", ".htm", ".shtml", ".shtm", ".asp")
Set XmlDoc = CreateObject("Microsoft.XMLDOM")
XmlDoc.async = False
End Sub
