求助:关于VBScript runtime error 800a0005
知之为知知 2004-03-31 07:55:17 一个新闻管理程序在
服务器版本:Microsoft-IIS/5.0
服务器解译引擎:VBScript/5.6.7426
下添加新闻出现如下错误:
Microsoft VBScript runtime error '800a0005'
Invalid procedure call or argument: 'chr'
D:\WEBHOSTING\CLIENTS\HZLASER\WWWROOT\ADMIN\../function/upload.asp, line 81
Function bin2str(binstr)
Dim varlen,clow,ccc,skipflag
'中文字符Skip标志
skipflag=0
ccc = ""
If Not IsNull(binstr) Then
varlen=LenB(binstr)
For i=1 To varlen
If skipflag=0 Then
clow = MidB(binstr,i,1)
'判断是否中文的字符
If AscB(clow) > 127 Then
'AscW会把二进制的中文双字节字符高位和低位反转,所以要先把中文的高低位反转
81 ccc =ccc & Chr(AscW(MidB(binstr,i+1,1) & clow))
skipflag=1
Else
ccc = ccc & Chr(AscB(clow))
End If
Else
skipflag=0
End If
Next
End If
bin2str = ccc
End Function
但是在服务器版本:Microsoft-IIS/5.0
只不过服务器解译引擎为VBScript/5.1.7426下可以正常添加新闻
这是为什么,怎么在VBScript/5.6.7426下运行正确?