Ir para conteúdo
Fórum Script Brasil

--Ludson--

Membros
  • Total de itens

    193
  • Registro em

  • Última visita

Tudo que --Ludson-- postou

  1. --Ludson--

    Ajuda Asp

    Não consegui encontrar, na verdade não sei nem como procurar isso. Não tem um código q vocês podem me passar?? Vlew
  2. --Ludson--

    Ajuda Asp

    Sou novato em asp, não tenho cursos, to tentando aprender. Não conheço essa função, e tb nem sei como procurar algo parecido. Se puderem me ajudar ou passar os links de referencia. Vlew
  3. --Ludson--

    Ajuda Asp

    Fala povo, eu to criando um sistema de notícias, e vou colocar uma chamada para as notícias na página inicial do meu site. Eu gostaria de saber como faço para que ao buscar um registro de notícia no BD, na página inicial apareça apenas os 40 primeiroas caracters da notícia e insira automaticamente no final da chamada (...) , por exemplo: "O presidente Luiz Inácio Lula da Silva p..." Alguém aí pode me ajudar???? Flows.
  4. --Ludson--

    Registro Aleatório

    Eu uso BD Access, como faço??
  5. Estou tentando criar uma loja virtual, e preciso criar um sistema, que pegue no banco de dados, foto e descrição dos produtos, mas quero que cada vez que a página seja acessada, mostre produtos diferentes, ou seja, uma seleção Aleatória. Alguém aí poderia me Ajudar??????
  6. To com um problemão, já tentei com 3 códigos diferentes, criar um sistema para adicionar dados em um Bd através de formulário. Mas toda vez que tento enviar o formulário para: cadastra.asp, onde está o código para inserir, aparece o seguinte erro: Microsoft OLE DB Provider for ODBC Drivers error '80040e07' [Microsoft][Driver ODBC para Microsoft Access] Tipo de dados imcompatível na expressão de critério. /calendario/cadastra.asp, line 44 o código fonte da pagina: cadastra.asp é o seguinte: 1- <% 2- Set conn = Server.CreateObject("ADODB.Connection") 3- cnpath="DBQ=" & server.mappath("db/calendar.mdb") 4- conn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; " & cnpath 5- 6- set rs = Server.CreateObject("ADODB.Recordset") 7- titulo = replace(request.form("tTitulo"), "'", "''") 8- tema = replace(request.form("tTema"), "'", "''") 9- preletores = replace(request.form("tPreletores"), "'", "''") 10- data = replace(request.form("tData"), "'", "''") 11- local = replace(request.form("tLocal"), "'", "''") 12- endereco = replace(request.form("tEndereco"), "'", "''") 13- cidade = replace(request.form("tCidade"), "'", "''") 14- estado = replace(request.form("tEstado"), "'", "''") 15- telefone = replace(request.form("tTelefone"), "'", "''") 16- email = replace(request.form("tEmail"), "'", "''") 17- site = replace(request.form("tSite"), "'", "''") 18- promotor = replace(request.form("tPromotor"), "'", "''") 19- descricao = replace(request.form("tDescricao"), "'", "''") 20- informacoes = replace(request.form("tInformacoes"), "'", "''") 21- nome = replace(request.form("tNome"), "'", "''") 22- email2 = replace(request.form("tEmail2"), "'", "''") 23- 24- SQL = "INSERT INTO eventos " 25- SQL = SQL & " (titulo,tema,preletores,data,local,endereco,cidade,estado,telefone,email,site,promotor,descricao,informacoes,nome,email2)" 26- SQL = SQL & "VALUES " 27- SQL = SQL & " ('" & titulo & "', " 28- SQL = SQL & " '" & tema & "', " 29- SQL = SQL & " '" & preletores & "', " 30- SQL = SQL & " '" & data & "', " 31- SQL = SQL & " '" & local & "', " 32- SQL = SQL & " '" & endereco & "', " 33- SQL = SQL & " '" & cidade & "', " 34- SQL = SQL & " '" & estado & "', " 35- SQL = SQL & " '" & telefone & "', " 36- SQL = SQL & " '" & email & "', " 37- SQL = SQL & " '" & site & "', " 38- SQL = SQL & " '" & promotor & "', " 39- SQL = SQL & " '" & descricao & "', " 40- SQL = SQL & " '" & informacoes & "', " 41- SQL = SQL & " '" & nome & "', " 42- SQL = SQL & " '" & email2 & "')" 43- 44- rs.open SQL, conn 45- Response.Redirect"adicionar_evento.asp" 46- %> ME AJUDEM!!!!!!!!
  7. --Ludson--

    Busca Em Bd

    Alguém aí poderia me dizer como eu faço uma busca em uma tabela específica do BD????? Se puderem me passar com páginação agradeco!!!!!!
  8. estou usando um BD Access, o campo na tabela é data padrão: dd/mm/aa. Não tenho certeza agora, nem tenho como olhar, mas olhe: <% FormateDiteTime(Variavel,2)%> Vai lhe devolver a hora do sistema... não me lembro ao certo.... T + beleza, mas eu to precisando que me retorne resultados da tabela que correspondam o campo data com a dada digitada no Request.QueryString
  9. estou usando um BD Access, o campo na tabela é data padrão: dd/mm/aa.
  10. Estou desenvolvendo um sistema de eventos separados por dia e Mês. Mas não consigo fazer com que ao clicar no dia 2/01/2004, abra uma página somente com os eventos do dia 2/01/2004. Ou seja, preciso pegar campos específicos da tabela " TEventi". A data acredito que possa pegar através de Request.QueryString: ( eventos.asp?data=2/01/2004 ) <% data= Request.QueryString("data") %> Mas como eu faço para que a conexão com o banco de dados, me retorne resultados da tabela tEventi somente que correspondam à data via Request.QueryString. Por favor, alguém aí pode me ajudar??????? É Urgente!!!!!!!!
  11. Por favor, alguém poderia me dizer, como eu faço para exibir o conteúdo de um banco de dados no meu site aleatoriamente. Por exemplo, cada vez que eu acesse meu site, apareça uma foto diferente. alguém pode me ajudar?????
  12. --Ludson--

    Ajuda Banco De Dados!

    porque errado? a conexão com o BD é feita em ASP
  13. Alguém aí poderia me dizer, como faço para que na conexão com o banco de dados, retorne resultados aleatórios??? Tipo, no meu banco de dados tenho imagens de cd's, e na minha página tenho uma espécie de Vitrine para comércio virtual, eu gostaria de fazer com que cada vez que o visitante acesse minha página, veja um produto diferente na vitrine. Se puderem me ajudar agradeço!!!!!!
  14. --Ludson--

    Tabela

    Valeu veio, você é o cara meu!!!! É isso mesmo que eu precisava, funcionou perfeitamente!!!! Flows!!!!!
  15. --Ludson--

    Tabela

    Valeu, é uma opção, mas través de Select Case daria muito trabalho!!!! preciso de algo mais prático e dinâmico.
  16. --Ludson--

    Tabela

    Gostaria de saber se tem como alterar o nome de uma tabela na conexão com o banco de dados, através de Request.QueryString. Por exemplo, no meu banco de dados tenho as taabelas janeiro, fevereiro e março. na minha página, eventos.asp, eu exibiria os eventos de cada mês, mas cada mês é referente a uma tabela no banco de dados, portanto quando eu digitar: www.meusite.com/eventos.asp?tabela=janeiro a página retorne os resultados da tabela janeiro. eu tentei da seguinte maneira: <% Dim tabela tabela = replace(Request.QueryString("tabela"), "'", "''") strANConn = "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("mdb/agenda.mdb") Set ANConn = Server.CreateObject ("ADODB.Connection") Set ANRec = Server.CreateObject ("ADODB.Recordset") ANConn.Open strANConn CatSQL = "SELECT * FROM '" & tabela & '" ORDER BY data ASC" ANRec.Open CatSQL, ANConn if ANRec.EOF Then response.write "NENHUM EVENTO CADASTRADO PARA ESTE MÊS: '" & tabela & "' " else do while not ANRec.EOF %> Mas não deu certo, tem como fazer isso? ============================= Eu fiz o teste para ver se o Request.QueryString está passando os dados da seguinte maneira: <p> Teste Request.QueryString: <%= tabela%></p> Funcionou perfeitamente. Porque na conexão com o banco de dados não funciona?
  17. --Ludson--

    Tabela

    Gostaria de saber se tem como alterar o nome de uma tabela na conexão com o banco de dados, através de Request.QueryString. Por exemplo, no meu banco de dados tenho as taabelas janeiro, fevereiro e março. na minha página, eventos.asp, eu exibiria os eventos de cada mês, mas cada mês é referente a uma tabela no banco de dados, portanto quando eu digitar: www.meusite.com/eventos.asp?tabela=janeiro a página retorne os resultados da tabela janeiro. eu tentei da seguinte maneira: <% Dim tabela tabela = replace(Request.QueryString("tabela"), "'", "''") strANConn = "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("mdb/agenda.mdb") Set ANConn = Server.CreateObject ("ADODB.Connection") Set ANRec = Server.CreateObject ("ADODB.Recordset") ANConn.Open strANConn CatSQL = "SELECT * FROM '" & tabela & '" ORDER BY data ASC" ANRec.Open CatSQL, ANConn if ANRec.EOF Then response.write "NENHUM EVENTO CADASTRADO PARA ESTE MÊS: '" & tabela & "' " else do while not ANRec.EOF %> Mas não deu certo, tem como fazer isso? Valeu!!!
×
×
  • Criar Novo...