Ir para conteúdo
Fórum Script Brasil

Martinsrj

Membros
  • Total de itens

    291
  • Registro em

  • Última visita

Tudo que Martinsrj postou

  1. Olá pessoal, boa noite! Possuo um formulário onde os três ultimos campos (Tipo Despesa, Descrição, Valor) poderão ser criados dinamicamente pelo usuario através do javascript. Segue o link do formulário: http://martinsrj.com/teste/index1.php A pergunta é, como que eu irei resgatar esses valores dinamicamente e colocar em um insert do SQL. Aqui eu resgato: $optTpDesp = $_POST["optTpDesp"]; $txtDesc = $_POST["txtDesc"]; $txtValor = $_POST["txtValor"]; Aqui a minha query: $sql = "INSERT INTO tabelaExemplo VALUES(NULL,'".$optTpDesp."','".$txtDesc."','".txtValor."')";
  2. Olá pessoal, boa tarde! Venho aqui solicita ajuda na validação do meu código para mobile. Segue o código: <!DOCTYPE html PUBLIC "-//WAPFORUM//DTD XHTML Mobile 1.0//EN" "http://www.wapforum.org/DTD/xhtml-mobile10.dtd"> <html xmlns="http://www.w3.org/1999/xhtml"> <head> <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1" /> <title>Atualização de Chamado</title> <style type="text/css"> label { font-family:Verdana, Arial, Helvetica, sans-serif; font-size:11px; color:#000000; } input:focus, select:focus, textarea:focus { background:#DFDFFF; color:white; } body { margin:0; padding:0; background:#FFFFFF; } table.tabela { /*width:200; text-align: center; margin: 0 auto; */ } </style> <script type="text/javascript"> function addRowToTable() { var tbl = document.getElementById('AtChamado'); var lastRow = tbl.rows.length -1; var iteration = lastRow; var row = tbl.insertRow(lastRow); var cellRightSel = row.insertCell(0); var textTpDespesa = document.createTextNode("Tipo Despesa"); var fontTpDespesa = document.createElement("label"); var quebraTpDespesa = document.createElement('BR'); var sel = document.createElement('select'); var quebra = document.createElement('BR'); sel.name = 'selRow' + iteration; sel.options[0] = new Option('... Selecione ...', '... Selecione ...'); sel.options[1] = new Option('Kilometragem', 'Kilometragem'); sel.options[2] = new Option('Taxi', 'Taxi'); sel.options[3] = new Option('Onibus', 'Ônibus'); sel.options[4] = new Option('Refeicao', 'Refeição'); sel.options[5] = new Option('Outros', 'Outros'); fontTpDespesa.appendChild(textTpDespesa); cellRightSel.appendChild(fontTpDespesa); cellRightSel.appendChild(quebraTpDespesa); cellRightSel.appendChild(sel); cellRightSel.appendChild(quebra); var textDesc = document.createTextNode("Descrição"); var fontDesc = document.createElement("label"); var quebraDesc = document.createElement('BR'); var el = document.createElement('input'); var quebra = document.createElement('BR'); el.type = 'text'; el.name = 'txtDescD' + iteration; el.id = 'txtDescD' + iteration; el.size = 10; el.onkeypress = keyPressTest; fontDesc.appendChild(textDesc); cellRightSel.appendChild(fontDesc); cellRightSel.appendChild(quebraDesc); cellRightSel.appendChild(el); cellRightSel.appendChild(quebra); var textValor = document.createTextNode("Valor"); var fontValor = document.createElement("label"); var quebraValor = document.createElement('BR'); var el = document.createElement('input'); el.type = 'text'; el.name = 'txtValorD' + iteration; el.id = 'txtValorD' + iteration; el.size = 10; el.onkeypress = keyPressTest; fontValor.appendChild(textValor); cellRightSel.appendChild(fontValor); cellRightSel.appendChild(quebraValor); cellRightSel.appendChild(el); } function keyPressTest(e, obj) { var validateChkb = document.getElementById('chkValidateOnKeyPress'); if (validateChkb.checked) { var displayObj = document.getElementById('spanOutput'); var key; if(window.event) { key = window.event.keyCode; } else if(e.which) { key = e.which; } var objId; if (obj != null) { objId = obj.id; } else { objId = this.id; } displayObj.innerHTML = objId + ' : ' + String.fromCharCode(key); } } function removeRowFromTable() { var tbl = document.getElementById('AtChamado'); var lastRow = tbl.rows.length -1; if (lastRow > 13) tbl.deleteRow(lastRow - 1); } function verificaHP(obj) { if (!document.layers) { var txt = document.getElementById("somenteHP"); if (obj.value == "f_hp@ntl.com.br") { txt.style.display = "inline"; txt.name = "optTipoChamado"; obj.name = ""; } else { txt.style.display = "none"; txt.name = ""; obj.name = "optTipoChamado"; } } } </script> </head> <body> <form action="formNtl.html" method="get"> <table class="tabela" id="AtChamado" align="left"> <tr> <td> <label class="label" for="optTipoChamado">Tipo do Chamado:</label><br /> <select name="optTipoChamado" id="optTipoChamado" onchange="verificaHP(this)"> <option value="">... Selecione ...</option> <option value="f_hp@ntl.com.br">HP</option> <option value="f_altiris@ntl.com.br">NTL</option> </select> </td> </tr> <tr> <td> <label for="txtChamadoAltiris" class="label">Chamado Altiris:</label><br /> <input class="input" type="text" title="" maxlength="" size="" name="txtChamadoAltiris" id="txtChamadoAltiris" value="" /> </td> </tr> <tr> <td> <label for="txtChamadoHP" class="label">Chamado HP:</label><br /> <input class="input" type="text" title="" maxlength="" size="" name="txtChamadoHP" id="txtChamadoHP" value="" /> </td> </tr> <tr> <td> <label for="txtDescServico" class="label">Descrição do Serviço:</label><br /> <textarea title="" name="txtDescServico" id="txtDescServico" rows="5" cols="25" class="input"></textarea> </td> </tr> <tr id="somenteHP" style="display:none;"> <td> <label for="txtPNRemovido" class="label">PN Removido:</label><br /> <input class="input" type="text" title="" maxlength="" size="" name="txtPNRemovido" id="txtPNRemovido" value="" /> <br /> <label for="txtNSRemovido" class="label">N/S Removido</label><br /> <input class="input" type="text" title="" maxlength="" size="" name="txtNSRemovido" id="txtNSRemovido" value="" /> <br /> <label for="txtPNInstalado" class="label">PN Instalado:</label><br /> <input class="input" type="text" title="" maxlength="" size="" name="txtPNInstalado" id="txtPNInstalado" value="" /> <br /> <label for="txtNSInstalado" class="label">N/S Instalado</label><br /> <input class="input" type="text" title="" maxlength="" size="" name="txtNSInstalado" id="txtNSInstalado" value="" /> </td> </tr> <tr> <td> <label for="txtQAssRS" class="label">Quem assinou o RS</label><br /> <input class="input" type="text" title="" maxlength="" size="" name="txtQAssRS" id="txtQAssRS" value="" /> </td> </tr> <tr> <td> <label for="txtRS" class="label">RS</label><br /> <input class="input" type="text" title="" maxlength="" size="" name="txtRS" id="txtRS" value="" /> </td> </tr> <tr> <td> <label for="txtDtInicio" class="label">Data Inicio</label><br /> <input class="input" type="text" title="" maxlength="" size="" name="txtDtInicio" id="txtDtInicio" value="" /> </td> </tr> <tr> <td> <label for="txtHrInicio" class="label">Hora Inicio</label><br /> <input class="input" type="text" title="" maxlength="" size="" name="txtHrInicio" id="txtHrInicio" value="" /> </td> </tr> <tr> <td> <label for="txtDtTermino" class="label">Data Término</label><br /> <input class="input" type="text" title="" maxlength="" size="" name="txtDtTermino" id="txtDtTermino" value="" /> </td> </tr> <tr> <td> <label for="txtDtTermino" class="label">Hora Término<br /></label> <input class="input" type="text" title="" maxlength="" size="" name="txtDtTermino" value="" /> </td> </tr> <tr> <td> <label class="label" id="txtReembolso"><b>Reembolso</b></label> </td> </tr> <tr> <td> <label for="optTpDesp" class="label">Tipo Despesa </label> <br /> <select name="optTpDesp" id="optTpDesp"> <option value="">... Selecione ...</option> <option value="Kilometragem">Kilometragem</option> <option value="Taxi">Taxi</option> <option value="Onibus">Ônibus</option> <option value="Refeicao">Refeição</option> <option value="Outros">Outros</option> </select><br /> <label for="txtDesc" class="label" onKeyPress="keyPressTest(event, this);">Descrição</label><br /> <input class="input" type="text" title="" maxlength="" size="10" onKeyPress="keyPressTest(event, this);" name="txtDesc" id="txtDesc" value="" /><br /> <label for="txtValor" class="label" onKeyPress="keyPressTest(event, this);">Valor</label><br /> <input class="input" type="text" title="" maxlength="" size="10" onKeyPress="keyPressTest(event, this);" name="txtValor" id="txtValor" value="" /> </td> </tr> <tr> <td align="left"> <input type="button" value="Inserir" onclick="addRowToTable();" /> <input type="button" value="Remover" onclick="removeRowFromTable();" /><br /> <input name="Enviar" type="submit" id="Enviar" value="Enviar" /> </td> </tr> </table> </form> </body> </html>
  3. Olá pessoal, bom dia! No post anterior informei duas dúvidas. A primeira conforme o texto que está dentro dos parenteses em parte foi resolvido ( 1° Preciso criar no final da pagina um link onde o usuario ao clicar crie as linhas abaixo. Existe caso que apenas com esses campos irá suprir a necessidade do usuario, porem depedendo do caso irá necessida na pagina de mais campo como esse. Por isso que pensei num link e criando dinamicamente os campos abaixo. ) Veja neste link como ficou: http://martinsrj.com/teste/index1.php A minha segunda dúvida ainda não consegui fazer. No inicio do formulario poussuo uma combo com dois itens HP e NTL. Necessito que os campos abaixo não apareçam quando a pagina for carregada, mas apareça apenas quando o usuario selecionar a opção HP. Os itens (labels) são esses: PN Removido, N/S Removido, PN Instalado, N/S Instalado e consequetemente mais os inputs. Abraços. Acabei de atualizar o código, segue o link: Postado no site do pastebin: http://pastebin.com/ZnWucemv
  4. Olá pessoal, bom dia! Estou com duas dificuldade em javascript. Primeira- 1° Preciso criar no final da pagina um link onde o usuario ao clicar crie as linhas abaixo. Existe caso que apenas com esses campos irá suprir a necessidade do usuario, porem depedendo do caso irá necessida na pagina de mais campo como esse. Por isso que pensei num link e criando dinamicamente os campos abaixo. <tr> <td> <label for="optTpDesp" class="label">Tipo de despesas</label><br /> <select name="optTpDesp" id="optTpDesp"> <option>... Selecione ...</option> <option value="Kilometragem">Kilometragem</option> <option value="Taxi">Taxi</option> <option value="Onibus">&Ocirc;nibus</option> <option value="Refeicao">Refei&ccedil;&atilde;o</option> <option value="Outros">Outros</option> </select> </td> </tr> <tr> <td> <label for="txtDesc" class="label">Descrição</label><br /> <input class="input" type="text" title="" maxlength="" size="" name="txtDesc" id="txtDesc" value="" /> </td> </tr> <tr> <td> <label for="txtValor" class="label">Valor</label><br /> <input class="input" type="text" title="" maxlength="" size="" name="txtValor" id="txtValor" value="" /> </td> </tr> <tr> Segunda 2° Quando o usuario selecionar a opção HP da combo (optTipoChamado) imprima tb na tabela as linha abaixo: <tr> <td> <label for="txtPNRemovido" class="label">PN Removido:</label><br /> <input class="input" type="text" title="" maxlength="" size="" name="txtPNRemovido" id="txtPNRemovido" value="" /> </td> </tr> <tr> <td> <label for="txtNSRemovido" class="label">N/S Removido</label><br /> <input class="input" type="text" title="" maxlength="" size="" name="txtNSRemovido" id="txtNSRemovido" value="" /> </td> </tr> <tr> <td> <label for="txtPNInstalado" class="label">PN Instalado:</label><br /> <input class="input" type="text" title="" maxlength="" size="" name="txtPNInstalado" id="txtPNInstalado" value="" /> </td> </tr> <tr> <td> <label for="txtNSInstalado" class="label">N/S Instalado</label><br /> <input class="input" type="text" title="" maxlength="" size="" name="txtNSInstalado" id="txtNSInstalado" value="" /> </td> </tr> No momento como não estou conseguindo fazer esse script em javascript imprime tudo na tabela, seja ele HP ou NTL Abaixo segue o meu código completo. OBS.: Cheguei a criar uma função para pegar o nome do texto que o usuario selecionou. <!DOCTYPE html PUBLIC "-//WAPFORUM//DTD XHTML Mobile 1.0//EN" "http://www.wapforum.org/DTD/xhtml-mobile10.dtd"> <html xmlns="http://www.w3.org/1999/xhtml"> <head> <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1" /> <title>Atualização de Chamado</title> <style type="text/css"> .label { font-family:Verdana, Arial, Helvetica, sans-serif; font-size:11px; } input:focus, select:focus, textarea:focus { background:#DFDFFF; color:white; } body { margin:0; padding:0; background:#E8E8E8; } #tudo { width: 760px; margin:0 auto; padding: 10px; text-align:left; /* "remédio" para o hack do IE */ background:#FFFFFF; } /*#conteudo { padding: 5px; background-color: #FFFFFF; }*/ table.tabela { width:200; text-align: center; margin: 0 auto; } </style> <script type="text/javascript"> function textoCombo(){ var indice = document.frmPrimeiro.optTipoChamado.selectedIndex var textoEscolhido = document.frmPrimeiro.optTipoChamado.options[indice].text alert(textoEscolhido) } </script> </head> <body> <div id="tudo"> <!--<div id="conteudo">--> <form id="frmPrimeiro" name="frmPrimeiro" method="post" action=""> <table class="tabela"> <tr> <td> <label class="label" for="optTipoChamado">Tipo do Chamado:</label><br /> <select title="Por favor, selecione o tipo do chamado" name="optTipoChamado" id="optTipoChamado"> <option value="">... Selecione ...</option> <option value="f_hp@ntl.com.br">HP</option> <option value="f_altiris@ntl.com.br">NTL</option> </select> </td> </tr> <tr> <td> <label for="txtChamadoAltiris" class="label">Chamado Altiris:</label><br /> <input class="input" type="text" title="" maxlength="" size="" name="txtChamadoAltiris" id="txtChamadoAltiris" value="" /> </td> </tr> <tr> <td> <label for="txtChamadoHP" class="label">Chamado HP:</label><br /> <input class="input" type="text" title="" maxlength="" size="" name="txtChamadoHP" id="txtChamadoHP" value="" /> </td> </tr> <tr> <td> <label for="txtDescServico" class="label">Descrição do Serviço:</label><br /> <textarea title="" name="txtDescServico" id="txtDescServico" rows="5" cols="25" class="input"></textarea> </td> </tr> <tr> <td> <label for="txtPNRemovido" class="label">PN Removido:</label><br /> <input class="input" type="text" title="" maxlength="" size="" name="txtPNRemovido" id="txtPNRemovido" value="" /> </td> </tr> <tr> <td> <label for="txtNSRemovido" class="label">N/S Removido</label><br /> <input class="input" type="text" title="" maxlength="" size="" name="txtNSRemovido" id="txtNSRemovido" value="" /> </td> </tr> <tr> <td> <label for="txtPNInstalado" class="label">PN Instalado:</label><br /> <input class="input" type="text" title="" maxlength="" size="" name="txtPNInstalado" id="txtPNInstalado" value="" /> </td> </tr> <tr> <td> <label for="txtNSInstalado" class="label">N/S Instalado</label><br /> <input class="input" type="text" title="" maxlength="" size="" name="txtNSInstalado" id="txtNSInstalado" value="" /> </td> </tr> <tr> <td> <label for="txtQAssRS" class="label">Quem assinou o RS</label><br /> <input class="input" type="text" title="" maxlength="" size="" name="txtQAssRS" id="txtQAssRS" value="" /> </td> </tr> <tr> <td> <label for="txtRS" class="label">RS</label><br /> <input class="input" type="text" title="" maxlength="" size="" name="txtRS" id="txtRS" value="" /> </td> </tr> <tr> <td> <label for="txtDtInicio" class="label">Data Inicio</label><br /> <input class="input" type="text" title="" maxlength="" size="" name="txtDtInicio" id="txtDtInicio" value="" /> </td> </tr> <tr> <td> <label for="txtHrInicio" class="label">Hora Inicio</label><br /> <input class="input" type="text" title="" maxlength="" size="" name="txtHrInicio" id="txtHrInicio" value="" /> </td> </tr> <tr> <td> <label for="txtDtTermino" class="label">Data Término</label><br /> <input class="input" type="text" title="" maxlength="" size="" name="txtDtTermino" id="txtDtTermino" value="" /> </td> </tr> <tr> <td> <label for="txtDtTermino" class="label">Hora Término<br /></label> <input class="input" type="text" title="" maxlength="" size="" name="txtDtTermino" value="" /> </td> </tr> <tr> <td> <label class="label" id="txtReembolso"><b>Reembolso</b></label> </td> </tr> <tr> <td> <label for="optTpDesp" class="label">Tipo de despesas</label><br /> <select name="optTpDesp" id="optTpDesp"> <option>... Selecione ...</option> <option value="Kilometragem">Kilometragem</option> <option value="Taxi">Taxi</option> <option value="Onibus">&Ocirc;nibus</option> <option value="Refeicao">Refei&ccedil;&atilde;o</option> <option value="Outros">Outros</option> </select> </td> </tr> <tr> <td> <label for="txtDesc" class="label">Descrição</label><br /> <input class="input" type="text" title="" maxlength="" size="" name="txtDesc" id="txtDesc" value="" /> </td> </tr> <tr> <td> <label for="txtValor" class="label">Valor</label><br /> <input class="input" type="text" title="" maxlength="" size="" name="txtValor" id="txtValor" value="" /> </td> </tr> <tr> <td align="right"> <input type=button value="Propriedades" onclick="textoCombo()">&nbsp; <input name="Enviar" type="submit" id="Enviar" value="Enviar" /> </td> </tr> </table> </form> <!--</div>--> </div> </body> </html>
  5. Olá pessoal, boa tarde! Estou com grande dificuldade em validar, digo deixar o meu código 100% no padrão web (celular), pois o código abaixo irá rodar apenas em celular. Segue o código hospedado no site pastebin: http://pastebin.com/vhyeDD7y Utilizei esse site: http://validator.w3.org/ e apareceu vários erros. Desde já agradeço pelas dicas e correções a serem feitos para que o meu código seja perfeito para a visualização no smarthphone. Abraços.
  6. Sim, veja: <img src="http://chart.apis.google.com/chart?chtt=<%= var_tituloVeiculo %>&chdl=Positivo|Negativo|Neutro&chs=1000x300&cht=bvg&chco=4D89F9,C6D9FD,00FFFF&chd=t:<%= SemAcento(left(var_Serie1,len(var_Serie1)-1))%>|<%= SemAcento(left(var_Serie2,len(var_Serie2)-1))%>|<%= SemAcento(left(var_Serie3,len(var_Serie3)-1))%>&chxl=0:|<%= SemAcento(var_categories) %>&chxt=x,y&chxr=0,0,500&chxp=1,20,40,60,80,100,120,140,160 "/> Aqui coloquei no maximo 160, mas necessito que vá até 300. Agora realizei alguma modificações no código e deixei dessa forma: <img src="http://chart.apis.google.com/chart?chtt=<%= var_tituloVeiculo %>&chdl=Positivo|Negativo|Neutro&chs=1000x300&cht=bvg&chco=4D89F9,C6D9FD,00FFFF&chd=t:<%= SemAcento(left(var_Serie1,len(var_Serie1)-1))%>|<%= SemAcento(left(var_Serie2,len(var_Serie2)-1))%>|<%= SemAcento(left(var_Serie3,len(var_Serie3)-1))%>&chxl=0:|<%= SemAcento(var_categories) %>&chxt=x,y&chxr=0,0,500|1,0,200&chxp=1,20,40,60,80,100,120,140,160,180,200,220 "/> Verifique o print que dei da tela do Grafico: http://uploaddeimagens.com.br/imagem/index...ficogoogle4.png Escrive em duas colunas do grafico 321 e a outra 156, repare que a barra vai até 200, porem coloquei até 220.
  7. Não entendi a intenção do Poderoso Google a esse respeito... rsrsrsr Valeu aí Bareta pela descoberta. :D Coloquei no Pastebin o meu código atualizado (09/04/2010 - 12:59), Segue o link: http://pastebin.com/uG6jKVwK Uma coisa que está me deixando grilado é que existe valores acima de 100 e o eixo y vai até 100 vejam a imagem no link abaixo: http://uploaddeimagens.com.br/imagem/index...ficogoogle3.png Abraços. Paulo Martins.
  8. Essa foi violento... nunca iria imaginar que o problema era o Ç.... rsrsrsr :D Fiz um pequeno ajuste colocando dessa forma: http://chart.apis.google.com/chart?chs=1000x300&cht=bvg&chco=4D89F9,C6D9FD,00FFFF&chd=t:30,10,20,22,10,50,156,10,33|10,15,20,8,18,122,50,5,10|5,4,3,5,8,10,20,30,50&chxl=0:|BAND|GLOBONEWS|RECORD|REDE%20GLOBO|REDE%20TV|SBT|TV%20ALERJ|TV%20JUSTICA|TV%20BRASIL&chxt=x
  9. Link do Fórum Imasters: http://forum.imasters.uol.com.br/index.php...gerar-gráficos/ Olá campeão, boa tarde! Preciso gerar um grafico onde apenas o primeiro é gerado corretamente o segundo falta dados e ainda aparece apenas numero aos invés de aparecer os dados. Link da imagem que está ocorrendo no 2° grafico: http://uploaddeimagens.com.br/imagem/index/graficogoogle.jpg Abaixo segue o código: <!-----#include file="includes/SmartSourceP.asp"--> <!-----#include file="includes/SmartSourceS_v01.asp"----------------> <!-----#include file="includes/SmartSourceR_v05.asp"---------------> <html> <head> <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1" /> <title>Gráfico</title> <script type="text/javascript" src="http://www.google.com/jsapi"></script> <style> .legenda { font-family:Arial; font-size:12px; } </style> </head> <body> <% vtQuery = Split(Session("gpSQL1"),"from") '############################################### MIDIA GRÁFICO ############################################### strQueryMidia = "SELECT nomecliente, midia, tipo_medida, sum(qtd) as qtd, sum(qtd_negativa) as qtd_negativa, sum(qtd_neutra) as qtd_neutra, sum(tempo) as tempo, sum(tempo_negativo) as tempo_negativo, sum(tempo_neutra) as tempo_neutra FROM "& vtQuery(1) & " group by midia, nomecliente, tipo_medida" 'Response.Write(strQueryMidia) Set rs_midia = gpExecuteSQL(strQueryMidia) var_tituloMidia = rs_midia.fields("nomecliente") & " - " & rs_midia.fields("midia") 'Response.Write(var_tituloVeiculo) 'Response.End() while not rs_midia.eof if rs_midia.fields("tipo_medida") <> "TEMPO" then ctValsQtd = ctValsQtd + CInt(rs_midia.fields("qtd")) ctValsQtdNeg = ctValsQtdNeg + CInt(rs_midia.fields("qtd_negativa")) ctValsQtdNeu = ctValsQtdNeu + CInt(rs_midia.fields("qtd_neutra")) Else ctValsQtd = ctValsQtd + CInt(rs_midia.fields("tempo")) ctValsQtdNeg = ctValsQtdNeg + CInt(rs_midia.fields("tempo_negativo")) ctValsQtdNeu = ctValsQtdNeu + CInt(rs_midia.fields("tempo_neutra")) End if rs_midia.movenext wend %> <!-- <img src="http://chart.apis.google.com/chart?chs=480x256&amp;cht=p3&amp;chtt=Grafico Midia&amp;chd=s:CDDEFH,Wps679&amp;chco=ff0000,0000ff&amp;chdl=sales|visits&amp;chxl=0:|jan|feb|mar|apr|may|jun|&amp;chxt=x"/> Parametros: http://code.google.com/intl/pt-BR/apis/chart/docs/chart_params.html --> <img src="http://chart.apis.google.com/chart?cht=p3&chd=t:<%=ctValsQtd%>,<%=ctValsQtdNeg%>,<%=ctValsQtdNeu%>&chs=700x250&chl=Positivo|Negativo|Neutro&chtt=<%=var_tituloMidia%>"/> <br><br> <div align="center" class="legenda"> <% var_totalPNegNeu = Cint(ctValsQtd) + Cint(ctValsQtdNeg) + Cint(ctValsQtdNeu) 'Response.Write(var_totalPNegNeu) varPorcentagemPos = (ctValsQtd * 100) / var_totalPNegNeu varPorcentagemNeg = (ctValsQtdNeg * 100) / var_totalPNegNeu varPorcentagemNeu = (ctValsQtdNeu * 100) / var_totalPNegNeu Response.Write "Positivo: " & Round(varPorcentagemPos) & "%" & " | Negativo: " & Round(varPorcentagemNeg) & "%" & " | Neutro: " & Round(varPorcentagemNeu) & "%" %> </div> <br><br><br> '>>>>>>>>>>>>>> Aqui segue o 2° GRAFICO - No momento estou fazendo o teste manualmente e não dinamico. <% strQueryVeiculo = "SELECT nomecliente, midia, veiculo, tipo_medida, sum(qtd) as qtd, sum(qtd_negativa) as qtd_negativa, sum(qtd_neutra) as qtd_neutra, sum(tempo) as tempo, sum(tempo_negativo) as tempo_negativo, sum(tempo_neutra) as tempo_neutra FROM "& vtQuery(1) & " group by veiculo, midia, nomecliente, tipo_medida" 'Response.Write(strQueryVeiculo) 'Response.End() Set rs_veiculo = gpExecuteSQL(strQueryVeiculo) var_tituloVeiculo = rs_veiculo.fields("nomecliente") & " - " & rs_veiculo.fields("midia") 'Response.Write(var_tituloVeiculo) 'Response.End() While Not rs_veiculo.Eof var_categories = var_categories & rs_veiculo("veiculo") & "|" 'Response.Write var_categories 'Positivo If rs_veiculo.fields("tipo_medida") <> "TEMPO" then var_Serie1 = var_Serie1 & rs_veiculo("qtd") & "," Else var_Serie1 = var_Serie1 & rs_veiculo("tempo") & "," End if If rs_veiculo.fields("tipo_medida") <> "TEMPO" then var_Serie2 = var_Serie2 & rs_veiculo("qtd_negativa") & "," Else var_Serie2 = var_Serie2 & rs_veiculo("tempo_negativo") & "," End if If rs_veiculo.fields("tipo_medida") <> "TEMPO" then var_Serie3 = var_Serie3 & rs_veiculo("qtd_neutra") & "," Else var_Serie3 = var_Serie3 & rs_veiculo("tempo_neutra") & "," End if rs_veiculo.movenext Wend Response.Write var_categories & "<br>" Response.Write left(var_Serie1,len(var_Serie1)-1) %> <br /> <!-- Retirei desse site: http://code.google.com/intl/pt-BR/apis/visualization/documentation/gallery/columnchart.html --> <img src="http://chart.apis.google.com/chart?chs=1000x300&amp;cht=bvg&chco=4D89F9,C6D9FD,00FFFF&chd=t:30,0,0,22,10,0,156,10,33|10,0,20,0,0,122,0,5,0|0,0,0,0,0,0,0,0,0&chxl=0:|BAND|GLOBONEWS|RECORD|REDE GLOBO|REDE TV|SBT|TV ALERJ|TV BRASIL&chxt=x"/> </body> </html> Uma observação, se for retirado o ultima categoria: TV JUSTIÇA o grafico aparece normalmente Vejam a imagem abaixo: http://uploaddeimagens.com.br/imagem/index...ficogoogle2.jpg Existe alguma solução? Achei os gráficos gerados pelo Google (http://brunoamarelo.wordpress.com/2008/05/15/api-do-google-para-gerar-gráficos/) muito mais bonito que a do próprio ASP: OWC11.ChartSpace Desde já agradeço.
  10. Olá Pessoal, beleza? Preciso de uma ajuda em uma query. Acontece o seguinte que os campos tempo, tempo_negativo e o tempo_neutra está no banco como varchar. Preciso executar essa query abaixo que está funcionando perfeitamente, porem momentaneamente eu converti os campos que mencionei para inteiro, porem no momento eles tem que estar como varchar. Pergunta é, Como que eu faço com a query abaixo que some (+) os campos que eu mencionei sendo que o mesmo estão como varchar? SELECT nomecliente, midia, tipo_medida, sum(qtd) as qtd, sum(qtd_negativa) as qtd_negativa, sum(qtd_neutra) as qtd_neutra, sum(tempo) as tempo, sum(tempo_negativo) as tempo_negativo, sum(tempo_neutra) as tempo_neutra FROM usr_view_insercao WHERE nomecliente='CEG' AND dia1>='2009.05.05' AND dia1>='2009.05.05' AND midia='TV'AND codConcorrente = 0 group by midia, nomecliente, tipo_medida Tentei fazer algo assim: SELECT nomecliente, midia, tipo_medida, sum(qtd) as qtd, sum(qtd_negativa) as qtd_negativa, sum(qtd_neutra) as qtd_neutra, sum(Convert(VarChar(10),(Convert(Numeric(10,2), tempo)) as tempo, sum(Convert(VarChar(10),(Convert(Numeric(10,2), tempo_negativo)) as tempo_negativo, sum(Convert(VarChar(10),(Convert(Numeric(10,2), tempo_neutra)) as tempo_neutra FROM usr_view_insercao WHERE nomecliente='CEG' AND dia1>='2009.05.05' AND dia1>='2009.05.05' AND midia='TV' AND codConcorrente = 0 group by midia, nomecliente, tipo_medida Porem da o seguinte erro: Msg 156, Level 15, State 1, Line 7 Incorrect syntax near the keyword 'as'. Desde já agradeço.
  11. Martinsrj

    Exportar Grafico

    Olá pessoal, boa tarde! Fiz funcionar a exportação de dois gráficos em uma mesma pagina. Vejam o código atualizado: http://pastebin.com/DKaC440g Porem, apesar de algumas mudanças no código só consegui fazer em apenas em alguns gráficos exemplo esses: 1° Grafico: Call renderChart("includes/Charts/Column3D.swf", "", strXML, "FactorySum", 700, 350) 2° Grafico: Call renderChart("includes/Charts/Pie3D.swf", "", strXML, "FactorySum2", 700, 350) Agora o grafico que eu preciso que venha ter essa funcionalidade de exportar é esse: Call renderChart("includes/Charts/FCF_MSColumn3D.swf", "", strXML, "FactorySum2", 700, 350) Acredito que esse carinha: FCExporter.swf é que esteja restrigindo que alguns grafico como esse FCF_MSColumn3D.swf não tenha a funcionalidade para exportar imagem. Desde já agradeço ajuda de todos. Paulo Martins.
  12. Martinsrj

    Exportar Grafico

    Como criar o Grafico em um bitmap? Existem algum componente para gerar em bitmap. Não entendi a sua intenção de colocar captcha? Abraços.
  13. Martinsrj

    Exportar Grafico

    Bom dia pessoal! Venho aqui com tristeza, pois descobri pelo proprio site FusionChart o programa FREE não exporta para imagem conforme a imagem abaixo: Link direto da imagem: http://uploaddeimagens.com.br/imagem/index..._naoexporta.jpg Segue o link da informação: http://translate.google.com.br/translate?u...l=&ie=UTF-8 Achei muito lindo o Grafico gerado no meu sistema, pena que ainda existe uma pendencia no meu sistema que é a exportação do grafico Flash para imagem. alguém tem alguma ideia do que eu possa realizar? Existe algum comando em asp para exporta para imagem? Abraços.
  14. Martinsrj

    Exportar Grafico

    Tem como me passar o código? Não consegui localzar o códgo do exemplo que você citou. Abraços.
  15. Martinsrj

    Exportar Grafico

    Link da imagem: http://uploaddeimagens.com.br/imagem/ver/1graficoerro.JPG
  16. Martinsrj

    Exportar Grafico

    Boa tarde! O que tem ocorrido é que eu consegui gerar dois gráficos em uma mesma pagina perfeitamente, porem o primeiro grafico exporta normalmente para jpg, pdf, mas o segundo grafico não funciona a EXPORTAÇÃO. Veja a imagem que coloquei no link no post anterior a opção de exportar fica desabilitada.
  17. Martinsrj

    Exportar Grafico

    Olá pessoal, bom dia! Estou com grande dificuldade em encontrar na exportação de Grafico (fusoncharts). Possuo dois gráficos em uma pagina (BAC41_grafico_listagem.asp), porem não consigo que a funcionalidade de exporta para JPG funcione, apenas o primeiro grafico funciona corretamente. Aqui segue o link do grafico que peguei na internet e implementei no sistema daqui da empresa: http://www.fusioncharts.com/docs/ http://www.fusioncha...p?gMenuItemId=4 http://www.fusioncharts.com/ Abaixo segue os códigos que estou utilizando para gerar o Gráfico. BAC41_grafico_listagem.asp Endereço no pastebin: http://pastebin.com/cee8KmK5 FusionCharts.js Endereço no pastebin: http://pastebin.com/VuPwRhHH FusionCharts.asp Endereço no pastebin: http://pastebin.com/bCJSBH8G FusionChartsExportComponent.js Endereço no pastebin: http://pastebin.com/KqgCLhEp Segue o link da imagem dos dois gráficos. Reparem que no primeiro Grafico as opções apareceram corretamente, porem no segundo grafico arareceu com as opções mas desabilitados! Link: http://uploaddeimage...coerro.JPG/true Caso alguém já utilizou e tem experiencia em ASP com esse componente favor postar uma solução para o meu caso. Desde já agradeço.
  18. Olá pessoal, boa tarde! Preciso utilizar o VBscript em uma aplicação que roda no IE, porem estou com dificuldade. Irei colocar abaixo um script simples que funciona normalmente. A ideia do script abaixo é que enquando o usuario está em frente a tela aguardando apareça uma imagem em tela informando isso (loading...) <!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=iso-8859-1" /> <style> #loading{ text-align:center; position:absolute; top:6%; left:10%; font-family::Arial, Helvetica, sans-serif; font-size:12px; font-weight:bold; color:#666666; } </style> <title>:::...Digite o Numero - Gerando o numero de 0 até o numero digitado...:::</title> </head> <body> <script language="vbscript"> Dim modelo varNumero = InputBox("Entre com o numero: ") if varNumero <> "" then document.write("<div id='loading'><img src='figuras/loading.gif' boder=0><br />Gerando os numeros de 0 ...</div>") For i = 1 to varNumero MsgBox "Numero"& i Next Mens = MsgBox("Concluido!",64,"Mensagem") End if </script> </body> </html> Abaixo segue a minha aplicação de verdade, porem não funciona porque o ASP executa primeiro a SUB e assim não exibindo a imagem na tela informando para o usuario que as etiquetas estão sendo geradas. <!-----#include file="includes/Extras.asp"--> <!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=iso-8859-1" /> <title>Untitled Document</title> </head> <body> <script language="vbscript"> Dim modelo modelo = InputBox("Entre com o modelo da Etiqueta:","Gerar Etiqueta","Pimaco 6081/6181/6281 Branca") if modelo <> "" then //GeraEtiqueta "SELECT top 10 nome, endereco, bairro, cidade, estado, cep FROM cadastro", ""&modelo&"" GeraEtiqueta "<%=session("filtroSQL") %>", ""&modelo&"" Mens = MsgBox("Concluido!",64,"Mensagem") window.close else Mens = MsgBox("Precisa informar um modelo de etiqueta!",48,"Atenção") end if </script> </body> </html> Desde já agradeço.
  19. Olá pessoal, bom dia! Consegui resolver a situação em parte. Consigo realizar o download das extensões DOC, XLS, porem as extensões ppt, pptm continua dando erro, pois além de não abrir no browser não permite o downloads. SEGUE abaixo o código atualizado: 'o link abaixo é o responsavel para direcionar para o arquivo desejado <a href='documentos/<%=rs.fields("nome")%>?arquivo=<%=rs.fields("nome")%>' target="_blank"><%=rs.fields("nome_orig")%></a> </td> <td> <% '29/01/2010 - atenção, a variavel arquivo declarado no link acima não recebe o nome do arquivo 'Response.Write arquivo & "Imprimindo o arquivo" 'Response.End() 'cria o objeto Scripting.FileSystemObject e atribui a variável objFSO Set objFSO = Server.CreateObject("Scripting.FileSystemObject") 'pega o caminho e características da pasta "documentos" e atribui a objFolder Set objFolder = objFSO.GetFolder(Server.MapPath("documentos")) 'Escreve no navegador o caminho completo da pasta (Ex: E:\inetpub\wwwdata\background\html\Teste\sistema\documentos 'Response.write objFolder.Path 'Response.Write objFolder.Size & "em byte" 'Retorna o tamanho total da pasta, incluindo todos os seus arquivos. Set fc = objFolder.Files totalArq = fc.count tamArq = Server.MapPath (".") & "\" & objFolder.Name 'Response.Write(tamArq) Set arqObj = objFSO.GetFile(tamArq&"\"&rs.fields("nome")) 'Response.Write round(arqObj.Size / 1024) & " KB" 'varDataUacesso = varDataUacesso & arqObj.DateLastAccessed 'imprimo o nome do arquivo. 'Response.write arqObj.Name 'Response.write objFolder.Name &"\"& arqObj.Name if Request("arquivo") <> "" then '-------------------------------------------------------------------------- Response.Buffer = True Dim strFilePath, strFileSize, strFileName Const adTypeBinary = 2 'strFilePath = "C:\ whatever the path is " strFilePath = objFolder.Path 'strFileSize = ... the size of file .. optional strFileName = arqObj.Name Response.Clear '8*******************************8 ' Requires MDAC 2.5 to be stable ' I recommend MDAC 2.6 or 2.7 '8*******************************8 'Response.AddHeader "Content-Type","application/x-msdownload" Response.AddHeader "Content-Disposition","attachment; filename="&rs.fields("nome_orig") Set objStream = Server.CreateObject("ADODB.Stream") objStream.Open 'objStream.Type = adTypeBinary ' Response.Write arquivo & "Imprimindo o arquivo" ' Response.End() objStream.LoadFromFile strFilePath strFileType = lcase(Right(strFileName, 4)) ' Feel Free to Add Your Own Content-Types Here Select Case strFileType Case ".asf" ContentType = "video/x-ms-asf" Case ".avi" ContentType = "video/avi" Case ".doc" ContentType = "application/msword" case ".ppt", ".pps",".pptm" 'ContentType = "application/mspowerpoint" 'ContentType = "application/vnd.ms-powerpoint" ContentType = "application/x-powerpoint" 'Informação sobre forçar o downloads em arquivo .txt 'http://www.plugmasters.com.br/forum/lofiversion/index.php/t8047.html Case ".txt" ContentType = "text/plain" Case ".zip" ContentType = "application/zip" Case ".xls" ContentType = "application/vnd.ms-excel" Case ".gif" ContentType = "image/gif" Case ".jpg", "jpeg" ContentType = "image/jpeg" Case ".wav" ContentType = "audio/wav" Case ".mp3" ContentType = "audio/mpeg3" Case ".mpg", "mpeg" ContentType = "video/mpeg" Case ".rtf" ContentType = "application/rtf" Case ".htm", "html" ContentType = "text/html" Case ".asp" ContentType = "text/asp" Case ".pdf" ContentType = "application/pdf" Case Else 'Handle All Other Files ContentType = "application/octet-stream" End Select 'Response.AddHeader("Content-type: Application/Octet-stream") 'Response.AddHeader "Content-Disposition", "attachment; filename="& rs.fields("nome_orig") Response.AddHeader "Content-Length", strFileSize ' In a Perfect World, Your Client would also have UTF-8 as the default ' In Their Browser Response.Charset = "UTF-8" Response.ContentType = ContentType Response.BinaryWrite objStream.Read Response.Flush objStream.Close Set objStream = Nothing '------------------------------------------------------------------------------ End if
  20. Estou tentando aplicar um código que quando o usuario clicar no link o arquivo não abra no navegador e obrigue o usuario a realizar o downloads. Erro abaixo: ADODB.Stream error '800a0bba' File could not be opened. /exemplo/html/teste/sistema/bac54_arqareadocliente.asp, line 339 ---------------------------------------------------------------------------------------------------- A linha 339 é essa: objStream.LoadFromFile strFilePath Segue o código abaixo: <td valign="middle"> <a href="BAC54_arqareadocliente.asp?nomeArq=<%=rs.fields("nome_orig")%>&arquivo=<%=rs.fields("nome")%>"><%=rs.fields("nome_orig")%></a> </td> <td> <% 'cria o objeto Scripting.FileSystemObject e atribui a variável objFSO Set objFSO = Server.CreateObject("Scripting.FileSystemObject") 'pega o caminho e características da pasta "documentos" e atribui a objFolder Set objFolder = objFSO.GetFolder(Server.MapPath("documentos")) 'Escreve no navegador o caminho completo da pasta (Ex: E:\inetpub\wwwdata\exemplo\html\Teste\sistema\documentos 'Response.write objFolder.Path 'Response.Write objFolder.Size & "em byte" 'Retorna o tamanho total da pasta, incluindo todos os seus arquivos. Set fc = objFolder.Files totalArq = fc.count tamArq = Server.MapPath (".") & "\" & objFolder.Name 'Response.Write(tamArq) Set arqObj = objFSO.GetFile(tamArq&"\"&rs.fields("nome")) 'Response.Write round(arqObj.Size / 1024) & " KB" 'varDataUacesso = varDataUacesso & arqObj.DateLastAccessed 'imprimo o nome do arquivo. 'Response.write arqObj.Name 'Response.write objFolder.Name &"\"& arqObj.Name '-------------------------------------------- Response.Buffer = True Dim strFilePath, strFileSize, strFileName Const adTypeBinary = 2 'strFilePath = "C:\ whatever the path is " strFilePath = objFolder.Path 'strFileSize = ... the size of file .. optional strFileName = arqObj.Name Response.Clear '8*******************************8 ' Requires MDAC 2.5 to be stable ' I recommend MDAC 2.6 or 2.7 '8*******************************8 Set objStream = Server.CreateObject("ADODB.Stream") objStream.Open 'objStream.Type = adTypeBinary objStream.LoadFromFile strFilePath strFileType = lcase(Right(strFileName, 4)) ' Feel Free to Add Your Own Content-Types Here Select Case strFileType Case ".asf" ContentType = "video/x-ms-asf" Case ".avi" ContentType = "video/avi" Case ".doc" ContentType = "application/msword" Case ".zip" ContentType = "application/zip" Case ".xls" ContentType = "application/vnd.ms-excel" Case ".gif" ContentType = "image/gif" Case ".jpg", "jpeg" ContentType = "image/jpeg" Case ".wav" ContentType = "audio/wav" Case ".mp3" ContentType = "audio/mpeg3" Case ".mpg", "mpeg" ContentType = "video/mpeg" Case ".rtf" ContentType = "application/rtf" Case ".htm", "html" ContentType = "text/html" Case ".asp" ContentType = "text/asp" Case Else 'Handle All Other Files ContentType = "application/octet-stream" End Select 'Response.AddHeader "Content-Disposition", "attachment; filename= strFileName Response.AddHeader "Content-Length", strFileSize ' In a Perfect World, Your Client would also have UTF-8 as the default ' In Their Browser Response.Charset = "UTF-8" Response.ContentType = ContentType Response.BinaryWrite objStream.Read Response.Flush objStream.Close Set objStream = Nothing
  21. Era isso memo bareta. Uma dúvida. Existe como eu criar vários botões como Soma, Subtração e quando o usuario clicar no botão soma executar o metodo: obj.soma() e quando o usuario clicar no botão subtração executar o metodo: obj.subtracao()
  22. Olá pessoal, boa tarde! Possuo um classe de calculadora, porem não soma. Aparece o seguinte resultado: A Soma de X e Y: 105 O Valor de X vale: 10 O Valor de Y vale: 5 class2Calculadora.asp <% ''' Class Calculadora ''' <author>Paulo Martins</author> Class Calculadora Private x_ Private y_ '-- Private Sub Class_Initialize() ' x_ = 6 ' y_ = 3 '-- End Sub Private Sub Class_Terminate() End Sub Public Sub Calculadora(x_, y_) x = x_ y = y_ End Sub Public Property Get x() x=x_ End Property Public Property Let x(value) x_=value End Property Public Property Get y() y=y_ End Property Public Property Let y(value) y_=value End Property Public Function Soma() Soma = me.x + me.y Response.Write ("A Soma de X e Y: " & Soma) Response.Write ("<br>") End Function Public Function subtracao() subtracao = me.x - me.y Response.Write ("A Subtração de X e Y: " & subtracao) Response.Write ("<br>") End Function Public Function ToString() ToString = "<br>O Valor de X vale: " & me.x & "<br>O Valor de Y vale: " & me.y Response.Write ToString End Function End class '-- class Principal '-- dim obj '-- Set obj = new Calculadora '-- obj.Calculadora 7, 3 '-- obj.x = 8 '-- obj.y = 4 '-- obj.subtracao() 'Chamando a função soma. '-- obj.soma() '-- obj.ToString() '-- set obj = nothing %> Pagina PRINCIPAL: indexCalculadora.asp <!-- #include file ="class2Calculadora.asp" --> <!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> <title></title> </head> <body> <form method="post" action=""> <label>Calculadora</label> Digite o Primeiro Valor: &nbsp; <input type="text" id="x" name="x" /><br /> Digite o Segundo Valor <input type="text" id="y" name="y" /><br /> <input type="submit" value="Soma" id="btnSoma" name="btnSoma" /> </form> </body> </html> <% '-- class Principal 'For Each dados in Request.Form ' vetDados(I) = Request.Form(dados) ' I = I + 1 'Next dim obj Set obj = new Calculadora '--obj.Calculadora 7, 3 obj.Calculadora Request.Form("x"), Request.Form("y") '-- obj.subtracao() 'Chamando a função soma. obj.soma() obj.ToString() set obj = nothing %>
  23. Ola pessoal, boa noite! Consegui identificar o erro e aqui segue as modificacoes no codigo: <input type="hidden" name="nome" value="<?php echo $_POST['nome']; ?>" /> <input type="hidden" name="email" value="<?php echo $_POST['email']; ?>" /> <input type="hidden" name="datanascimento" value="<?php echo $_POST['datanascimento']; ?>" /> <input type="hidden" name="sexo" value="<?php echo $_POST['sexo']; ?>" /> <input type="hidden" name="profissao" value="<?php echo $_POST['profissao']; ?>" /> Dei um echo:$sqlIns = "INSERT INTO tab_usuario (NOME, EMAIL, DATAMASCIMENTO, SEXO, PROFISSAO, TELEFONE, ENDERECO, CIDADE, ESTADO, CEP) VALUES "; $sqlIns .= "('varNome','$varEmail','$varDatanascimento','$varSexo','$varProfissao','$varTelefone','$varEndereco','$varCidade','$varEstado','$varCep')"; echo $sqlIns . "<br>"; $resultado = mysql_query($sqlIns) or die(mysql_error()); echo $varNome; Aparece isso: INSERT INTO tab_usuario (NOME, EMAIL, DATAMASCIMENTO, SEXO, PROFISSAO, TELEFONE, ENDERECO, CIDADE, ESTADO, CEP) VALUES ('varNome','teste@teste.com.br','01/01/1980','f','Biologa','2222-2222','Rua Imaginaria, 76','Rio de Janeiro','RJ','21361777') Naila Uma pergunta: Porque ele esta inserindo no banco varNome se o correto deveria ser Naila, pois mesmo porque eu dei um echo no final e imprimiu Naila. Abracos
  24. Ola pessoal, boa noite! Construi duas pagina para dividir o cadastramento de usuario no site. não consegui identificar o erro, segue abaixo a msg de erro: Notice: Undefined variable: nome in C:\Arquivos de programas\Apache Software Foundation\Apache2.2\htdocs\des.websitephp\etapa2.php on line 13 a linha do erro e esta: <input type="hidden" name="nome" value="<?php echo $nome; ?>" /> Abaixo segue a primeira pagina do Cadastramento chamado: etapa1.php <!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" /> <title>Untitled Document</title> </head> <body> <p align="center"><big><big> <strong>Cadastramento - Etapa 1 de 2</strong></big></big></p> <form method="POST" action="etapa2.php"> <div align="center"><center><p> Nome: <input type="text" name="nome" size="20" /></p></center></div> <div align="center"><center><p> E-mail: <input type="text" name="email" size="20" /></p></center></div> <div align="center"><center><p> Data de Nascimento: <input type="text" name="datanascimento" size="20" /></p></center></div> <div align="center"><center><p> Sexo: <input type="radio" value="m" checked name="sexo" />Masculino&nbsp;&nbsp;<input type="radio" name="sexo" value="f" />Feminino</p></center></div> <div align="center"><center><p> Profissao: <input type="text" name="profissao" size="20" /></p></center></div> <div align="center"><center><p> <input type="submit" value="Prosseguir &gt;&gt;" name="prosseguir" /></p></center></div> </form> </body> </html> Abaixo a segunda pagina do cadastramento: <!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" /> <title>Untitled Document</title> </head> <body> <p align="center"><big><big><strong> Cadastramento - Etapa 2 de 2</strong></big></big></p> <form method="POST" action="etapa1e2cadastra.php"> <input type="hidden" name="nome" value="<?php echo $nome; ?>" /> <input type="hidden" name="email" value="<?php echo $email; ?>" /> <input type="hidden" name="datanascimento" value="<?php echo $datanascimento; ?>" /> <input type="hidden" name="sexo" value="<?php echo $sexo; ?>" /> <input type="hidden" name="profissao" value="<?php echo $profissao; ?>" /> <div align="center"><center><p>Telefone: <input type="text" name="telefone" size="20" /></p></center></div> <div align="center"><center><p>Endereco: <input type="text" name="endereco" size="20" /></p></center></div> <div align="center"><center><p>Cidade: <input type="text" name="cidade" size="20" />&nbsp;&nbsp;Estado: <input type="text" name="estado" size="2" /></p></center></div> <div align="center"><center><p>CEP: <input type="text" name="cep" size="9" /></p></center></div> <div align="center"><center><p> <input type="submit" value="Prosseguir &gt;&gt;" name="prosseguir" /></p></center></div> </form> </body> </html> Abaixo segue a pagina que trata as informacoes: <?php include "conecta_mysql.php"; $varNome = $_POST["nome"]; echo $varNome; $varEmail = $_POST["email"]; $varDatanascimento = $_POST["datanascimento"]; $varSexo = $_POST["sexo"]; $varProfissao = $_POST["profissao"]; $varTelefone = $_POST["telefone"]; $varEndereco = $_POST["endereco"]; $varCidade = $_POST["cidade"]; $varEstado = $_POST["estado"]; $varCep = $_POST["cep"]; $sqlIns = "INSERT INTO tab_usuario VALUES "; $sqlIns .= "('varNome','$varEmail','$varDatanascimento','$varSexo','$varProfissao','$varTelefone','$varEndereco','$varCidade','$varEstado','$varCep')"; $resultado = mysql_query($sqlIns); echo "Usuario cadastro com sucesso!!!"; ?>
×
×
  • Criar Novo...