RobinLHR

I have websites written in Classic ASP.  The code worked for years and now it doesn’t.  The purpose of the code is to pay for an item through Paypal and return the customer back to the website.   The host updated their servers.  The code below now results in the following error message: server giving msxml3.dll error '80072f7d' when trying to access secure url According to Ryan, an IT expert, the error means the certificate authority is invalid or incorrect.  However, the certificate is accepted when the customer clicks the button to pay for the product.  I did ask the host to install a new encryption certificate based on a new data. Still getting the error message in the function below. Your help would be greatly appreciated.   Robin   *********************************************************************************** <%Function SendMessageToPayPal()%> <%   Dim PayPalURL   Dim objSrvHTTP      PayPalURL = strPayPalInternetPath     Set objSrvHTTP = Server.CreateObject("MSXML2.ServerXMLHTTP")   objSrvHTTP.open "POST", PayPalURL, false   objSrvHTTP.SetRequestHeader "Content-Type","application/x-www-form-urlencoded"   objSrvHTTP.send (strPayPalMessage)   strResponseMessage = objSrvHTTP.responseText   intHTTPStatusCode = objSrvHTTP.status   strHTTPStatusText = objSrvHTTP.statusText %> <%End Function%> ***********************************************************************************   The error is created at: objSrvHTTP.send (strPayPalMessage)   PayPalURL: https://www.paypal.com/cgi-bin/webscr   strPayPalMessage: cmd=_notify-synch&tx=0VW26577MX412451G&at=YD4DTPtQc3GWd-Jf1zYrH1S9IJjxiEHHhl0-4pUWL0TDxzpuwL7VPZp0JqW     ... View more

I have websites written in Classic ASP.  The following code, thank you pay pal.asp,  worked for years and now it doesn’t.  The purpose of the code is to pay for an item through Pay pal and return the customer back to the website.   The web host updated their servers.  The code below now results in the following error message: server giving msxml3.dll error '80072f7d' when trying to access secure url   Your help would be greatly appreciated,   Robin   *********************************************************************************** <%Function SendMessageToPayPal()%> <%   Dim PayPalURL   Dim objSrvHTTP      PayPalURL = strPayPalInternetPath     Set objSrvHTTP = Server.CreateObject("MSXML2.ServerXMLHTTP")   objSrvHTTP.open "POST", PayPalURL, false   objSrvHTTP.SetRequestHeader "Content-Type","application/x-www-form-urlencoded"   objSrvHTTP.send (strPayPalMessage)   strResponseMessage = objSrvHTTP.responseText   intHTTPStatusCode = objSrvHTTP.status   strHTTPStatusText = objSrvHTTP.statusText %> <%End Function%> ***********************************************************************************   The error is created at: objSrvHTTP.send (strPayPalMessage) ... View more

I have websites written in Classic ASP.  The following code, from thankyou_paypal_lt.asp,  worked for years and now it doesn’t.  The purpose of the code is to pay for an item through Paypal and return the customer back to the website.   The webhost is Accuwebhosting.  They updated their servers.  The code below now results in the following error message: server giving msxml3.dll error '80072f7d' when trying to access secure url   Please help.   Thanks,   Robin *********************************************************************************** <%Function SendMessageToPayPal()%> <%   Dim PayPalURL   Dim objSrvHTTP      PayPalURL = strPayPalInternetPath     Set objSrvHTTP = Server.CreateObject("MSXML2.ServerXMLHTTP")   objSrvHTTP.open "POST", PayPalURL, false   objSrvHTTP.SetRequestHeader "Content-Type","application/x-www-form-urlencoded"   objSrvHTTP.send (strPayPalMessage)   strResponseMessage = objSrvHTTP.responseText   intHTTPStatusCode = objSrvHTTP.status   strHTTPStatusText = objSrvHTTP.statusText %> <%End Function%> ***********************************************************************************   The error is created at: objSrvHTTP.send (strPayPalMessage) ... View more