latsp

Caros, baixei um template da net, tenho um html com formulário que depois de preenchido envia o conteúdo por e-mail usando dois arquivos .php. Segui as orientações do desenvolvedor, mas o formulário não envia nada. Se alguém puder me dar uma luz, ficarei muito grato. Abaixo os dois códigos PHP. (mail.php e functions.php) mail.php <?php include 'functions.php'; if (!empty($_POST)){ $data['success'] = true; $_POST = multiDimensionalArrayMap('cleanEvilTags', $_POST); $_POST = multiDimensionalArrayMap('cleanData', $_POST); //your email adress $emailTo ="yourmail@yoursite.com"; //"yourmail@yoursite.com"; //from email adress $emailFrom ="contact@yoursite.com"; //"contact@yoursite.com"; //email subject $emailSubject = "Mail from Porta"; $name = $_POST["name"]; $email = $_POST["email"]; $comment = $_POST["comment"]; if($name == "") $data['success'] = false; if (!preg_match("/^[_\.0-9a-zA-Z-]+@([0-9a-zA-Z][0-9a-zA-Z-]+\.)+[a-zA-Z]{2,6}$/i", $email)) $data['success'] = false; if($comment == "") $data['success'] = false; if($data['success'] == true){ $message = "NAME: $name<br> EMAIL: $email<br> COMMENT: $comment"; $headers = "MIME-Version: 1.0" . "\r\n"; $headers .= "Content-type:text/html; charset=utf-8" . "\r\n"; $headers .= "From: <$emailFrom>" . "\r\n"; mail($emailTo, $emailSubject, $message, $headers); $data['success'] = true; echo json_encode($data); } } functions.php <?php // Strips nasty tags from code.. function cleanEvilTags($data) { $data = preg_replace("/javascript/i", "j&#097;v&#097;script",$data); $data = preg_replace("/alert/i", "&#097;lert",$data); $data = preg_replace("/about:/i", "&#097;bout:",$data); $data = preg_replace("/onmouseover/i", "&#111;nmouseover",$data); $data = preg_replace("/onclick/i", "&#111;nclick",$data); $data = preg_replace("/onload/i", "&#111;nload",$data); $data = preg_replace("/onsubmit/i", "&#111;nsubmit",$data); $data = preg_replace("/<body/i", "&lt;body",$data); $data = preg_replace("/<html/i", "&lt;html",$data); $data = preg_replace("/document\./i", "&#100;ocument.",$data); $data = preg_replace("/<script/i", "&lt;&#115;cript",$data); return strip_tags(trim($data)); } // Cleans output data.. function cleanData($data) { $data = str_replace(' & ', ' &amp; ', $data); return (get_magic_quotes_gpc() ? stripslashes($data) : $data); } function multiDimensionalArrayMap($func,$arr) { $newArr = array(); if (!empty($arr)) { foreach($arr AS $key => $value) { $newArr[$key] = (is_array($value) ? multiDimensionalArrayMap($func,$value) : $func($value)); } } return $newArr; }

Pessoal essa duvida me presegue a semanas: 1 – Tenho duas Funções CriaRelatorioGeralBase e ExisteTabela_ em conjunto elas vão criar uma Tabela RelatorioGeral 2 – Alimento os dados do MDB através do Formulário LocalCallT, quando fecho esse Formulário ele automaticamente executa a função CriaRelatorioGeralBase que gera a Tabela RelatorioGeral O problema: No Formulário LocalCallT alimento dois campos Cash e CashE (os dois com valores numéricos Tipo Moeda) que deveriam ser transportados para a tabela RelatorioGeral como acontece com os demais. Só que os dados desses dois (Cash e CashE) não são exportados para Tabela RelatorioGeral. Esse é o meu dilema, algo deve estar faltando nas minhas funções. Postei o arquivo para que vocês possam verificar melhor: http://www.zshare.net/download/5373167011704608/ Ficarei absurdamente agradecido por qualquer Luz. Abraços

E ai turma alguém com uma luz para esse desesperado??? Abraços

Pessoal tudo bem. Preciso de um favor de voces. Tenho esse mdb nele tenho uma tabela RelatorioGeral que é criada via uma função personalizada. http://www.zshare.net/download/5196052366ee6a1f/ O que acontece ou melhor não acontece é que os valores inseridos para os campos Cash e CashE não são exportados para tabela criada. alguém pode me dar um luz. Valeu

Pessoal tenho a seguinte instrução: Dim Rst1 As DAO.Recordset, Rst2 As DAO.Recordset Dim strTabela As String, strCampos1 As String, strCampos2 As String, strCampos3 As String Dim Cont As Integer Dim Campo As DAO.Field Dim PrimeiroCampo As Boolean Dim NomeAnterior As String Dim SomaCampo As Integer strTabela = "RelatorioGeral" Onde strCampos1 = "Campo2,Campo3, Campo4, Campo5, Campo6, Campo7, Campo8, Campo9" Como eu posso editar esses valores e aumentar o numero de variaveis? (Ex: colocar Campo10, Campo11 etc etc...

Mr. MALJ postei dois arquivos neste link um deles está a aplicação que fiz no access e junto um arquivo Excel com duas pastas, o conteudo da tabela dinamica do Excel é exatamente o que preciso fazer no Access. Será que é possivel? http://www.zshare.net/download/5116393179a848e4/ Valeu

Agradecido novamente pela atenção, mas infelizmente o problema continua, basta excluir um dado que o relatorio já apita dizendo que não foi possivel encontar o registro da coluna excluida. Acabei nesse tempo e vi que o Excel faz exatamente o que eu quero com o recurso tabela dinamica. No Access a tabela dinamica não seria o comparado as tabelas dinamicas do Excel?

Opa MrMALJ veja se esse novo modelo postado está mais claro... http://www.zshare.net/download/51053760ea5be126 Explicando melhor: Tenho 2 tabelas relacionadas (LOCAL e COLABORADOR), alimento elas com o formulario=PAGAMENTOS. Nele eu cadastrei 3 Registro (um evento para Local=CASA, um evento para Local=ESCOLA e outro evento Local=ESCRITORIO). Depois montei uma consulta=PAGAMENTOS. Então usei o assitente de consulta referencia cruzada e montei a consulta=CRUZADA, usando o assistente de relatorios montei o relatorio=CRUZADOS que mostra exatamente o que eu preciso. Até aqui tudo lindo, então surge o problema... Ao cadastrar um novo evento no formulario=PAGAMENTOS ele entra na consulta=CRUZADA, mas não atualiza o relatorio=CRUZADOS. Ou seja o meu relatorio não atualiza os dados depois de criado. É isso, será que tem um milagre para resolver meu problema? Valeu pela força mais uma vez....

Mas não é que eu consegui (acho) hehehehehe. Segue o link http://www.zshare.net/download/509751480a98c3d9/ Valeu pela boa vontade e pela paciencia

Como posso postar meu mdb? Tem algum lugar publico ou posso inserir ele aqui no Forum? valeuuuuuuu

Então eu usei o assistente, a consulta atende perfeitamente o que eu quero, mas quando associo ela em um relatorio e altero os dados, o relatorio não abre e indica que o mecanismo do banco de dados MS Jet não reconhece o campo (um dado qualquer quer foi excluido)

Opa MrMALJ, assim: Eu tenho duas tabelas relacionadas: Tabela1: Local (campo: Nome), a outra Tabela2: Colaborador(campos: Nome e Cachet). Preciso de um relatorio agrupado pela Tabela1 (Local) cruzando os dados da Tabela2 (Nome e Cachet), ou seja eu terei o Local agrupado em coluna e os dados do Colaborador agrupados em linha. Usei a consulta referencia cruzada, atendeu direitinho ao que eu preciso, mas quando atualizo os dados (lanço um novo registro) o relatorio que montei via Consulta Cruzada não atualiza os dados. Será que consegui explicar melhor? Valeu

Joia resolvido.... Valeuuuuuuuuuuuuuuu

Xi, acho que não é bem isso que eu queria, deixa me explicar melhor: Tenho um campo DATA (aqui eu digito uma data qualquer) ao lado dele eu tenho uma caixa de texto (Não Acoplada) que não ta me mostrando nada. Que eu queria fazer era quando digitar uma data qualquer no campo DATA aparecer na caixa de texto o dia da semana, mas dentro da caixa não Acoplada. tem algum exemplo em algum lugar que eu possa baixar.

Pessoal, tenho um relatorio formado a partir de duas tabelas relacionadas (Tab1 - Local) e (Tab2 - Colaborador). Meu relatorio está dessa forma: Local(Tab1) - Colaborador(Tab2) - Valor(Tab2), ou seja em um determinado Local eu tenho a lista dos Colaboradores e Valores respectivamente. Agora o meu problema: ele agrupa por linha o Local, tenho como fazer o mesmo agrupamento do Local por coluna??? Valeuuuuuuuuuuuuu