Ir para conteúdo
Fórum Script Brasil

cyberalexxx

Membros
  • Total de itens

    2.500
  • Registro em

  • Última visita

Tudo que cyberalexxx postou

  1. essa linha em vermelho??? não tem nenhuma validação de fim de recordset!!! ela tem que estar dentro do loop!!
  2. cyberalexxx

    Data Aaaa-mm-dd

    da pra fazer assim também:
  3. Para pegar apenas a ultima noticia: SQL = "select top 1 * from noticias ORDER BY id DESC" para visualizar as 5 antes da ultima: SQL = "select top 6 * from noticias ORDER BY id DESC" set rs = conexao.execute(sql) If not rs.eof then Rs.MoveNext else response.write "Nenhuma Noticia encotrada" response.end end if Do while Not Rs.Eof 'exibição Rs.MoveNext Loop
  4. cyberalexxx

    Alteração Na Busca...

    OK!! Tópico fechado!! qualquer coisa manda PM pra algum mod abri o tópico!!
  5. cyberalexxx

    Alteração Na Busca...

    pode ser problema de case sensitive no if, tenta assim:
  6. cyberalexxx

    Alteração Na Busca...

    O loop aparentemente esta correto, faz isso aki e posta o resultado: só pra testar se a busca esta correta
  7. cyberalexxx

    Alteração Na Busca...

    como voce seleciona a UF?? é combo box?? se for você pode colocar a opção todos com o value todos então o código ficaria assim: Tipo = Request.Form("Tipo") Estado = Request.Form("Estado") call abreconexao Set rs = Server.CreateObject("ADODB.Recordset") if estado<>"todos" then SQL = "SELECT * FROM Cad_Empresa WHERE Tipo_Empresa = '" & Tipo & "' and UF = '" & Estado & "' order by Razao_Social Asc " else SQL = "SELECT * FROM Cad_Empresa WHERE Tipo_Empresa = '" & Tipo & "' order by UF, Razao_Social Asc " end if set rsCad_Empresa=conexao.execute(SQL)
  8. Windows MovieMaker (podre) Final Cut Pro 5 (esse é fera, não sei c tem para PC, conheço pra MAC) Adobe Premiere Vegas Video esses 3 ultimos são excelentes e caros também!!
  9. cyberalexxx

    Data No Db - Insert

    Resolvido o problema! ASP sql1 = "Insert Into TBEventos (evento_data) values(#"& FormataData(now()) &"#)" cyberalexxx, usei o # e deu certinho!! perdi 2 dias por causa de 2 # ahahahahhhahahahhahahhaah o bagulho é loco! obrigado ae galera! pode fechar o tópico abraços. beleza!!! Tópico Fechado!!!
  10. cyberalexxx

    Upload De Imagens

    tópico fechado!! Resolvido em: http://scriptbrasil.com.br/forum/index.php?showtopic=61052
  11. cyberalexxx

    Html X Impressão

    Não da pra usar html basico: <p align="justify" style="text-indent: 50>
  12. cyberalexxx

    Formulário De Contato

    Sim. mesma coisa!!
  13. cyberalexxx

    Ocultar Erros

    Tópico Fechado!!
  14. cyberalexxx

    Consulta Sql

    de uma olhada se o nome do campo do formulário esta de acordo com o q voce esta recuperando.
  15. cyberalexxx

    Consulta Sql

    essa pesquisa é exata??? ou seja o campo em q voce esta pesquisando vai ter o valor exato da variavel pesquisa?? ou só parte?? Se for parte voce deve usar like
  16. cyberalexxx

    Ocultar Erros

    testei o link e não apareceu nenhum erro!!
  17. cyberalexxx

    Consulta Sql

    da algum erro?? qual?? que tipo de campo é char, numerico???
  18. tenta atualizar o registro novamente pra ver o q acontece !!! acho q vai acontecer o q eu postei anteriormente. quanto aos códigos tente achar uma tabéla de códigos ASCII, aki não tenho nenhuma pra te passar.
  19. Se voce não colocar o replace no codigo de update, quando voce for alterar a descriçao do produto ela vira da seguinte forma: colocando o replace ele iria ficar assim:
  20. cyberalexxx

    Ocultar Erros

    tire essa linha quebra = split(FilePath,"\") e substitua a linha nome = quebra(ubound(quebra)) por:
×
×
  • Criar Novo...