当前位置:主页 > 查看内容

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

发布时间:2021-09-24 00:00| 位朋友查看

简介:今天在添加文章生成静态页是,发生了溢出:'CInt'. 经查得知: 原来是CINT不支持太大的数字,估计有一个数值范围吧,所以换成CLNG就解决问题了。 修改TSYS下的MANAGE/INCLUDE/CreateFile_Fun.asp中的第107行. 复制代码 代码如下: IfI=0Then '生成文件存放路径……
今天在添加文章生成静态页是,发生了 溢出: '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

原文链接:https://m.jb51.net/article/6022.htm
本站部分内容转载于网络,版权归原作者所有,转载之目的在于传播更多优秀技术内容,如有侵权请联系QQ/微信:153890879删除,谢谢!
上一篇:asp实现防止站外提交内容的两个方法 下一篇:没有了

推荐图文


随机推荐