Fabricio Vasco

Camarada.. esse aqui é o codigo..eu tenho um relatório...e preciso gerar os valores nesse campo. Private Sub Report_Activate() Dim db As DAO.Database Dim rsPPA As DAO.Recordset 'Dim total_ppa As Double Dim total_ppa As Integer Set db = CurrentDb() MsgBox ([cod_pubinst]) sql = "SELECT midias_projeto.tipo_veiculo, insercoes_analise, audiencia FROM midias_projeto LEFT JOIN midias_calibracao ON midias_calibracao.veiculo=midias_projeto.veiculo AND midias_calibracao.tipo_veiculo=midias_projeto.tipo_veiculo WHERE midias_projeto.cod_projeto=26;" Set rsPPA = db.OpenRecordset(sql) total_ppa = 0 Do While Not rsPPA.EOF If Not IsNull(rsPPA.Fields(2)) And rsPPA.Fields(2) > 0 Then audiencia = rsPPA.Fields(2) Else audiencia = 0 End If If rsPPA.Fields(0) = "TELEVISAO" Then total_ppa = total_ppa + (((rsPPA.Fields(1) * 0.1) + 1) * (audiencia * 0.2)) ElseIf rsPPA.Fields(0) = "RADIO" Then total_ppa = total_ppa + (((rsPPA.Fields(1) * 0.1) + 1) * (audiencia * 0.6)) ElseIf rsPPA.Fields(0) = "JORNAL" Then total_ppa = total_ppa + (((rsPPA.Fields(1) * 0.2) + 1) * (audiencia * 0.6)) ElseIf rsPPA.Fields(0) = "REVISTA" Then total_ppa = total_ppa + (((rsPPA.Fields(1) * 0.3) + 1) * (audiencia * 0.8)) ElseIf rsPPA.Fields(0) = "CINEMA" Then total_ppa = total_ppa + (((rsPPA.Fields(1) * 0.1) + 1) * (audiencia * 0.2)) ElseIf rsPPA.Fields(0) = "INTERNET" Then total_ppa = total_ppa + (rsPPA.Fields(1) * 1) ElseIf rsPPA.Fields(0) = "EXTENSIVA" Then total_ppa = total_ppa + ((rsPPA.Fields(1) * 0.02) * (audiencia * 0.2)) End If rsPPA.MoveNext Loop rsPPA.Close Set rsPPA = Nothing Set db = Nothing Me.total_ppa = total_ppa Report_Open_Err: MsgBox (Err.Number + " - " + Err.Description) Exit Sub End Sub

Amigos estou com um problema pra resolver aqui em um relatório no access e estou precisando de uma ajuda. Eu pago!! Obrigado.

esse código está no Evento ao abrir..... o resultado não é jogado para o campo. Erro de tipos incompativeis..

Amigos bom dia, não sei se seria bem aqui a postagem da minha dúvida como não achei access e nem vba... Bem, fiz um relatório em access e estou com alguns problemas na execução de um código calculo alguns valores. Segue abaixo o código. Ele tem que fazer basicamente... selecionar duas tabelas e de acordo com alguns campos dessa tabela calcular e mostrar os valores... Private Sub Report_Open(Cancel As Integer) Dim db As DAO.Database Dim rsPPA As DAO.Recordset Dim total_ppa As Double Set db = CurrentDb() MsgBox ([cod_pubinst]) sql = "SELECT midias_projeto.tipo_veiculo, insercoes_analise, audiencia FROM midias_projeto LEFT JOIN midias_calibracao ON midias_calibracao.veiculo=midias_projeto.veiculo AND midias_calibracao.tipo_veiculo=midias_projeto.tipo_veiculo WHERE midias_projeto.cod_projeto=26;" Set rsPPA = db.OpenRecordset(sql) total_ppa = 0 Do While Not rsPPA.EOF If Not IsNull(rsPPA.Fields(2)) And rsPPA.Fields(2) > 0 Then audiencia = rsPPA.Fields(2) Else audiencia = 0 End If If rsPPA.Fields(0) = "TELEVISAO" Then total_ppa = total_ppa + (((rsPPA.Fields(1) * 0.1) + 1) * (audiencia * 0.2)) ElseIf rsPPA.Fields(0) = "RADIO" Then total_ppa = total_ppa + (((rsPPA.Fields(1) * 0.1) + 1) * (audiencia * 0.6)) ElseIf rsPPA.Fields(0) = "JORNAL" Then total_ppa = total_ppa + (((rsPPA.Fields(1) * 0.2) + 1) * (audiencia * 0.6)) ElseIf rsPPA.Fields(0) = "REVISTA" Then total_ppa = total_ppa + (((rsPPA.Fields(1) * 0.3) + 1) * (audiencia * 0.8)) ElseIf rsPPA.Fields(0) = "CINEMA" Then total_ppa = total_ppa + (((rsPPA.Fields(1) * 0.1) + 1) * (audiencia * 0.2)) ElseIf rsPPA.Fields(0) = "INTERNET" Then total_ppa = total_ppa + (rsPPA.Fields(1) * 1) ElseIf rsPPA.Fields(0) = "EXTENSIVA" Then total_ppa = total_ppa + ((rsPPA.Fields(1) * 0.02) * (audiencia * 0.2)) End If rsPPA.MoveNext Loop rsPPA.Close Set rsPPA = Nothing Set db = Nothing 'Me.total_ppa = total_ppa Report_Open_Err: MsgBox (Err.Number + " - " + Err.Description) Exit Sub End Sub

