我在使用Kesion shop V5.51遇到这样一个问题，在在发布商城的所有栏目时出现在以下错误：

Microsoft VBScript 运行时错误 错误 '800a004c'

路径未找到

F:\IISKS\V5.5 ESHOP FREE\ADMIN\INCLUDE\../../KS_Cls/Kesion.Label.CommonCls.asp，行 203

我调试后找到的代码如下：

'*********************************************************************************************************
  '函数名：RefreshWordJS
  '作  用：发布文字JS
  '参  数：JSID JSID,JSConfig JS参数
  '*********************************************************************************************************

Function RefreshWordJS(JSID, JSConfig)
       Dim JSConfigArr:JSConfigArr = Split(JSConfig, ",")
    If UBound(JSConfigArr) = 17 Then
     RefreshWordJS = KSLabel.RefreshCss(JSID, UCase(JSConfigArr(0)), JSConfigArr(1), JSConfigArr(2), JSConfigArr(3), JSConfigArr(4), JSConfigArr(5), JSConfigArr(6), JSConfigArr(7), JSConfigArr(8), JSConfigArr(9), JSConfigArr(10), JSConfigArr(11), JSConfigArr(12), JSConfigArr(13), JSConfigArr(14), JSConfigArr(15), JSConfigArr(16), JSConfigArr(17))
     RefreshWordJS = Replace(RefreshWordJS, "'", """")
     RefreshWordJS = "document.write('" & RefreshWordJS & "');"
    Else
     RefreshWordJS = "document.write('标签参数溢出！');"
    End If
  End Function