클래식 ASP에서는 CStr 작동하지

Question

난 내가 우는 소리, 서브에서 수신하고 Error 800A000D - Type mismatch 도움이 필요 . 그것은 효과가있다.

<% 
Function RegExResults(strTarget, strPattern) 

    Set regEx = New RegExp 
    regEx.Pattern = strPattern 
    regEx.Global = true 
    Set RegExResults = regEx.Execute(strTarget) 
    Set regEx = Nothing 

End Function 

Function NomeArquivo(arquivo) 
    Set arrResults = RegExResults(arquivo, "(.*)\..*") 

    For each result in arrResults 
     NomeArquivo = result.Submatches(0) 
    Next 

    Set arrResults = Nothing 
End function 

'Response.Write(NomeArquivo("file.exe")) prints "file" here it works. 
%> 

아무도 무슨 일이 일어 났는지 압니까?

Answer 1

vbScript는 대/소문자를 구분하지 않습니다. 변수와 함수가 같은 이름을 가진 것처럼 보입니다. 함수 또는 변수의 이름을 변경해보십시오.