Transformar um for asp para o PHP

Transformar um for asp para o PHP

 por tajiri Offline » Qui Abr 01, 2010 10:40 pm

ola, blz, amigos, estou tentando transformar as funções de asp para o php, mas como eu não entendo em asp, não estou conseguindo, o maximo que consegui foi até a aqui, male má!rs Se houver alguem que possa explicar um pouco de como terminar esta transformação eu agradeço e muito. em PHP Código: Selecionar todos $cartao->CartaoCredito->Transacao = $_GET[NUMPEDIDO]; for($i=1;count($_GET)){     /*//esta parte eu não sei como fazer!       DadoKomerci = Boleto.MeusDados.Add         DadoKomerci.Nome = Request.QueryString.Key(i)         DadoKomerci.Valor = Request.QueryString.Item(i) */ $Aprovada = $cbx->CarregaResultadoAprovacaoCartao(0); }//for Em Asp Código: Selecionar todos     Boleto.CartaoCredito.Transacao = Request.QueryString("NUMPEDIDO")     for i = 1 to Request.QueryString.Count         set       DadoKomerci = Boleto.MeusDados.Add         DadoKomerci.Nome = Request.QueryString.Key(i)         DadoKomerci.Valor = Request.QueryString.Item(i)     next     Aprovada = cbx.CarregaResultadoAprovacaoCartao(0) end if tajiri SUPER VETERANO Mensagens: 293 Registrado em: Qua Jan 23, 2008 7:24 pm Localização: Parana/curitiba/brasil Website

Transformar um for asp para o PHP

 por web Online » Qui Abr 01, 2010 11:59 pm

Esses valores dentro do for em PHP, se repetem algumas vezes, o i seria o índice, certo? web ADMIN Mensagens: 12457 Registrado em: Sáb Jan 20, 2007 6:08 pm Localização: RJ / RJ / Brasil Website

Transformar um for asp para o PHP

 por tajiri Offline » Sex Abr 02, 2010 12:41 am

isso, isso é o sistema da administradora de cartao mastercard, pelo que eu entendi o esses valores DadoKomerci... se eu não estou errado ele vem por get, a master me deu como exemplo o asp, eu não entendo muito no asp... pagina demo da master: Código: Selecionar todos <% set cbx = Server.CreateObject("Master.ContaCorrente") '=================================================================================================== '========-linha abaixo utilizada para informar a URL de retorno caso esteja utilizando Komerci====== '=================================================================================================== cbx.PadroesAprovacaoCartoes.UrlRetornoAdministradora = " " set boleto = cbx.DocumentosCobranca.Add '==================================================================================================== '========verifica se é uma transação de retorno ou está sendo enviada agora para a administradora======== '==================================================================================================== if Request.QueryString("NUMPEDIDO") = "" then    if Request.Form("TID") = "" then       Boleto.ValorDocumento = 123.45       Boleto.CartaoCredito.QuantidadeParcelas = 1       Boleto.CartaoCredito.EnderecoIPComprador = Request.ServerVariables("REMOTE_ADDR")       Boleto.CartaoCredito.Bandeira = "VISA" 'VISA MASTERCARD DINERS AMEX HIPERCARD SOROCRED FININVEST JCB       Boleto.CartaoCredito.AVS = False       Boleto.CartaoCredito.Idioma = "PTB" 'PTB=Portugus ENG=Ingls ESP=Espanhol       'linha abaixo desnecessrias para conectividade Komerci ou WebPOS       Boleto.CartaoCredito.Numero = "4444333322221111" 'para VBV informar os 6 primeiros dgitos do carto       '3 linhas abaixo desnecessrias para conectividade Komerci, Verified By Visa ou WebPOS       Boleto.CartaoCredito.MesValidade = 12       Boleto.CartaoCredito.AnoValidade = 10       Boleto.CartaoCredito.CodigoSeguranca = "9999"       Aprovada = cbx.SolicitaAprovacaoCartao(0)    else        Boleto.CartaoCredito.Transacao = Request.Form("TID")        Aprovada = cbx.CarregaResultadoAprovacaoCartao(0)    end if else     Boleto.CartaoCredito.Transacao = Request.QueryString("NUMPEDIDO")     for i = 1 to Request.QueryString.Count         set       DadoKomerci = Boleto.MeusDados.Add         DadoKomerci.Nome = Request.QueryString.Key(i)         DadoKomerci.Valor = Request.QueryString.Item(i)     next     Aprovada = cbx.CarregaResultadoAprovacaoCartao(0) end if if Boleto.CartaoCredito.EnviarRespostaAoNavegador then     Response.Write(Boleto.CartaoCredito.ResultadoSolicitacaoAprovacao) else '============================================================ '   ==========Verifica se A transao foi Aprovada========= '============================================================     if Aprovada then         Resultado = Boleto.CartaoCredito.ResultadoSolicitacaoAprovacao         Transacao = Boleto.CartaoCredito.Transacao         Autorizacao = Boleto.CartaoCredito.CodigoAutorizacao '========================================================================== '==========A linha abaixo efetua a Captura (Confirmao) da Transao========== '==========================================================================         msbugasp = cbx.ConfirmaAprovacaoCartao(0)         Resultado = Resultado & " - " & Boleto.CartaoCredito.ResultadoSolicitacaoAprovacao     else         Resultado = Boleto.CartaoCredito.ResultadoSolicitacaoAprovacao     end if     Response.Write(Resultado) end if set cbx = nothing %> tajiri SUPER VETERANO Mensagens: 293 Registrado em: Qua Jan 23, 2008 7:24 pm Localização: Parana/curitiba/brasil Website

Transformar um for asp para o PHP

 por web Online » Sex Abr 02, 2010 1:14 am

Isso de ASP parece bem complicado Se fosse só pegar os dados em um input para usar seria fácil, deixo para quem entende da linguagem ASP. web ADMIN Mensagens: 12457 Registrado em: Sáb Jan 20, 2007 6:08 pm Localização: RJ / RJ / Brasil Website

Transformar um for asp para o PHP

 por tajiri Offline » Sex Abr 02, 2010 2:52 pm

é vamos aguardar, enquanto isso vou quebrando a cuca! tajiri SUPER VETERANO Mensagens: 293 Registrado em: Qua Jan 23, 2008 7:24 pm Localização: Parana/curitiba/brasil Website