当前位置: 首页 > 图文教程 > 网络编程 > ASP > TSYS中生成静态页时溢出: ''CInt''

ASP
冒泡算法的三种JavaScript表示
asp无限分级(递归调用)
VBS、ASP代码语法加亮显示的类
安全脚本程序的编写 V1.0
atom2rss.asp
atom_js.asp
google sitemap.asp
用ASP读取/写入UTF-8编码格式的文件
捌度空间 缓存类
再来个专门为google量身定做的sitemap生成代码,(可是动态的哦)
一个能对访问者进行编号、记录访问次数、IP、时间的统计制作实例
如何在ASP页面动态Inclue文件?
多域名一网站时如果返回最原来的域名
网页木马代码例子(里面的文件是漏洞扫描器,呵呵)
ASP万用分页程序
ASP项目中的公共翻页模块
在ASP中使用均速分页法提高分页速度
3种不同的方法生成文件
身份证校验算法与ASP程序
ASP抽取数据的执行效率

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


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-09-13   浏览: 49 ::
收藏到网摘: n/a

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