% DIM conexaodb, rsEdpf, strUPD, dd1, dd2, tel, fax varCodcliente = session("xcodigo") call abreConexao strUPD = "SELECT * FROM pfisica " strUPD = strUPD & "Where codigo = " & varCodcliente set rsEdpf = conexaodb.Execute(strUPD) dd1 = MID(rsEdpf.Fields("telefone"),1,2) dd2 = MID(rsEdpf.Fields("fax"),1,2) tel = MID(rsEdpf.Fields("telefone"),3,8) fax = MID(rsEdpf.Fields("fax"),3,8) %>
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
Sobre ABIM Comex - Por que associar-se - Termos de Serviço - Política de Privacidade | ||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
© Copyright 2004 - ABIM Associeted Business International Market | ||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||