Solved

Consuming Web Service with Soap ToolKit 3.0 ASP(Urgent!)

Posted on 2006-07-14
5
3,892 Views
Last Modified: 2012-05-05
Hi Everyone,
I am trying to comsume a webservice using Soap tool kit 3.0 but it seems that i am missing something in here
I got this Error coming up :
SoapMapper error '80070057'

SoapMapper:Saving SoapMapper msg failed HRESULT=0x80070057: The parameter is incorrect. - Client:Unspecified client error. HRESULT=0x80070057: The parameter is incorrect.

Here is my script

<%

                        set objSOAPClient = CreateObject("MSSOAP.SoapClient30")

        objSOAPClient.ClientProperty("ServerHTTPRequest") = True

        objSOAPClient.mssoapinit("https://www.softvu.com/securewebservices/automail/automail.asmx?wsdl")

                        'objSOAPClient.ConnectorProperty("EndPointURL") = "https://www.softvu.com/securewebservices/AutoMail/automail.asmx"

                        'monticket = objSOAPClient.Login(contentItemId, password)

'objSOAPClient.detail

dim result

dim ClientId

dim Password    

ClientId = "F36C09AA2A1D40BDB8E372809E3B163B"

Password = "N@ti0n@1.b@nk.KC"        

 

' that s where i am having an Error during the login

set result = objSOAPClient.Login (ClientId, Password)

 

' Output XML file to get the Ticket #

 

            Set objFSO = CreateObject("Scripting.FileSystemObject")

            Set objOutputFile = objFSO.CreateTextFile("F:\webs\nationalbank\bankofkc\personal\ticket.xml")
                  objOutputFile.WriteLine replace(result.item(0).parentnode.xml,chr(10),vbcrlf)
                  objOutputFile.Close
            'set objOutputFile = objFSO.CreateTextFile("c:\red.xml")

Dim xmlDoc

'--- Création de l'objet XMLDOM
Set xmlDoc = Server.CreateObject("Microsoft.XMLDOM")
if (xmlDoc.load (Server.MapPath(".")&"\ticket.xml")) then


'Gateway Stats

SessionName = xmlDoc.getElementsByTagName("SessionKey").item(0).text
response.Write(SessionName & "Je suis ici")

            'Remove this code – Debug only


            response.Write result.item(0).parentnode.xml
                  
                  
ClientId="F36C09AA2A1D40BDB8E372809E3B163B"

TemplateID ="2"

Typee = "Standard"

IncludeOptInfo= "True"

PlainText = "False"

 
FromEmail= "webmaster@bankofkc.com"

FromFirstName= "National Bank"

FromLastName= "Of Kansas City"

EmailTemplateID = "2"

Subject ="Your NBKC Online Account Application"

HTMLBody ="<TABLE><TBODY><TR><TD><P><FONT size=2>Dear [FNAME],<BR></FONT></P></TD></TR><TR><TD><FONT size=2>Welcome to National Bank Of Kansas City! We are processing your account information and will contact you within the next business day.</FONT></TD></TR><TR><TD><FONT size=2></FONT></TD></TR><TR><TD><FONT size=2>Click the <I>What‘s Next</I> button to learn about the next steps of our online application process.</FONT></TD></TR><TR><TD><FONT size=2></FONT></TD></TR><TR><TD><FONT size=2>Thanks!</TD.< TR> </FONT><TR><TD><FONT size=2></FONT></TD></TR></TBODY></TABLE>"

HTMLSignature = "<P><STRONG>National Bank Of Kansas City</STRONG><BR>1-866-284-3928<BR><A href='http://www.nbofkc.com/'>http://www.nbofkc.com</A> </P>"
 



ContentId = "1ade8529330e42848cf73ba82d46cada"

TemplateId = ""
SortOrder = ""

 


                  
FirstName = "RED"
LastName = "Test"
Email = "red@spidertel.com"
WorkPhone = "888-888-8888"
HomePhone = "888-888-7777"
StreetAddress1 = "1224 coucou Rd"
StreetAddress2 = "1200 Coucou RD"
City = "Kansas city"
State = "MO"
Country = "USA"
PostalCode = "64111"
CellPhone = "777-888-8888"
Fax = "888-999-9999"
clientId = "F36C09AA2A1D40BDB8E372809E3B163B"

TextBody = ""
TextSignature = "" 
Notify = False      
     
            
Dim result1      ,result11
'set result1 = objSOAPClient.AddRecipient(SessionName,Email)
'dim Message isArray
dim RelayContent (2)
dim Message (11)
RelayContent(0) = ContentId
RelayContent(1) = ""
RelayContent(2) = 0

Message(0) = "red@spidertel.com"
Message(1) = FirstName
Message(2) = LastName
Message(3) = FromEmail
Message(4) = FromFirstName
Message(5) = FromLastName
Message(6) = HTMLBody
Message(7) = "sss"
Message(8) = HTMLSignature
Message(9) = "sss"
Message(10) = Subject
Message(11) = True
'That where the problem occur
result1 = objSOAPClient.SendRelayMessage("F36C09AA2A1D40BDB8E372809E3B163B",Message,RelayContent,"Standard",True,False,2)      
      response.Write "<BR>" & result1.item(0).parentnode.xml            
   end if        
            response.End


%>


Thanks for your help
0
Comment
Question by:redyor
  • 2
5 Comments
 
LVL 20

Expert Comment

by:jitganguly
ID: 17109836
Though not very experienced in this but I have a feeling its Https site and that requires some more work see here

http://msdn.microsoft.com/library/default.asp?url=/library/en-us/dnsoap/html/soapsecurity.asp

scroll trhorugh this section

SSL and Client Certificates

As an alternate just try out a http site, this way you can isolate the problem
0
 

Author Comment

by:redyor
ID: 17118178
Hey guys , i just find out what happened , i used something with ServerXMLHTTP
0
 

Author Comment

by:redyor
ID: 17118179
Thanks to everyone
0
 

Accepted Solution

by:
ee_ai_construct earned 0 total points
ID: 17343682
PAQ / Refund
ee ai construct, community support moderator
0

Featured Post

Free Tool: Port Scanner

Check which ports are open to the outside world. Helps make sure that your firewall rules are working as intended.

One of a set of tools we are providing to everyone as a way of saying thank you for being a part of the community.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

I recently decide that I needed a way to make my pages scream on the net.   While searching around how I can accomplish this I stumbled across a great article that stated "minimize the server requests." I got to thinking, hey, I use more than one…
I would like to start this tip/trick by saying Thank You, to all who said that this could not be done, as it forced me to make sure that it could be accomplished. :) To start, I want to make sure everyone understands the importance of utilizing p…
This video shows how to use Hyena, from SystemTools Software, to bulk import 100 user accounts from an external text file. View in 1080p for best video quality.
I've attached the XLSM Excel spreadsheet I used in the video and also text files containing the macros used below. https://filedb.experts-exchange.com/incoming/2017/03_w12/1151775/Permutations.txt https://filedb.experts-exchange.com/incoming/201…

821 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question