Type Mismatch problem with call to VBscript function

[RickLiebespach]

I was wondering if anyone could help me resolve this error message.

Error Type:
Microsoft VBScript runtime (0x800A000D)
Type mismatch: 'MyTest'
/rick/omnia_act_initializations.inc, line 59

here's the section of /rick/omnia_act_initializations.inc
-------------
IF MyTest("CONTACTS&quot = TRUE THEN
response.write("after call to MyTest returns TRUE&quot
ELSE
response.write("after call to MyTest returns FALSE&quot
END IF
-------------

Line 59 is, of course,
IF MyTest("CONTACTS&quot = TRUE THEN



The MyTest function is defined as
-------------
<SCRIPT LANGUAGE=&quot;vbscript&quot;>
Function MyTest(cTable)
Dim lReturnValue
lReturnValue = TRUE

MyTest = lReturnValue
End Function
</SCRIPT>
-------------

Can anyone could help me resolve this error message?

TIA,
Rick

 

[bernlaw]

It looks like you are making the function a client side function instead of a server side function. Therefore, when you call the function on the server side it can't be found.

Replace the <SCRIPT></SCRIPT> tags with <% and %> so that the function is a server side function.

<%
Function MyTest(cTable)
Dim lReturnValue
lReturnValue = TRUE

MyTest = lReturnValue
End Function
%>

 

[clarkin]

bernlaw's post will probably solve it for you, this is just an addendum for cleaner code:

IF MyTest("CONTACTS") = TRUE THEN

can easily be expressed as

IF MyTest("CONTACTS") THEN

as MyTest() will return true or false

It will basically make no difference though

Posting code? Wrap it with code tags: [ignore]

[/ignore][code]CodeHere

[ignore][/code][/ignore].