我在XP的机子上能用,但移到WIN2000sever机子就不能用,错误如下:
Microsoft VBScript 编译器错误 错误 '800a03f6'
缺少 'End'
/iisHelp/common/500-100.asp,行242
Microsoft VBScript 运行时错误 错误 '800a000d'
类型不匹配: 'Chars'
F:\HIWEB80\INC\../function/Util.asp,行31
代码如下:
Class AspString
Private Chars(84)
Private Sub Class_Initialize
Dim i,Size
Size=-1
For i=65 To 90
Size=Size+1
Chars(Size)=Chr(i) 这是31行
Next
For i=48 To 57
Size=Size+1
Chars(Size)=Chr(i)
Next
For i=97 To 122
Size=Size+1
Chars(Size)=Chr(i)
Next
End Sub
请各位帮帮忙!谢谢