Obrigado. Abraços.

Amigos me ajudem por favor, como posso enviar o resultado de um preenchimento de um form por email??? Seria fácil se não tivesse vários Cases etc... minha dúvida é: preciso enviar todo o conteúdo abaixo por email quando o usuário clicar no botão enviar proposta por email. Desculpe o tamanho e obrigado. <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"> <html xmlns="http://www.w3.org/1999/xhtml"> <head> <meta http-equiv="Content-Type" content="text/html; charset=utf-8" /> <link rel="stylesheet" href="style_simulador.css" type="text/css" media="screen" /> <title>Auto Clube do Brasil - Simulador de Proteção</title> <style type="text/css"> <!-- .style3 {font-size: 16px; color: #333333; } .style12 {color: #555555} .style13 {font-size: 16px; color: #555555; } --> </style> </head> <body> <div id="home-middle-bg-pop"> <div id="home-middle-pop"> <table width="760" border="0" cellspacing="2" cellpadding="2" class="home-middle-1-pop"> <tr> <td colspan="2"><img src="http://nrserver4.net/~autoclub/simulador/images/Simule_protecao_pop.png" width="760" height="80" /></td> </tr> <tr> <td height="70" colspan="2">Olá <?=$_GET['Nome'];?> , primeiramente obrigado por simular sua proteção conosco. Abaixo segue a simulação feita por nosso sistema com base nos dados informados por você no formulário anterior. </td> </tr> <tr> <td colspan="2" align="right"><hr color="#FFFFFF" style="border-bottom:1px solid #333333" /></td> </tr> <tr> <td height="50" align="right"><span class="style3"><img src="images/sidebar-headline.png" width="20" height="20" align="absmiddle" />Dados Pessoais</span></td> <td align="center">&nbsp;</td> </tr> <tr> <td colspan="2" align="right"><hr color="#FFFFFF" style="border-bottom:1px solid #333333" /></td> </tr> <tr> <td align="right">Data:</td> <td><? function brdate($formato,$time=false) { if(!$time) $time=time(); $palavras=array( 'Sunday'=>'domingo', 'Monday'=>'segunda-feira', 'Tuesday'=>'ter&ccedil;a-feira', 'Wednesday'=>'quarta-feira', 'Thursday'=>'quinta-feira', 'Friday'=>'sexta-feira', 'Saturday'=>'s&aacute;bado', 'Sun'=>'Dom', 'Mon'=>'Seg', 'Tue'=>'Ter', 'Wed'=>'Qua', 'Thu'=>'Qui', 'Fri'=>'Sex', 'Sat'=>'S&aacute;b', 'January'=>'janeiro', 'February'=>'fevereiro', 'March'=>'mar&ccedil;o', 'April'=>'abril', 'May'=>'maio', 'June'=>'junho', 'July'=>'julho', 'August'=>'agosto', 'September'=>'setembro', 'October'=>'outubro', 'November'=>'novembro', 'December'=>'dezembro', 'Jan'=>'Jan', 'Feb'=>'Fev', 'Mar'=>'Mar', 'Apr'=>'Abr', 'May'=>'Mai', 'Jun'=>'Jun', 'Jul'=>'Jul', 'Aug'=>'Ago', 'Sep'=>'Set', 'Oct'=>'Out', 'Nov'=>'Nov', 'Dec'=>'Dez'); $data=date($formato,$time); $data=strtr($data,$palavras); return $data; } //echo 'Exemplo de data: '.brdate('d F Y, H:i',1082893645).'<br>'; //echo brdate(' d F Y '); echo brdate('d/m/Y - H:i:s'); ?></td> </tr> <tr> <td width="40%" align="right"><span class="style12">Nome:</span></td> <td width="60%"><?=$_GET['Nome'];?></td> </tr> <tr> <td align="right"><span class="style12">Email:</span></td> <td><?=$_GET['Email'];?></td> </tr> <tr> <td align="right"><span class="style12">Telefone:</span></td> <td><?=$_GET['FoneFixo'];?></td> </tr> <tr> <td align="right"><span class="style12">Celular</span></td> <td><?=$_GET['FoneCel'];?></td> </tr> <tr> <td colspan="2" align="right"><hr color="#FFFFFF" style="border-bottom:1px solid #333333" /></td> </tr> <tr> <td height="50" align="right"><span class="style13"><span class="style3"><img src="images/sidebar-headline.png" width="20" height="20" align="absmiddle" /></span>Proteção Automotiva Mensal</span></td> <td align="right">&nbsp;</td> </tr> <tr> <td colspan="2" align="right"><hr color="#FFFFFF" style="border-bottom:1px solid #333333" /></td> </tr> <tr> <td align="right"><span class="style12">Localidade:</span></td> <td><? if ($_GET['Local'] ==1){echo"MG - Belo Horizonte";} else if ($_GET['Local'] ==2){echo"RJ - Rio de Janeiro";} ?></td> </tr> <tr> <td align="right"><span class="style12">Categoria:</span></td> <td><? if ($_GET['Cat'] ==1){echo"Automóvel";} else if ($_GET['Cat'] ==2){echo"Moto 50 A 150 CILINDRADAS";} else if ($_GET['Cat'] ==3){echo"Moto 151 A 300 CILINDRADAS";} else if ($_GET['Cat'] ==4){echo"Moto 301 A 400 CILINDRADAS";} ?></td> </tr> <tr> <td align="right"><span class="style12">Veiculo:</span></td> <td><?=$_GET['Marca'];?></td> </tr> <tr> <td align="right"><span class="style12">Ano / Modelo</span></td> <td><?=$_GET['Ano'];?> / <?=$_GET['Modelo'];?></td> </tr> <tr> <td align="right"><span class="style12">Valor do veiculo:</span></td> <td>R$ <?= $_GET['Valor'];?> (*)</td> </tr> <tr> <td align="right"><span class="style12">Taxa Associativa Auto Clube Do Brasil:</span></td> <td><?php switch ($_GET['Valor']) { //Localidade: MG - Belo Horizonte - Automovel - Taxa Administrativa case ($_GET['Valor'] <= (real)"20.000,00" and $_GET['Local']=='1' and $_GET['Cat']=='1'): echo "R$ 10,00"; break; case ($_GET['Valor'] <= (real)"30.000,00" and $_GET['Local']=='1' and $_GET['Cat']=='1'): echo "R$ 15,00"; break; case ($_GET['Valor'] <= (real)"35.000,00" and $_GET['Local']=='1' and $_GET['Cat']=='1'): echo "R$ 20,00"; break; case ($_GET['Valor'] <= (real)"40.000,00" and $_GET['Local']=='1' and $_GET['Cat']=='1'): echo "R$ 20,00"; break; case ($_GET['Valor'] <= (real)"50.000,00" and $_GET['Local']=='1' and $_GET['Cat']=='1'): echo "R$ 25,00"; break; //Localidade: MG - Belo Horizonte - Moto - Taxa Administrativa case ($_GET['Local']=='1' and $_GET['Cat']=='2'): echo "R$ 10,00"; break; case ($_GET['Local']=='1' and $_GET['Cat']=='3'): echo "R$ 15,00"; break; case ($_GET['Local']=='1' and $_GET['Cat']=='4'): echo "R$ 20,00"; break; //Localidade: RJ - Rio de Janeiro - Automovel - Taxa Administrativa case ($_GET['Valor'] <= (real)"20.000,00" and $_GET['Local']=='2' and $_GET['Cat']=='1'): echo "R$ 10,00"; break; case ($_GET['Valor'] <= (real)"35.000,00" and $_GET['Local']=='2' and $_GET['Cat']=='1'): echo "R$ 20,00"; break; case ($_GET['Valor'] <= (real)"50.000,00" and $_GET['Local']=='2' and $_GET['Cat']=='1'): echo "R$ 30,00"; break; } ?></td> </tr> <tr> <td align="right"><span class="style12">Assistência 24H:</span></td> <td><?php switch ($_GET['Valor']) { //Localidade: MG - Belo Horizonte - Automovel - Taxa Administrativa case ($_GET['Valor'] <= (real)"20.000,00" and $_GET['Local']=='1' and $_GET['Cat']=='1'): echo "R$ 10,00"; break; case ($_GET['Valor'] <= (real)"30.000,00" and $_GET['Local']=='1' and $_GET['Cat']=='1'): echo "R$ 10,00"; break; case ($_GET['Valor'] <= (real)"35.000,00" and $_GET['Local']=='1' and $_GET['Cat']=='1'): echo "R$ 10,00"; break; case ($_GET['Valor'] <= (real)"40.000,00" and $_GET['Local']=='1' and $_GET['Cat']=='1'): echo "R$ 10,00"; break; case ($_GET['Valor'] <= (real)"50.000,00" and $_GET['Local']=='1' and $_GET['Cat']=='1'): echo "R$ 10,00"; break; //Localidade: MG - Belo Horizonte - Moto - Taxa Administrativa case ($_GET['Local']=='1' and $_GET['Cat']=='2'): echo "R$ 10,00"; break; case ($_GET['Local']=='1' and $_GET['Cat']=='3'): echo "R$ 10,00"; break; case ($_GET['Local']=='1' and $_GET['Cat']=='4'): echo "R$ 10,00"; break; //Localidade: RJ - Rio de Janeiro - Automovel - Taxa Administrativa case ($_GET['Valor'] <= (real)"20.000,00" and $_GET['Local']=='2' and $_GET['Cat']=='1'): echo "R$ 15,00"; break; case ($_GET['Valor'] <= (real)"35.000,00" and $_GET['Local']=='2' and $_GET['Cat']=='1'): echo "R$ 15,00"; break; case ($_GET['Valor'] <= (real)"50.000,00" and $_GET['Local']=='2' and $_GET['Cat']=='1'): echo "R$ 15,00"; break; } ?></td> </tr> <tr> <td align="right"><span class="style12">Proteção contra Terceiros:</span></td> <td><?php switch ($_GET['Valor']) { //Localidade: MG - Belo Horizonte - Automovel - Taxa Administrativa case ($_GET['Valor'] <= (real)"20.000,00" and $_GET['Local']=='1' and $_GET['Cat']=='1' and $_GET['Terceiro']=='1'): echo "R$ 25,00"; break; case ($_GET['Valor'] <= (real)"30.000,00" and $_GET['Local']=='1' and $_GET['Cat']=='1' and $_GET['Terceiro']=='1'): echo "R$ 25,00"; break; case ($_GET['Valor'] <= (real)"35.000,00" and $_GET['Local']=='1' and $_GET['Cat']=='1' and $_GET['Terceiro']=='1'): echo "R$ 25,00"; break; case ($_GET['Valor'] <= (real)"40.000,00" and $_GET['Local']=='1' and $_GET['Cat']=='1' and $_GET['Terceiro']=='1'): echo "R$ 25,00"; break; case ($_GET['Valor'] <= (real)"50.000,00" and $_GET['Local']=='1' and $_GET['Cat']=='1' and $_GET['Terceiro']=='1'): echo "R$ 25,00"; break; case ($_GET['Valor'] <= (real)"20.000,00" and $_GET['Local']=='1' and $_GET['Cat']=='1' and $_GET['Terceiro']=='0'): echo "R$ 0,00"; break; case ($_GET['Valor'] <= (real)"30.000,00" and $_GET['Local']=='1' and $_GET['Cat']=='1' and $_GET['Terceiro']=='0'): echo "R$ 0,00"; break; case ($_GET['Valor'] <= (real)"35.000,00" and $_GET['Local']=='1' and $_GET['Cat']=='1' and $_GET['Terceiro']=='0'): echo "R$ 0,00"; break; case ($_GET['Valor'] <= (real)"40.000,00" and $_GET['Local']=='1' and $_GET['Cat']=='1' and $_GET['Terceiro']=='0'): echo "R$ 0,00"; break; case ($_GET['Valor'] <= (real)"50.000,00" and $_GET['Local']=='1' and $_GET['Cat']=='1' and $_GET['Terceiro']=='0'): echo "R$ 0,00"; break; //Localidade: MG - Belo Horizonte - Moto - Taxa Administrativa case ($_GET['Local']=='1' and $_GET['Cat']=='2' and $_GET['Terceiro']=='1'): echo "R$ 22,50"; break; case ($_GET['Local']=='1' and $_GET['Cat']=='3' and $_GET['Terceiro']=='1'): echo "R$ 22,50"; break; case ($_GET['Local']=='1' and $_GET['Cat']=='4' and $_GET['Terceiro']=='1'): echo "R$ 22,50"; break; case ($_GET['Local']=='1' and $_GET['Cat']=='2' and $_GET['Terceiro']=='0'): echo "R$ 0,00"; break; case ($_GET['Local']=='1' and $_GET['Cat']=='3' and $_GET['Terceiro']=='0'): echo "R$ 0,00"; break; case ($_GET['Local']=='1' and $_GET['Cat']=='4' and $_GET['Terceiro']=='0'): echo "R$ 0,00"; break; //Localidade: RJ - Rio de Janeiro - Automovel - Taxa Administrativa case ($_GET['Valor'] <= (real)"20.000,00" and $_GET['Local']=='2' and $_GET['Cat']=='1' and $_GET['Terceiro']=='1'): echo "R$ 30,00"; break; case ($_GET['Valor'] <= (real)"35.000,00" and $_GET['Local']=='2' and $_GET['Cat']=='1' and $_GET['Terceiro']=='1'): echo "R$ 30,00"; break; case ($_GET['Valor'] <= (real)"50.000,00" and $_GET['Local']=='2' and $_GET['Cat']=='1' and $_GET['Terceiro']=='1'): echo "R$ 30,00"; break; case ($_GET['Valor'] <= (real)"20.000,00" and $_GET['Local']=='2' and $_GET['Cat']=='1' and $_GET['Terceiro']=='0'): echo "R$ 0,00"; break; case ($_GET['Valor'] <= (real)"35.000,00" and $_GET['Local']=='2' and $_GET['Cat']=='1' and $_GET['Terceiro']=='0'): echo "R$ 0,00"; break; case ($_GET['Valor'] <= (real)"50.000,00" and $_GET['Local']=='2' and $_GET['Cat']=='1' and $_GET['Terceiro']=='0'): echo "R$ 0,00"; break; } ?> (**)</td> </tr> <tr> <td align="right"><span class="style12">Rastreador:</span></td> <td><?php switch ($_GET['Valor']) { //Localidade: MG - Belo Horizonte - Automovel - Taxa Administrativa case ($_GET['Valor'] <= (real)"20.000,00" and $_GET['Local']=='1' and $_GET['Cat']=='1'): echo "R$ 0,00"; break; case ($_GET['Valor'] <= (real)"30.000,00" and $_GET['Local']=='1' and $_GET['Cat']=='1'): echo "R$ 0,00"; break; case ($_GET['Valor'] <= (real)"35.000,00" and $_GET['Local']=='1' and $_GET['Cat']=='1'): echo "R$ 0,00"; break; case ($_GET['Valor'] <= (real)"40.000,00" and $_GET['Local']=='1' and $_GET['Cat']=='1'): echo "R$ 75,00"; break; case ($_GET['Valor'] <= (real)"50.000,00" and $_GET['Local']=='1' and $_GET['Cat']=='1'): echo "R$ 75,00"; break; //Localidade: MG - Belo Horizonte - Moto - Taxa Administrativa case ($_GET['Local']=='1' and $_GET['Cat']=='2'): echo "R$ 0,00"; break; case ($_GET['Local']=='1' and $_GET['Cat']=='3'): echo "R$ 0,00"; break; case ($_GET['Local']=='1' and $_GET['Cat']=='4'): echo "R$ 0,00"; break; //Localidade: RJ - Rio de Janeiro - Automovel - Taxa Administrativa case ($_GET['Valor'] <= (real)"20.000,00" and $_GET['Local']=='2' and $_GET['Cat']=='1'): echo "R$ 0,00"; break; case ($_GET['Valor'] <= (real)"35.000,00" and $_GET['Local']=='2' and $_GET['Cat']=='1'): echo "R$ 60,00"; break; case ($_GET['Valor'] <= (real)"50.000,00" and $_GET['Local']=='2' and $_GET['Cat']=='1'): echo "R$ 60,00"; break; } ?></td> </tr> <tr> <td align="right"><span class="style12"><strong>O SUBTOTAL de sua proteção é</strong>:</span></td> <td><b><?php switch ($_GET['Valor']) { //Localidade: MG - Belo Horizonte - Automovel - Taxa Administrativa case ($_GET['Valor'] <= (real)"20.000,00" and $_GET['Local']=='1' and $_GET['Cat']=='1' and $_GET['Terceiro']=='1'): echo "R$ 45,00"; break; case ($_GET['Valor'] <= (real)"30.000,00" and $_GET['Local']=='1' and $_GET['Cat']=='1' and $_GET['Terceiro']=='1'): echo "R$ 50,00"; break; case ($_GET['Valor'] <= (real)"35.000,00" and $_GET['Local']=='1' and $_GET['Cat']=='1' and $_GET['Terceiro']=='1'): echo "R$ 55,00"; break; case ($_GET['Valor'] <= (real)"40.000,00" and $_GET['Local']=='1' and $_GET['Cat']=='1' and $_GET['Terceiro']=='1'): echo "R$ 130,00"; break; case ($_GET['Valor'] <= (real)"50.000,00" and $_GET['Local']=='1' and $_GET['Cat']=='1' and $_GET['Terceiro']=='1'): echo "R$ 135,00"; break; case ($_GET['Valor'] <= (real)"20.000,00" and $_GET['Local']=='1' and $_GET['Cat']=='1' and $_GET['Terceiro']=='0'): echo "R$ 20,00"; break; case ($_GET['Valor'] <= (real)"30.000,00" and $_GET['Local']=='1' and $_GET['Cat']=='1' and $_GET['Terceiro']=='0'): echo "R$ 25,00"; break; case ($_GET['Valor'] <= (real)"35.000,00" and $_GET['Local']=='1' and $_GET['Cat']=='1' and $_GET['Terceiro']=='0'): echo "R$ 30,00"; break; case ($_GET['Valor'] <= (real)"40.000,00" and $_GET['Local']=='1' and $_GET['Cat']=='1' and $_GET['Terceiro']=='0'): echo "R$ 105,00"; break; case ($_GET['Valor'] <= (real)"50.000,00" and $_GET['Local']=='1' and $_GET['Cat']=='1' and $_GET['Terceiro']=='0'): echo "R$ 110,00"; break; //Localidade: MG - Belo Horizonte - Moto - Taxa Administrativa case ($_GET['Local']=='1' and $_GET['Cat']=='2' and $_GET['Terceiro']=='1'): echo "R$ 42,50"; break; case ($_GET['Local']=='1' and $_GET['Cat']=='3' and $_GET['Terceiro']=='1'): echo "R$ 47,50"; break; case ($_GET['Local']=='1' and $_GET['Cat']=='4' and $_GET['Terceiro']=='1'): echo "R$ 52,50"; break; case ($_GET['Local']=='1' and $_GET['Cat']=='2' and $_GET['Terceiro']=='0'): echo "R$ 20,00"; break; case ($_GET['Local']=='1' and $_GET['Cat']=='3' and $_GET['Terceiro']=='0'): echo "R$ 25,00"; break; case ($_GET['Local']=='1' and $_GET['Cat']=='4' and $_GET['Terceiro']=='0'): echo "R$ 30,00"; break; //Localidade: RJ - Rio de Janeiro - Automovel - Taxa Administrativa case ($_GET['Valor'] <= (real)"20.000,00" and $_GET['Local']=='2' and $_GET['Cat']=='1' and $_GET['Terceiro']=='1'): echo "R$ 55,00"; break; case ($_GET['Valor'] <= (real)"35.000,00" and $_GET['Local']=='2' and $_GET['Cat']=='1' and $_GET['Terceiro']=='1'): echo "R$ 125,00"; break; case ($_GET['Valor'] <= (real)"50.000,00" and $_GET['Local']=='2' and $_GET['Cat']=='1' and $_GET['Terceiro']=='1'): echo "R$ 135,00"; break; case ($_GET['Valor'] <= (real)"20.000,00" and $_GET['Local']=='2' and $_GET['Cat']=='1' and $_GET['Terceiro']=='0'): echo "R$ 25,00"; break; case ($_GET['Valor'] <= (real)"35.000,00" and $_GET['Local']=='2' and $_GET['Cat']=='1' and $_GET['Terceiro']=='0'): echo "R$ 95,00"; break; case ($_GET['Valor'] <= (real)"50.000,00" and $_GET['Local']=='2' and $_GET['Cat']=='1' and $_GET['Terceiro']=='0'): echo "R$ 105,00"; break; } ?></b> <strong>mensal + Rateio médio (***)</strong></td> </tr> <tr> <td align="right"><span class="style12">Observações:</span></td> <td><em>(*) Referencia: Tabela FIPE</em></td> </tr> <tr> <td align="right">&nbsp;</td> <td><em>(**) Cobertura da proteção contra terceiros é de 30.000,00 danos materiais e 30.000,00 danos pessoais.</em></td> </tr> <tr> <td align="right">&nbsp;</td> <td><em>(***) Rateio médio varia de acordo com a quantidade de SINISTROS que ocorram no período.</em></td> </tr> <tr> <td colspan="2" align="right"><hr color="#FFFFFF" style="border-bottom:1px solid #333333" /></td> </tr> <tr> <td height="50" align="right"><span class="style13"><span class="style3"><img src="images/sidebar-headline.png" width="20" height="20" align="absmiddle" /></span>Adesão ao Auto Clube</span></td> <td align="center">&nbsp;</td> </tr> <tr> <td colspan="2" align="right"><hr color="#FFFFFF" style="border-bottom:1px solid #333333" /></td> </tr> <tr> <td align="right"><span class="style12">Taxa única de:</span></td> <td><?php switch ($_GET['Valor']) { //Localidade: MG - Belo Horizonte - Automovel - Taxa Administrativa case ($_GET['Valor'] <= (real)"20.000,00" and $_GET['Local']=='1' and $_GET['Cat']=='1'): echo "R$ 160,00"; break; case ($_GET['Valor'] <= (real)"30.000,00" and $_GET['Local']=='1' and $_GET['Cat']=='1'): echo "R$ 160,00"; break; case ($_GET['Valor'] <= (real)"35.000,00" and $_GET['Local']=='1' and $_GET['Cat']=='1'): echo "R$ 160,00"; break; case ($_GET['Valor'] <= (real)"40.000,00" and $_GET['Local']=='1' and $_GET['Cat']=='1'): echo "R$ 160,00"; break; case ($_GET['Valor'] <= (real)"50.000,00" and $_GET['Local']=='1' and $_GET['Cat']=='1'): echo "R$ 160,00"; break; //Localidade: MG - Belo Horizonte - Moto - Taxa Administrativa case ($_GET['Local']=='1' and $_GET['Cat']=='2'): echo "R$ 160,00"; break; case ($_GET['Local']=='1' and $_GET['Cat']=='3'): echo "R$ 160,00"; break; case ($_GET['Local']=='1' and $_GET['Cat']=='4'): echo "R$ 160,00"; break; //Localidade: RJ - Rio de Janeiro - Automovel - Taxa Administrativa case ($_GET['Valor'] <= (real)"20.000,00" and $_GET['Local']=='2' and $_GET['Cat']=='1'): echo "R$ 199,00"; break; case ($_GET['Valor'] <= (real)"35.000,00" and $_GET['Local']=='2' and $_GET['Cat']=='1'): echo "R$ 199,00"; break; case ($_GET['Valor'] <= (real)"50.000,00" and $_GET['Local']=='2' and $_GET['Cat']=='1'): echo "R$ 199,00"; break; } ?> + Taxa de instalação do Rastreador, quando necessário.</td> </tr> <tr> <td align="right"><span class="style12">Observações:</span></td> <td>Pago no ato de adesão ao Auto Clube do Brasil:</td> </tr> <tr> <td colspan="2" align="center"><hr color="#FFFFFF" style="border-bottom:1px solid #333333" /></td> </tr> <tr> <td height="50" colspan="2" align="center"><p align="center"><strong>ASSOCIE-SE AGORA E MINIMIZE AS CONSEQUENCIAS GERADAS </strong><br /> <strong>POR IMPREVISTOS QUE POSSAM ACONTECER!</strong></p></td> </tr> <tr> <td colspan="2" align="center"><hr color="#FFFFFF" style="border-bottom:1px solid #333333" /></td> </tr> <tr> <td colspan="2" align="center"> <a href='java script:;' onclick='window.print();return false'><img src="images/icn-imprimir.gif" width="20" height="20" border="0" align="absmiddle" style="border: 1px solid #CCCCCC"/> Imprimir Simulação </a> | <a href="java script:window.history.go(-1);"><img src="../enterprise/images/arrowback.gif" width="4" height="7" /> Voltar</a></td> </tr> </table> </div> </div> </body> </html>

