TSYS中生成靜態(tài)頁時溢出: 'CInt'
更新時間:2007年01月08日 00:00:00 作者:
今天在添加文章生成靜態(tài)頁是,發(fā)生了 溢出: 'CInt'.
經(jīng)查得知:
原來是CINT不支持太大的數(shù)字,估計有一個數(shù)值范圍吧,所以換成CLNG就解決問題了。
修改TSYS下的MANAGE/INCLUDE/CreateFile_Fun.asp中的第107行.
經(jīng)查得知:
原來是CINT不支持太大的數(shù)字,估計有一個數(shù)值范圍吧,所以換成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
'生成文件存放路徑
'原來的提示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
相關文章
asp通過JMAIL實現(xiàn)通用發(fā)送函數(shù)
asp通過JMAIL實現(xiàn)通用發(fā)送函數(shù)...2007-08-08asp中去除內(nèi)容HTML標簽的三個function函數(shù)
asp中去除內(nèi)容HTML標簽的三個function函數(shù)...2007-03-03