Componentes VisaNet

[Geisimar Rech 0]

Abrindo esse tópico, pois já estou a um tempo tentando decifrar a problematica dos componentes VBV.

 

Se alguém que ja implantou em algum sistema e estiver disposto a ajudar...Fico muito agradecido.

[Patrique 0]

Olá, de uma olhada no code abaixo, lá tem um exemplo de implementação de VBV, basta olhar e adaptar ao seu code.

 

http://www.lojaexemplo.com.br/downloads/kits_integracao.zip

 

[]'s

[Geisimar Rech 0]

Estou utilizando esses modelos mais não tive sucesso...

Estou fazendo direto pelo Visanet...esse que você passou tem que ter comprado uma ferramenta da Locaweb.

[Geisimar Rech 0]

Meu código

Dim objSvrHTTP,PostData
			Set objSvrHTTP = Server.CreateObject("Msxml2.ServerXMLHTTP.3.0")
			PostData="tid="& GerarTid("1001734898","A001")
			PostData=PostData & "&merchid=" & "cfglojavisa"
			PostData=PostData & "&order=" & session("order")
			PostData=PostData & "&orderid= 123456789"
			'PostData=PostData & "&free=" & session("free")
			PostData=PostData & "&free=" & "simulador"
			PostData=PostData & "&price="& cartao_valor
			PostData=PostData & "&authenttype= 1"
			PostData=PostData & "&damount= 3.350,00 "
						
			objSvrHTTP.SetTimeouts 15000, 250000, 250000, 250000
			objSvrHTTP.open "POST", "http://www.utionline.com.br/componentes_vbv/mpg.exe?", false
			objSvrHTTP.setRequestHeader "Content-Type", "application/x-www-form-urlencoded"
			objSvrHTTP.send trim(PostData)
			sStatus = objSvrHTTP.status
			response.clear
			response.Write objSvrHTTP.responseText

Erro:

Erro ao abrir arquivo de Input

[Patrique 0]

Entendi Geisimar, particulamente eu nunca trabalhei com VBV por isso não posso te ajudar, vamos ver se alguém pode ajudar.

[Geisimar Rech 0]

OK, vamos aguardar uma boa alma.

[DarkDucke 0]

tb estou implementando, já consegui a primeira comunicação agora estou tendo problema no response.exe

onde você está parado?

 

att.