Jump to content
Fórum Script Brasil

Mateustg

Membros
  • Content Count

    391
  • Joined

  • Last visited

Community Reputation

0 Neutro

About Mateustg

  • Birthday 03/02/1980

Contatos

  • Website URL
    http://www.studioproweb.com.br
  • ICQ
    0

Perfil

  • Location
    Sete Lagoas
  • Interests
    ASP, HTML, PHP
  1. Mateustg

    Envio de Email

    Tenho o seguinte script que faz envio de email: <%@ LANGUAGE="VBSCRIPT" %> <% dim html, nome, assunto, telefone, mensagem nome = Trim(Request.Form("nome")) email = Trim(Request.Form("email")) assunto = Trim(Request.Form("assunto")) telefone = Trim(Request.Form("telefone")) mensagem = Trim(Request.Form("mensagem")) response.Write(nome) set mail = server.createobject("cdonts.newmail") mail.from = "Pedido de orçamento do Divulga Sete <[email protected]>" 'mail.From = Request.Form("email") Mail.To = " "&emai
  2. Mateustg

    Envio de Email

    Boa tarde, Tenho um formulário no meu site para solicitação de orçamentos, porém meu servidor só me dá opção de colocar o meu email de domínio para envio e eu quero pegar o email de um cliente que está armazenado no BD e mandar este para ele, e assim conforme cada cliente o orçamento tem que ser encaminhado para ele. Como posso fazer envio de emails para pessoas distintas?
  3. Mateustg

    SELECT DISTINCT

    Gostaria de saber se e possível fazer o seguinte: Tenho a seguinte tabela abaixo e faço um SELECT DISTINCT para apresentar a empresa que foi pesquisada ou por título, palavra chave e/ou descrição, porém se houver dois registros com categorias diferentes ele apresenta os dois e na verdade preciso que ele mostre apenas o da categoria 1, eliminando a 6 da listagem. Exemplo Tabela: Title | Palavrachave | Description | Categoria | ______________________________________________________ | Empresa 1 | Idiomas | escola de idiomas |
  4. Mateustg

    último registro

    Estou com um projeto que tem vários códigos em uma tabela. Ex.: ID | COD 1 | 1000 2 | 1000 3 | 1000 4 | 1000 5 | 1000 Fiz um método para gravar o COD e ir ao próximo registro em branco e se o próximo estiver realmente em branco irá aparecer um botão CADASTRAR, mas caso já tenha todos sido preenchidos quero que apareça um botão ESGOTADO. Consegui chegar ao último registro, mas não consigo comparar se ele é o último registro para aparecer o botão esgotado. Meu select para listagem dos dados é: strSQL1 = "SELE
  5. Mateustg

    Comparação data

    Galera me ajudem... Tenho uma data armazenada no DB Access (lá ele está com formato de data/hora, mas para gravar só a data), quero pegar esta data e comparar se é ou não igual a data atual. Fiz assim: rscupom("DATA") = ""&date()&"" Porém não dá certo, mas se eu fizer assim (comparando a data como texto) ele aceita rscupom("DATA") = "21/01/2016" Mas preciso comparar sem ser texto, como posso fazer?
  6. Mateustg

    Listar 1 item

    Galera consegui resolver aqui. Se servir para alguém a solução foi fazer o seguinte no select: strSQL = "SELECT TOP 1 * From tblCUPONSCONSULTA WHERE USER_ID IS NULL and IDSITES = " & intSiteIDNo & " " Acrescentei USER_ID IS NULL e resolveu
  7. Mateustg

    Listar 1 item

    Olá a todos, Bem eu tenho uma tabela com cód. da empresa, códigos de cupom e cód. do usuário. Ex: Empresa | Cupom | Usuário 1000 | AAA | Pedro 1000 | BBB | 1234 | XXX | Paulo 1000 | CCC | Quero listar o 1º cód. de cupom que não tem um usuário informado e se for acrescentado 1 usuário nele ele passa a listar o próximo cód. que estiver vazio até acabar. Já consegui fazer listar os registros vazios porém todos e não consigo apenas o 1º. Está aparecen
  8. Mateustg

    sistema icq

    Olá...baixei um sistema de ICQlist ele em sua maioria funciona perfeitametne, só da erro quando tento logar com o usuário q criei. Aparece o seguinte erro: Microsoft OLE DB Provider for ODBC Drivers error '80040e10' [Microsoft][ODBC Microsoft Access Driver] Too few parameters. Expected 1. /MSN/membro.asp, line 17 a linha 17 segue abaixo: 13 - Sub LoginFRM 14 - Dim frmUIN, frmSenha 15 - frmSenha=Replace(Request.Form("senha"),"'","''") 16 - frmUIN=Replace(Request.Form("uin"),"'","''") 17 - rsMembro.Open "Select ID, Senha From membros Where UIN="& frmUIN &"", Conexao
  9. Mateustg

    Select

    mandei, mas quando escolho a opção 1 do select option, ele não mostra a imagem, simplesmete ele tenta abrir uma página de nome 1..ele está retornando somente o value do item q escolhi na página...quero que ele retorne a imagem na mesma página que é a página userview.asp....deu pra entender?
  10. Mateustg

    Select

    certo, mas agora como faço para mostrar a imagem do id 1 do meu banco de dados?
  11. Mateustg

    Select

    Olá, Estou fazendo um select na minha página para retornar um valor: <select name='select' onChange="jumper('self',this,0)" onmouseover='this.focus()' style="background-color: #f8f8f8; font-family: Verdana; font-size: 10; color: #000000"> <option value=''> ----- Usuários ---- </option> <option value='1'>Item 1</option> <option value='2'>Item 2</option> </select> Até ai tranquilo, o que quero agora é fazer um select de um BD onde ele irá pegar o id dentro do bd que for igual a opção escolhida (Ex.: item 1), então ele pegar o value de nº 1.
  12. Olá... Preciso de umja ajuda, eu estou tentanto exportar alguns campos de uma tabela para outra, porém gostaria que ao exportar ele pegasse somente os dados novos, os dados antigos, ele não iria sobrepor, ficando assim somente uma atualização de um banco a outro, isso é possivel??? Mateus :ph34r:
  13. Mateustg

    Que Erro é Esse?

    Tenho uma página que é para mostrar um gráfico, porém quando excuto a mesma ela gera o seguinte erro: Microsoft VBScript runtime error '800a0009' Subscript out of range: '[number: 0]' /microlins/grafico.asp, line 15 A linha 15 é: maior_valor = data(LBound(data)) meu código completo é o seguinte: <% Option Explicit %> <% Const grafaltura = 300 Const graflargura = 600 Const barImage = "img_graf.gif" sub BarChart(data, rotulos , titulo, eixos) Response.Write("<TABLE CELLSPACING=0 CELLPADDING=1 BORDER=0 WIDTH=" & graflargura & ">" & chr(13)) Response.Wri
  14. Mateustg

    Banner Rotativo

    Olá, Tenho um sistema de banner já feito. Gostaria de estar aprimorando ele para que ele exibisse os banners da seguinte maneira: Banner 1 - Banner 2 - Banner 3 - Banner 4 - Banner 5, se a pessoa atualizar, gostaria que aparecessem da seguinte forma => Banner 5 - Banner 1 - Banner 2 - Banner 3 - Banner 4 e se atualiza novamente vem Banner 4 - Banner 5 - Banner 1 - Banner 2 - Banner 3 e dai por diante. Meu código está assim: <%Response.AddHeader "Refresh", "300"%> <!--#include file="conectar.asp"--> <% AbreConexao Sql="SELECT TOP 1 * FROM tblbannerP ORDER BY EXIBICOES, C
  15. Mateustg

    Logon

    Poste seu código aqui para entender melhor!!! Mas você já verificou a validação do form??
×
×
  • Create New...