2010-10-29 110 views
1

間歇我收到「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 
+0

「也許它是在它周圍的代碼發生?」除非你向我們展示它的代碼,否則我們無法分辨!您所使用的請求中是否存在AffiliateID Cookie? – 2010-10-29 19:29:50

+0

我從來沒有想過這個,所以我重構了代碼,因爲它是可怕的無論如何:) – 2011-05-13 20:23:21

+0

檢查任何代碼可能會在附近發生Divide by Zero錯誤 – Terrance 2010-10-29 19:29:41

回答

0

嘗試改變線

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