Jump to content
Fórum Script Brasil

Mestre Gabriel

Membros
  • Posts

    19
  • Joined

  • Last visited

About Mestre Gabriel

  • Birthday 11/03/1982

Perfil

  • Gender
    Male

Mestre Gabriel's Achievements

0

Reputation

  1. Bom dai pessoal, estou com um problema e preciso da ajuda de voces! Tenho que inserir um valor num campo do Tipo VARCHAR. O valor é no seguinte formato ##.##.## Onde obviamente terão numeros no lugar dos # ... O BD o que coloco depois do 2º ponto , alguém sabe a solução? Se eu tiro os 3 ultimos caracteres, ficando assim: ##.## ele aceita Erro: Microsoft OLE DB Provider for SQL Server error '80040e14' Incorrect syntax near '.40'. "tentei inserir 10.52.40"
  2. Mestre Gabriel

    Duvida Teórica

    Olha, sou novato na área da programaçao, e com muita dificuldade fiz um sistema que simula um simples forum de discursao, onde é postado topicos e respostas aos topicos... Me perguntaram se o forum que fiz é Orientado a Objeto.. Fiz ele em ASP VBScript.. É orientado a objeto ?? grato
  3. Aparece sim... o erro é este: Tipo de erro: ADODB.Field (0x80020009) BOF ou EOF são verdadeiros, ou o registro atual foi excluído. A operação solicitada pelo aplicativo requer um registro atual. /junior/SALDO/resultado.asp Acho que é porque ele não achou valor na consulta... Mas se eu tirar o laço "do while" ele acha os valores na consulta. O erro está no "do while" verifica aí fazendo favor.
  4. Mestre Gabriel

    Outro Do While

    É o seguinte, o erro que está faltando concertar está explicado logo abaixo do codigo: <%option explicit dim cf, m, a, sql, p cf = request.Form("codforn") m = request.Form("mês") a = request.Form("ano") p = 0 %> <!--#include file="../CONEXAO/conectar.asp" --> <% set sql = conexao.execute("SELECT * FROM Vendastb WHERE CodF = '"&cf&"' AND mês = '"&m&"' AND Ano = '"&a&"'") if sql.eof then session("msg") = "Nenhum Resultado Encontrado!" response.Redirect("pag2.asp") end if do while not sql.eof p = p + sql("Total") sql.MoveNext Loop %> Se eu tirar o laço do while e não calcular nada em "p" o codigo funciona, posso fazer qualquer consulta usando a variavel "sql" mas tá dando problema no calculo do p. Se eu mandar escrever apenas o sql("Total") ele coloca certinho... Mas como quero a soma dos totais ele não calcula.. Tenho um programa aqui que fiz algo identico e deu certo.. não to entendendo o erro agora. Dá uma luz aí pessoal... to quase terminando meu pro.. rsrs
  5. É o seguinte, concertei uma parte dos erros, o erro que está faltando concertar agora está explicado logo abaixo do codigo: <%option explicit dim cf, m, a, sql, p cf = request.Form("codforn") m = request.Form("mês") a = request.Form("ano") p = 0 %> <!--#include file="../CONEXAO/conectar.asp" --> <% set sql = conexao.execute("SELECT * FROM Vendastb WHERE CodF = '"&cf&"' AND mês = '"&m&"' AND Ano = '"&a&"'") if sql.eof then session("msg") = "Nenhum Resultado Encontrado!" response.Redirect("pag2.asp") end if do while not sql.eof p = p + sql("Total") sql.MoveNext Loop %> Se eu tirar o laço do while e não calcular nada em "p" o codigo funciona, posso fazer qualquer consulta usando a variavel "sql" mas tá dando problema no calculo do p. Se eu mandar escrever apenas o sql("Total") ele coloca certinho... Mas como quero a soma dos totais ele não calcula.. Tenho um programa aqui que fiz algo identico e deu certo.. não to entendendo o erro agora. Dá uma luz aí pessoal... to quase terminando meu pro.. rsrs
  6. Pessoal, boa tarde... Estou com um codigo aqui que devia estar funcionando, mas está dando erro, não consigo saber o porque do erro! Quando não acha nada no banco ele não retorna a session("msg") para a pagina pag2.aspO loop do while não funciona e já verifiquei os campos do BD e estao corretos, retirei o loop e testei o programa e ele rodou uma parte (só funciona para o mês de marçoDá o erro: BOF ou EOF são verdadeiros, ou o registro atual foi excluído. A operação solicitada pelo aplicativo requer um registro atual./junior/SALDO/resultado.asp MAS EXISTE RESULTADO PARA A CONSULTA NO BD o codigo é o seguinte: <%option explicit dim cf, m, a, sql, p cf = request.Form("codforn") m = request.Form("mês") a = request.Form("ano") p = 0 %> <!--#include file="../CONEXAO/conectar.asp" --> <% set sql = conexao.execute("SELECT * FROM Vendastb WHERE CodF = '"&cf&"' AND mês = '"&m&"' AND Ano = '"&a&"'") if sql.eof then session("msg") = "Nenhum Resultado Encontrado!" response.Redirect("pag2.asp") end if do while not sql.eof p = sql("Total") + p sql.MoveNext Loop %> Quem puder me ajudar, me ajude aí... abraço
  7. Eu iniciei a variável i = 1 Eu testei da maneira que voce fez também e deu certo. Mas quando eu tento fazer uma operação aritmetica com a variavel que e um campo do BD ele fala que é Tipos incompativeis. A variavel que é numerica e o campo sql("PrecoCX")) também é numerico. não to conseguindo achar. me ajuda aí. ____________________________________________________ aí irmao, já achei o erro, agora funcionou beleza, o erro estava na variavel 'i' . ela não devia existir. O valor do campo quant deve ser igual ao do campo codigo.. t+ Muito obrigado assim mesmo
  8. Pessoal, podem dar uma força aqui? É o seguinte, estou pegando os produtos que estão marcados pela check box num formulário e trazendo para uma outra pagina. Esse codigo funciona apenas para o 1º produto marcado no formulario anterioir, ou então se eu marcar todos. Se eu marcar apenas o produto 2 , ou o 3 ou o 4, ele dá erro. O erro que tá dando é o seguinte: Tipos incompatíveis: '[string: ""]' Mas não to achando essa incompatibilidade, pois estou fazendo aritmetica entre numeros... e acho que se o 1º funciona os outro também tinham que funcionar pois está dentro de um Laço FOR. Podem dar uma olhada? <%For Each check in request.Form("checar") que = request.Form(("quant"&i)) set sql = conexao.execute("SELECT * FROM VivaPapertb WHERE Codigo = '"&check&"'") %> <tr> <th scope="col"><input name="textfield8" type="text" size="5" value="<%response.write check%>"></th> <th scope="col"><input name="textfield9" type="text" value="<%response.write sql("Descricao")%>" size="50"></th> <th scope="col"><input name="textfield10" type="text" size="5" value="<%response.write que%>"></th> <th scope="col"><input name="textfield11" type="text" value="<%response.write sql("PrecoCX")%>" size="8"></th> <th scope="col"><input name="textfield12" type="text" size="8" value="<%response.write que * sql("PrecoCX")%>"></th> </tr> <% soma = soma + (que * sql("PrecoCX")) i = i + 1 next %> vlw aí... :D
  9. Esse contador que você coloca junto dos nomes seria algo desse tipo? dim i i = 1 <%do while not sql.eof%> <input name="codp" type="text" id="codp" value="<%response.write sql("Codigo")%>" size="5"> <input name="descp" type="text" id="descp" value="<%response.write sql("Descricao")%>" size="60"> <input name="quant" type="text" id="quant" size="5"> <input name="checar" type="checkbox" id="ck<%= i%>" value="sim"> (coloquei o contador aqui)
  10. Pessoal, to com uma duvida que to ate com medo aqui! hehe Olha, eu fiz uma consulta ao BD e o resultado da consulta gera uma página da seguinte maneira: Cod.Produto - Descrição - CheckBox ou seja, são listados vários produtos, e cada um vem com codigo, descriçõ e 1 check box na frente. Eu preciso assinalar os produtos que quero e inseri-los em uma outra Tabela de vendas. me dêem uma força aí! abraço ;)
  11. Obrigado pela atenção.. Mas é o seguinte. Como faço pra saber se o servidor SMTP esta funcionando na minha maquina ? hehe grato
  12. Galera, criei um formulario do tipo Fale Conosco no site da empresa que trabalho. Porem, não estou sabendo configurar corretamente a função phpmailer(). A pagina fica um tempo processando e depois da um timeout. Estou rodando o site em minha maquina local (localhost...) Pesquisei bastante mas mesmo assim não sanei meu problema. O codigo esta postado logo abaixo, alguém pode me ajudar? ficarei muito grato. <? require ("class.phpmailer.php"); $mail = new PHPMailer(); $mail->IsSMTP(); // send via SMTP $mail->Host = "localhost"; $mail->SMTPAuth = true; $mail->Username = "[email protected]"; $mail->Password = "xxx"; // senha de SMTP (xxx proposital) $mail->From = "[email protected]"; $mail->FromName = "gabriel"; $mail->WordWrap = 50; // Definição de quebra de linha $mail->IsHTML(true); // envio como HTML se ‘true’ $mail->Subject = "Contato pelo site"; $mail->Body = "TESTANDO 123"; if(!$mail->Send()){ echo "Mensagem não enviada"; echo "Mailer Error: " . $mail->ErrorInfo; } else { echo "Mensagem enviada"; } ?>
  13. Ainda não está no net. Estou rodando na maquina local. O código está aí embaixo. <body> <img src="../IMAGENS/OUTROS/Outros.jpg" width="837" height="468" border="0" align="left" usemap="#Map" /> <map name="Map" id="Map"> <area shape="rect" coords="18,120,261,152" href="../CONTRATO/Contrato.asp" alt="BUSCAR CONTRATO" /> <area shape="rect" coords="19,152,261,180" href="buscarordem.asp" alt="ORDEM DE SERVI&Ccedil;O" /> <area shape="rect" coords="20,184,261,214" href="cadastrarusuario.asp" alt="CADASTRAR NOVO USU&Aacute;RIO" /> <area shape="rect" coords="20,93,314,117" href="gerandoorcamento.asp"> <area shape="rect" coords="18,59,316,84" href="../MODELOPARAORÇAMENTO.xls" target="_blank"> </map> </body> O link que não abre é o do ultimo area shape... MODELOPARAORÇAMENTO.xls obrigado pela atençao. aguardo resposta.
  14. tem algo errado aí?? já viu isso antes?
  15. O não abre nenhuma página e nem gera erro. permanece na mesma pagina. O endereço está correto. Pois aqui na minha casa esta funcionando. O código é este. Uma figura que usei a ferramenta Hotspot. ajuda eu aí.rs <area shape="rect" coords="18,59,316,84" href="../MODELOPARAORÇAMENTO.xls" target="_blank">
×
×
  • Create New...