<%@ Language=JScript %> <% try { var AuthorizeType = 'light' // 'classic' if ('classic'== AuthorizeType) url = 'https://w3s.webmoney.ru/asp/XMLInvoice.asp' else url = 'https://w3s.wmtransfer.com/asp/XMLInvoiceCert.asp' var storepurse = 'Z111111111111' var customerwmid = '222222222222' var orderid = 1 var amount = 1.0 var desc = 'товар' var address = 'http://www.com' var period = 0 var expiration = 1 var reqwmid = '111111111111' var signstr // только для 'classic' var reqn = (new Date()).valueOf() if ('classic'== AuthorizeType) { var planstr = '' + orderid + customerwmid + storepurse + amount + desc + address + period + expiration + reqn var reqwmpwd = 'password' var reqwmfilename = 'c:\\wmkeeperclassickeyfile.kwm' var Signer = Server.CreateObject("WMSignerX.Signer") Signer.Login = reqwmid Signer.Passwd = reqwmpwd Signer.KeyFName = reqwmfilename signstr = Signer.SignString(planstr) } var s = '<w3s.request>' s += '<reqn>'+reqn+'</reqn>' if ('classic' == AuthorizeType) { s += '<wmid>'+reqwmid+'</wmid>' s += '<sign>'+signstr+'</sign>' } s += '<invoice>' s += ' <orderid>'+orderid+'</orderid>' s += ' <customerwmid>'+customerwmid+'</customerwmid>' s += ' <storepurse>'+storepurse+'</storepurse>' s += ' <amount>'+amount+'</amount>' s += ' <desc>'+desc+'</desc>' s += ' <address>'+address+'</address>' s += ' <period>'+period+'</period>' s += ' <expiration>'+expiration+'</expiration>' s += '</invoice>' s += '</w3s.request>' var xmlhttp = Server.CreateObject ("MSXML2.ServerXMLHTTP"); xmlhttp.open('POST', url, false); if ('light' == AuthorizeType) { xmlhttp.setOption(3, 'WM id: '+reqwmid) } xmlhttp.setRequestHeader('Content-Type', 'application/x-www-form-urlencoded'); xmlhttp.send(s); var texttes = xmlhttp.responseText; // Response.Write(texttes) // при отладке можно посмотреть весь ответ var xmlres = Server.CreateObject ('Microsoft.XMLDOM'); xmlres.loadXML(texttes); var retcode = -1 var Node = xmlres.selectSingleNode("w3s.response/retval") if (null!=Node) retcode = parseInt(Node.text) if (0==retcode) { // получилось } } catch(e) { Response.Write('error:'+(new Number(e.number)).toString(16)+'<br>\r\n') Response.Write('desc:'+e.description+'\r\n') } %>