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

ttx9n

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

gyalp

论坛有你更精彩！

3pjdk29w

逛逛看看瞧瞧

5ble0ks

呵呵呵呵呵呵呵a

0qfjyf

而非为吾问无为谓娃娃

溪谷小兵

哈哈哈哈哈哈

平平安安

额头额定法国队是范德萨

fiyeid

不错的源码论坛

.l4

而快乐你们快乐马年快乐

bp5jgbcnt

天天源码论坛