Solved

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

Posted on 2006-07-14
5
3,876 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

How to run any project with ease

Manage projects of all sizes how you want. Great for personal to-do lists, project milestones, team priorities and launch plans.
- Combine task lists, docs, spreadsheets, and chat in one
- View and edit from mobile/offline
- Cut down on emails

Join & Write a Comment

I have helped a lot of people on EE with their coding sources and have enjoyed near about every minute of it. Sometimes it can get a little tedious but it is always a challenge and the one thing that I always say is:  The Exchange of information …
This demonstration started out as a follow up to some recently posted questions on the subject of logging in: http://www.experts-exchange.com/Programming/Languages/Scripting/JavaScript/Q_28634665.html and http://www.experts-exchange.com/Programming/…
Sending a Secure fax is easy with eFax Corporate (http://www.enterprise.efax.com). First, Just open a new email message.  In the To field, type your recipient's fax number @efaxsend.com. You can even send a secure international fax — just include t…
This video shows how to remove a single email address from the Outlook 2010 Auto Suggestion memory. NOTE: For Outlook 2016 and 2013 perform the exact same steps. Open a new email: Click the New email button in Outlook. Start typing the address: …

708 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

Need Help in Real-Time?

Connect with top rated Experts

13 Experts available now in Live!

Get 1:1 Help Now