redyor
asked on
Consuming Web Service with Soap ToolKit 3.0 ASP(Urgent!)
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.SoapC lient30")
objSOAPClient.ClientProper ty("Server HTTPReques t") = True
objSOAPClient.mssoapinit(" https://www.softvu.com/securewebservices/automail/automail.asmx?wsdl")
'objSOAPClient.ConnectorPr operty("En dPointURL" ) = "https://www.softvu.com/securewebservices/AutoMail/automail.asmx"
'monticket = objSOAPClient.Login(conten tItemId, password)
'objSOAPClient.detail
dim result
dim ClientId
dim Password
ClientId = "F36C09AA2A1D40BDB8E372809 E3B163B"
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.Fi leSystemOb ject")
Set objOutputFile = objFSO.CreateTextFile("F:\ webs\natio nalbank\ba nkofkc\per sonal\tick et.xml")
objOutputFile.WriteLine replace(result.item(0).par entnode.xm l,chr(10), vbcrlf)
objOutputFile.Close
'set objOutputFile = objFSO.CreateTextFile("c:\ red.xml")
Dim xmlDoc
'--- Création de l'objet XMLDOM
Set xmlDoc = Server.CreateObject("Micro soft.XMLDO M")
if (xmlDoc.load (Server.MapPath(".")&"\tic ket.xml")) then
'Gateway Stats
SessionName = xmlDoc.getElementsByTagNam e("Session Key").item (0).text
response.Write(SessionName & "Je suis ici")
'Remove this code – Debug only
response.Write result.item(0).parentnode. xml
ClientId="F36C09AA2A1D40BD B8E372809E 3B163B"
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></T D></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><T R><TD><FON T 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><FO NT size=2></FONT></TD></TR><T R><TD><FON T size=2>Thanks!</TD.< TR> </FONT><TR><TD><FONT size=2></FONT></TD></TR></ TBODY></TA BLE>"
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 = "1ade8529330e42848cf73ba82 d46cada"
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 = "F36C09AA2A1D40BDB8E372809 E3B163B"
TextBody = ""
TextSignature = ""
Notify = False
Dim result1 ,result11
'set result1 = objSOAPClient.AddRecipient (SessionNa me,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.SendRelayMes sage("F36C 09AA2A1D40 BDB8E37280 9E3B163B", Message,Re layContent ,"Standard ",True,Fal se,2)
response.Write "<BR>" & result1.item(0).parentnode .xml
end if
response.End
%>
Thanks for your help
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.SoapC
objSOAPClient.ClientProper
objSOAPClient.mssoapinit("
'objSOAPClient.ConnectorPr
'monticket = objSOAPClient.Login(conten
'objSOAPClient.detail
dim result
dim ClientId
dim Password
ClientId = "F36C09AA2A1D40BDB8E372809
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.Fi
Set objOutputFile = objFSO.CreateTextFile("F:\
objOutputFile.WriteLine replace(result.item(0).par
objOutputFile.Close
'set objOutputFile = objFSO.CreateTextFile("c:\
Dim xmlDoc
'--- Création de l'objet XMLDOM
Set xmlDoc = Server.CreateObject("Micro
if (xmlDoc.load (Server.MapPath(".")&"\tic
'Gateway Stats
SessionName = xmlDoc.getElementsByTagNam
response.Write(SessionName
'Remove this code – Debug only
response.Write result.item(0).parentnode.
ClientId="F36C09AA2A1D40BD
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
HTMLSignature = "<P><STRONG>National Bank Of Kansas City</STRONG><BR>1-866-284
ContentId = "1ade8529330e42848cf73ba82
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 = "F36C09AA2A1D40BDB8E372809
TextBody = ""
TextSignature = ""
Notify = False
Dim result1 ,result11
'set result1 = objSOAPClient.AddRecipient
'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.SendRelayMes
response.Write "<BR>" & result1.item(0).parentnode
end if
response.End
%>
Thanks for your help
ASKER
Hey guys , i just find out what happened , i used something with ServerXMLHTTP
ASKER
Thanks to everyone
ASKER CERTIFIED SOLUTION
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.
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