chocomilki

Ola Mota, Mas não tem como por exemplo que ja estiver cadastrado no banco o CPF ao digitar no cadastrar ele consultar a base e retorna uma msg que ja esta cadastrado ? Obrigado

Olá, Como que eu faço para que não seja possível fazer 2 ou mais cadastros usando o mesmo CPF ? Obrigado

Ola amigos Tenho um controle de reunioes de uma empresa e as reunioes são todas as segunda e gostaria de cadastrar todas as segundas ate Dezembro e que no site aparece automático pra mim ex: 10/09 17/09 25/09 E assim por diante ou seja eu não tenha que por no site toda a Segunda a data do dia pra ir pro site... Obrigado.

Olá Maurilio, A Consulta abaixo é que utilizo para pesquisar o nome do aluno correto... strSQL = "SELECT nome,data,horario,unidade,ven,id " _ & "FROM Aulas " _ & "WHERE nome LIKE '%" & TiraAcento(Replace(strSearch, "'", "''")) & "%' " _ & "OR nome LIKE '%" & TiraAcento(Replace(strSearch, "'", "''")) & "%' " _ & "ORDER BY id;" Isso ja funcionava normalmente o que quero fazer é acrescentar mais um critério para que depois de Pesquisar o nome do Aluno ele me mostre somente os registro do MÊS ATUAL, isso que não estou conseguindo fazer ok.. Abs

Ola Tirei Mas desse forma não vai retorna nada pois a Sql que faz a consulta é a outra.... Abs

Ola Gustavo, Não entendi...

Ola Gustavo, Não entendi...

Gustavo, Mas este trecho é o que pesquisa o nome do Aluno... strSQL = "SELECT nome,data,horario,unidade,ven,id " _ & "FROM Aulas " _ & "WHERE nome LIKE '%" &TiraAcento(Replace(strSearch, "'", "''")) & "%' " _ & "OR nome LIKE '%" & TiraAcento(Replace(strSearch, "'", "''")) & "%' " _ & "ORDER BY id;"

Olha como ficou ele completo <% If strSearch <> "" Then strDBPath = Server.MapPath("Noticias.mdb") Const adUseClient = 3 Set cnnSearch = Server.CreateObject("ADODB.Connection") cnnSearch.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & strDBPath & ";" cnnSearch.CursorLocation = adUseClient varMesAtual = month(date()) strSQL = "Select * from Aulas where MONTH(data)=2 and year(data)=2018 and nome Like 'Kleber*'" strSQL = "SELECT nome,data,horario,unidade,ven,id " _ & "FROM Aulas " _ & "WHERE nome LIKE '%" & TiraAcento(Replace(strSearch, "'", "''")) & "%' " _ & "OR nome LIKE '%" & TiraAcento(Replace(strSearch, "'", "''")) & "%' " _ & "ORDER BY id;" Set rstSearch = cnnSearch.Execute(strSQL) intContador = rstSearch.RecordCount %> E mostra mês anterior tb.. rssss

Agora não retornou erro , porém mostra independe se é mês Fevereiro , Janeiro etc.. rsssss varMesAtual = month(date()) strSQL = "Select * from Aulas where MONTH(data)="& varMesAtual & " and nome Like 'Kleber*'"

strSQL = "Select * from Aulas where MONTH(data)="& varMesAtual & " and nome='*'

campo aluno é NOME ..

Gustavo Acrescentei o parâmetro retornou erro interno.. O servidor encontrou um erro interno ou configuração incorreta e não pôde completar sua solicitação. Entre em contato com o administrador do servidor para informar a hora em que ocorreu o erro e de qualquer coisa que você tenha feito que possa ter causado o erro. Mais informações sobre esse erro podem estar disponíveis no registro de erros do servidor.

Ola Gustavo, Então na verdade ele está mostrando pra mim todos que estão no Mês Atual , mas o problema não é esse é que após incluir o código qualquer nome que digite na minha busca ele retorna todos os nomes e não o que eu digito.. ou seja se Digitar Lucas ele deveria mostrar todas as aulas de Lucas no mês de Fevereiro.. e está mostrando todos os Alunos do Mês de Fevereiro Abs

Olá, Coloquei desta forma e não retornou erro: strSQL = "Select * from Aulas where MONTH(data)='"&varMesAtual&"'" Porém ele mostra independente do nome que digitar na pesquisa ela mostra todos que estão cadastrados dentro da tabela no mês de fevereiro.. e não o nome de quem eu pesquisar.... Att