vbscript - 获取我的函数的类型不匹配

Question

我收到一条错误消息，即

Type mismatch: 'EMXWEB_IE_LAUNCH'
Line (1): "' ==============================================================================". 

该功能是 选项显式

Public Function EMXWEB_IE_LAUNCH (dicArguments, sErrMsg)

Dim strVersion
Dim strExeVersion
Dim WshShell
Dim strEMXWebBrowserTitleBarText
Dim ie

Const strFunctionName = "EMXWEB_IE_LAUNCH"

Set ie = CreateObject( "InternetExplorer.Application" )
ie.Navigate "www.google.com"
ie.Visible=True

End Function

任何人都可以让我知道我错在哪里以及为什么我会遇到这个问题

Answer 1

我在带有“line(1)”的 QTP 中看到这样的错误，它有时与在您拥有该函数的库之前加载的库有关。缺少其他库中的块结尾或函数结尾。

也许你可以联系起来，但是当 QTP 保存文件的富文本格式被破坏时，我也看到了这个奇怪的东西。您可以尝试将整个代码粘贴到记事本中以获取纯文本，然后将整个 QTP 文件替换为记事本中的文本并保存。这种疯狂已经为我工作了好几次。