【下载文档:  TSYS中生成静态页时溢出__'CInt'.txt 】

---

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