Solved

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

Posted on 2006-07-14
5
3,914 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
[X]
Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

  • Help others & share knowledge
  • Earn cash & points
  • Learn & ask questions
  • 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 was asked about the differences between classic ASP and ASP.NET, so let me put them down here, for reference: Let's make the introductions... Classic ASP was launched by Microsoft in 1998 and dynamically generate web pages upon user interact…
There are cases when e.g. an IT administrator wants to have full access and view into selected mailboxes on Exchange server, directly from his own email account in Outlook or Outlook Web Access. This proves useful when for example administrator want…
Visualize your data even better in Access queries. Given a date and a value, this lesson shows how to compare that value with the previous value, calculate the difference, and display a circle if the value is the same, an up triangle if it increased…

615 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