TSYS中生成静态页时溢出: \'CInt\'

168 阅读 0 评论 111 点赞

我是靠谱客的博主冷静樱桃，最近开发中收集的这篇文章主要介绍TSYS中生成静态页时溢出: \'CInt\'，觉得挺不错的，现在分享给大家，希望可以做个参考。

概述

今天在添加文章生成静态页是，发生了溢出: 'CInt'.
经查得知：
原来是CINT不支持太大的数字，估计有一个数值范围吧，所以换成CLNG就解决问题了。
修改TSYS下的MANAGE/INCLUDE/CreateFile_Fun.asp中的第107行.

复制代码代码如下:

If I=0 Then  
                '生成文件存放路径  
               '原来的提示cint溢出FilePath=CreateFileSaveToPath(CInt(NewsId),Rs1("AddTime"),Rs1("Directory"))  
               '原来的提示cint溢出FileLocalPath=CreateFileLocalPath(CInt(NewsId),Rs1("AddTime"),Rs1("Directory"))  
                FilePath=CreateFileSaveToPath(CLng(NewsId),Rs1("AddTime"),Rs1("Directory"))  
                FileLocalPath=CreateFileLocalPath(CLng(NewsId),Rs1("AddTime"),Rs1("Directory"))  
            Else  
               '原来的提示cint溢出FilePath=CreateFileSaveToPath(CInt(NewsId),Rs1("AddTime"),Rs1("Directory"))  
                FilePath=CreateFileSaveToPath(CLng(NewsId),Rs1("AddTime"),Rs1("Directory"))  
                FilePath=Left(FilePath,(Len(FilePath)-Len(Def_FileExtension)))&"_"& I & Def_FileExtension