TSYS中生成靜態(tài)頁時(shí)溢出: 'CInt'
更新時(shí)間：2007年01月08日 00:00:00 作者：
今天在添加文章生成靜態(tài)頁是，發(fā)生了 溢出: 'CInt'.
經(jīng)查得知：
原來是CINT不支持太大的數(shù)字，估計(jì)有一個(gè)數(shù)值范圍吧，所以換成CLNG就解決問題了。
修改TSYS下的MANAGE/INCLUDE/CreateFile_Fun.asp中的第107行.
經(jīng)查得知：
原來是CINT不支持太大的數(shù)字，估計(jì)有一個(gè)數(shù)值范圍吧，所以換成CLNG就解決問題了。
修改TSYS下的MANAGE/INCLUDE/CreateFile_Fun.asp中的第107行.
復(fù)制代碼 代碼如下:
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
'生成文件存放路徑
'原來的提示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
相關(guān)文章
asp下最常用的19個(gè)基本技巧...2007-11-11
微信公眾號(hào)可通過現(xiàn)金紅包接口發(fā)放微信支付現(xiàn)金紅包(附開發(fā)教程)
這篇文章主要介紹了微信公眾號(hào)可通過現(xiàn)金紅包接口發(fā)放微信支付現(xiàn)金紅包的相關(guān)資料,需要的朋友可以參考下2016-09-09
使用XMLDOM在不支持FSO的服務(wù)器上...2006-08-08
asp下返回以千分位顯示數(shù)字格式化的數(shù)值
asp下返回以千分位顯示數(shù)字格式化的數(shù)值...2007-08-08
asp下制做行背景顏色交替變換的表格...2007-04-04
FormatRemoteUrl函數(shù)之a(chǎn)sp實(shí)現(xiàn)格式化成當(dāng)前網(wǎng)站完整的URL-將相對(duì)地址轉(zhuǎn)換為絕對(duì)地址的代碼...2007-09-09
Microsoft JET Database Engine 錯(cuò)誤 ''80004005'' 未指定的錯(cuò)誤的完美解決方法
Microsoft JET Database Engine 錯(cuò)誤 ''80004005'' 未指定的錯(cuò)誤的完美解決方法...2007-03-03
JScript下有一個(gè)Enumerator對(duì)象可以遍歷集合。根據(jù)它的文檔寫了以下程序，可以遍歷整個(gè)Request.QueryString集合2010-04-04
查看ASP詳細(xì)錯(cuò)誤提示信息的圖文設(shè)置方法
有時(shí)候很多朋友訪問自己的asp或php等程序頁面時(shí)出現(xiàn)一些錯(cuò)誤，就是頁面無法顯示也沒有詳細(xì)的錯(cuò)誤信息，就算iis中開啟了顯示詳細(xì)的錯(cuò)誤也不能看到，那么就需要客戶端如下的設(shè)置了。2011-01-01
把網(wǎng)頁中的(電話，qq等數(shù)字)生成圖片的ASP程序
下面的代碼可以將網(wǎng)頁中一些防止別人直接復(fù)制或采集的不錯(cuò)的隱藏部分?jǐn)?shù)字信息，例如電話可以起到防止別人搜索。2008-11-11