O problema não é isso amigo, a consulta eu seu fazer eu queria algo como JOIN, SELECT ALL ENTENDEU??

Amigos me ajudem nesse problema por favor. Tenho 3 tabelas tabela 1 cod - 1 nome - Carlos email - carlos@gamail.com gerencia - A tabela 2 cod2 - 2 nome - Roberto email - roberto@gmail.com gerencia - A tabela 3 cod3 - 3 nome - Felipe email -felipe@gmail.com gerencia - C obs: não relacionadas preciso fazer uma consulta que me retorne a quantidade de registros por gerencia de cada tabela e me mostre tudo em uma consulta apenas ( juntar as 3 ). o resultado tem que ser assim ex: gerencia A - gerencia B - gerencia C - gerencia D - gerencia E - gerencia F 2 0 1 0 0 0 Como posso fazer?? Obrigado

Amigos como posso fazer um script que ao clicar em um botão o mesmo abra uma opção para escolher o arquivo xls e depois importar o mesmo para um mdb automaticamente??

Bom dia amigos estou com uma dúvida podem me ajudar?? É o seguinte, tenho um formulario com com duas caixas de listagem e um campo texto funciona assim: 1 - a primeira caixa seleciona na tabela uma lista de fornecedores (Lista0) 2 - eu escolho um ou mais fornecedores e clico em adicionar, 3 - com base no fornecedores selecionados, ambos são adicionados (selecionados) na 2 caixa de listagem (Lista7); 4 - agora eu preciso gerar um relatório (etiquetas, que já tenho) com base nos valores/fornecedores selecionados na segunda caixa (Lista7). Estou colando o código para melhor visualização. Private Sub Comando2_Click() If Lista0.ItemsSelected.Count = 0 Then MsgBox "ESCOLHA PELO MENOS UM ITEM!" Exit Sub End If Texto3 = "" Dim varItm As Variant For Each varItm In Lista0.ItemsSelected Texto3 = Texto3 & Lista0.ItemData(varItm) & vbCrLf Next varItm Call FazConsulta End Sub Private Sub FazConsulta() Dim varItm As Variant Dim SQLPadrao As String Dim Crit As String SQLPadrao = "SELECT * FROM TBL_FORNECEDOR" Crit = "" If Lista0.ItemsSelected.Count = 0 Then Exit Sub End If For Each varItm In Lista0.ItemsSelected If Crit = "" Then Crit = "[RAZAOSOCIAL]='" & Lista0.ItemData(varItm) & "'" Else Crit = Crit & " or [RAZAOSOCIAL]='" & Lista0.ItemData(varItm) & "'" End If Next varItm Me.Lista7.RowSource = SQLPadrao & " where " & Crit Me.Lista7.Requery End Sub

