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