Ir para conteúdo

POWERED BY:

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

dioneperes

Integração PagSeguro

Recommended Posts

Não está enviando o valor do sedex...

 

<%' INTEGRAÇÃO COM O PAGSEGURO %>  
					<form target="pagseguro" action="https://pagseguro.uol.com.br/security/webpagamentos/webpagto.aspx" method="post" onSubmit="concluirps()">
					<input type="hidden" name="email_cobranca" value="<%=EmailPag%>" />
					<input type="hidden" name="tipo" value="CP" />
					<input type="hidden" name="moeda" value="BRL" />
					
					<%
					xxxbnch72939ja393j988jia72jhapiewolsj = "SELECT * "
					xxxbnch72939ja393j988jia72jhapiewolsj = xxxbnch72939ja393j988jia72jhapiewolsj & "FROM produtos "
					xxxbnch72939ja393j988jia72jhapiewolsj = xxxbnch72939ja393j988jia72jhapiewolsj & "INNER JOIN itens "
					xxxbnch72939ja393j988jia72jhapiewolsj = xxxbnch72939ja393j988jia72jhapiewolsj & "ON produtos.Id = itens.codBrinde "
					xxxbnch72939ja393j988jia72jhapiewolsj = xxxbnch72939ja393j988jia72jhapiewolsj & "WHERE codpedido = " & session("codPed") & ""
					Set seesjzywyy7178394kka71b39a640561jabhayww = xxwweqzawyt3239waayehsnaresw.Execute(xxxbnch72939ja393j988jia72jhapiewolsj)
					%>
					<% 
					Dim nitem, vitem, fitem, pitem
					nitem = 1
					%>
					<% Do While not seesjzywyy7178394kka71b39a640561jabhayww.Eof %>
					<input type="hidden" name="item_id_<%=nitem%>" value="<%=seesjzywyy7178394kka71b39a640561jabhayww("Id")%>" />
					<input type="hidden" name="item_descr_<%=nitem%>" value="<%=seesjzywyy7178394kka71b39a640561jabhayww("Titulo")%>" />
					<input type="hidden" name="item_quant_<%=nitem%>" value="<%=seesjzywyy7178394kka71b39a640561jabhayww("QtLivro")%>" />
					<%
					'vitem = seesjzywyy7178394kka71b39a640561jabhayww("PrecoOferta")
					'vitem = Replace(seesjzywyy7178394kka71b39a640561jabhayww("PrecoOferta"),".","")
					'vitem = Replace(vitem,",","")
					vitem = Replace(Replace(FormatNumber(seesjzywyy7178394kka71b39a640561jabhayww("PrecoOferta"), 2), ",", ""), ".", "")
					fitem = Replace(Replace(FormatNumber(session("frete"), 2), ",", ""), ".", "")
					'pitem = Replace(Replace(seesjzywyy7178394kka71b39a640561jabhayww("peso"), ",", ""), ".", "")
					'if (pitem = 300)or(pitem = 1000)or(pitem = 2000)or(pitem = 3000)or(pitem = 4000)or(pitem = 5000) then 
						'if nitem > 1 then
							'pitem = pitem - 3
						'end if
					'end if
					'response.Write(pitem)
					%>
					<input type="hidden" name="item_valor_<%=nitem%>" value="<%=vitem%>" />
					<input type="hidden" name="item_frete_<%=nitem%>" value="<%=fitem%>" />

					
					<% nitem = nitem + 1 %>
					<% seesjzywyy7178394kka71b39a640561jabhayww.MoveNext %>
					<% Loop %>
					<input type="hidden" name="tipo_frete" value="SD" />
					
					
					<input type="hidden" name="cliente_nome" value="<%=xxxssqwyshhsjaw32syyyzxxvviqx("Nome")%>" />
					<input type="hidden" name="cliente_cep" value="<%=xxxssqwyshhsjaw32syyyzxxvviqx("cep")%>" />
					<input type="hidden" name="cliente_end" value="<%=xxxssqwyshhsjaw32syyyzxxvviqx("endereco")%>" />
					<input type="hidden" name="cliente_num" value="<%=xxxssqwyshhsjaw32syyyzxxvviqx("numero")%>" />
					<input type="hidden" name="cliente_compl" value="<%=xxxssqwyshhsjaw32syyyzxxvviqx("complemento")%>" />
					<input type="hidden" name="cliente_bairro" value="<%=xxxssqwyshhsjaw32syyyzxxvviqx("bairro")%>" />
					<input type="hidden" name="cliente_cidade" value="<%=xxxssqwyshhsjaw32syyyzxxvviqx("cidade")%>" />
					<input type="hidden" name="cliente_uf" value="<%=xxxssqwyshhsjaw32syyyzxxvviqx("uf")%>" />
					<input type="hidden" name="cliente_pais" value="BRA" />
					<input type="hidden" name="cliente_ddd" value="<%=xxxssqwyshhsjaw32syyyzxxvviqx("dddres")%>" />
					<input type="hidden" name="cliente_tel" value="<%=xxxssqwyshhsjaw32syyyzxxvviqx("foneres")%>" />
					<input type="hidden" name="cliente_email" value="<%=xxxssqwyshhsjaw32syyyzxxvviqx("email")%>" />
					
					<input type="image" src="images/btn_fechar_pedido.gif" name="submit" alt="Pagamento com PagSeguro" />
					</form>
					  
					  
					  </a></td>
					</tr>
				  </table></td>
				  </tr>
				<TR>
			  <TD align="left" colspan="3" height="15"></TD>
			</TR>
			<TR>
			  <TD bgColor="#cccccc" height="1" colspan="3"></TD>
			</TR>
			  </table>

