当前位置:主页 > 软件编程 > ASP代码 >

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

时间:2021-05-02 08:18:27 | 栏目:ASP代码 | 点击:

今天在添加文章生成静态页是,发生了 溢出: '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

您可能感兴趣的文章:

相关文章