Microsoft VBScript runtime error '800a000d'
Type mismatch
/tools/webservices/ws2.asp, line 16
<%@ Language=VBScript %>
<%
Dim oSoapClient : Set oSoapClient = Server.CreateObject("MSSOAP.SoapClient30")
oSoapClient.ClientProperty("ServerHTTPRequest") = True
oSoapClient.mssoapinit ("http://tamilmp3songslyrics.com/webservices/tamil-mp3-songs-lyrics.asmx?wsdl")
%>
<html>
<head></head>
<body>
<%
Dim obj
obj = oSoapClient.GetFilmNames("s", 50)
Response.Write ("<br>No. of elements in the Array : " & UBound(obj))
Dim tmp
For each tmp in obj '<< == This is line 16
Response.Write ("<br>" & tmp)
Next
%>
</body>
</html>
<%
oSoapClient = Nothing
%>