为什么我会得到这个VBScript“溢出”错误？

问题描述：

间歇我收到“VBScript运行时错误‘800a0006’：溢出”在这条线：为什么我会得到这个VBScript“溢出”错误？

Response.Cookies("AffiliateID").Expires = Date() + 30 '30 day cookie

该错误消息引用这条线，但也许它是在它周围的代码，随后发生的事情：

elseif Session("LoggedIn")<>1 and not isEmpty(request.querystring("aff")) then 
    Dim arr_service_area_options, c 
    arr_service_area_options = Split(Application("SERVICE_AREA_OPTIONS"),",") 
    for c = 0 to UBound(arr_service_area_options) 
     if CInt(Trim(request.querystring("aff"))) = CInt(Trim(arr_service_area_options(c))) then 
      Session("AffiliateID") = arr_service_area_options(c) 
      Response.Cookies("AffiliateID") = arr_service_area_options(c) 
      Response.Cookies("AffiliateID").Expires = Date() + 30 '30 day cookie      
      exit for 
     end if 
    next

“也许它是在它周围的代码发生？”除非你向我们展示它的代码，否则我们无法分辨！您所使用的请求中是否存在AffiliateID Cookie？ – 2010-10-29 19:29:50

我从来没有想过这个，所以我重构了代码，因为它是可怕的无论如何:) – 2011-05-13 20:23:21

检查任何代码可能会在附近发生Divide by Zero错误 – Terrance 2010-10-29 19:29:41

答

尝试改变线

Response.Cookies("AffiliateID").Expires = DateAdd("d", 30, Date()) '30 day cookie

为什么我会得到这个VBScript“溢出”错误？

相关推荐