Ola amigo tudo bem?? você me respondeu lá no forum scriptbrasil sobre combos em cascata lembra?? Bem funcionou perfeitamente, agora uma dúvida, ao salvar as informações no banco as mesma estão sendo salvas como número (ID)como posso salvar as informações em textos???? Porque se eu quiser mostrar na caixa de texto/consulta, o mesmo me mostrar o ID. Ou se caso essa for a melhor opção, como posso fazer para mostrar o nome no campo/form no lugar do ID?? Obrigado Ex: consultar estados Rio de Janeiro = ID 2. Se eu alterar a coluna acoplada para "2" a informação salva no banco vai ser o texto.......mas as querys não funcionam...as cascatas.... Obrigado mais uma vez.

Obrigado amigo era exatamente isso que eu precisava..vou testar aqui e depois eu respondo obrigado novamente.

Todo o relacionamento já está feito e correto consegui sincronizar a primeira caixa com a segunda mas não sei fazer a terceira e a quarta. Seria basicamente uma sincronização de Pais, estado e cidade...... Fiz dessa forma: Caixas 1 - cbo_macro_processo 2 - cbo_processo 3 - cbo_produto_cat 4 - cbo_produto a - Na primeira caixa dei um select retornando os dados da tabela macro processo; e no evento " ao receber o foco" coloquei cbo_processo = Null b - Na segunda, busquei as informações da tabela processo baseadas na primeira ( SELECT [processo] FROM tbl_processos WHERE (IDmacroprocessos=Formulários!frm_cadastro_custo!cbo_macro_processo); ) e no evento " ao receber o foco" coloquei cbo_processo.Requery Até aqui funcionou, na terceira e na quarta quis seguir a mesma ordem e nada não funcionou não sincroniza. c - SELECT [produto_cat] FROM tbl_produtos_cat WHERE (IDprocessos=Formulários!frm_cadastro_custo!cbo_processo); d - SELECT [produto] FROM tbl_produtos WHERE (IDproduto_cat=Formulários!frm_cadastro_custo!cbo_produto_cat); E agora amigos como posso resolver esa questão. Obrigado Fabricio