Compartilhar este post


Link para o post
Compartilhar em outros sites

Olá dioneperes.

 

Você consegue conferir se em session("frete") tem algum valor mesmo ou se está vazio?

 

E retire o formartNumber. Usando o formatnumber, você acrescentará dois zeros ao fim do número, então se tentar passar 2,00 irá passar 20000 dessa maneira que está.

 

Ah, e há uma área específica no fórum para tratar sobre PagSeguro. Procure postar lá sobre isso...

Compartilhar este post


Link para o post
Compartilhar em outros sites

Olá dioneperes.

 

Você consegue conferir se em session("frete") tem algum valor mesmo ou se está vazio?

Olha isso ae
Dim ppedido, ffrete
ppedido = session("totalPed")
ffrete = session("frete")
session("totalPed") = replace(session("totalPed"),".","")
session("totalPed") = replace(session("totalPed"),",",".")
session("frete") = replace(session("frete"),".","")
session("frete") = replace(session("frete"),",",".")

'***** Atualiza tabela de pedidos
wwasbbsjrwasdadswsda = "UPDATE pedidos Set "
wwasbbsjrwasdadswsda = wwasbbsjrwasdadswsda & "codCliente = " & Request.QueryString("ic") & ", "
wwasbbsjrwasdadswsda = wwasbbsjrwasdadswsda & "valorPedido = '" & session("totalPed") & "', "
wwasbbsjrwasdadswsda = wwasbbsjrwasdadswsda & "valorFrete = '" & session("frete") & "', "
wwasbbsjrwasdadswsda = wwasbbsjrwasdadswsda & "Pagamento = 'PagSeguro', "
wwasbbsjrwasdadswsda = wwasbbsjrwasdadswsda & "statusPed = 1 "
wwasbbsjrwasdadswsda = wwasbbsjrwasdadswsda & "WHERE codPedido = " & session("codPed") & " "
Set ssawiiskhha2993qwnkak2wesacs = xxwweqzawyt3239waayehsnaresw.Execute(wwasbbsjrwasdadswsda)
Set ssawiiskhha2993qwnkak2wesacs = Nothing

session("totalPed") = ppedido 
session("frete") = ffrete

Compartilhar este post


Link para o post
Compartilhar em outros sites

Você não está esquecendo de informar o peso?

 

Vou mover o tópico para o Fórum de E-commerce por entender que o erro está na configuração do formulário.

 

 

 

Movido de ASP http://forum.imasters.com.br/public/style_emoticons/default/seta.gif E-commerce / PagSeguro

Compartilhar este post


Link para o post
Compartilhar em outros sites

Então o problema deve ser lá com eles.

 

Deixa só eu te perguntar uma coisa.

 

Você colocou o valor do frete dentro do loop.

Sei que eles pedem que seja enviado assim valor_frete_x.

Mas em sua loja, você tem como dividir o valor do frete por produto?

Compartilhar este post


Link para o post
Compartilhar em outros sites

×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.