Ir para conteúdo
Fórum Script Brasil

kuroi

Membros
  • Total de itens

    7.184
  • Registro em

  • Última visita

Tudo que kuroi postou

  1. não é não, pra fazer insert e update pode usar ' mesmo. o # você so usa em where. o mehor é usar data pra guardar data mesmo. em formato texto, "01/12/1999" é anterior a "31/01/1999". ai você vai ter q converter e ele vai considerar o formato de data setado no sistema do usuario e ai já viu ne. fora q em bancos maiores vai ser uma perda de tempo muito gde ficar fazendo conversao.
  2. mas combobox não tem .Value mesmo... tente usar .Text, mesmo.
  3. na verdade não é duplicacao, se um id_campanha aparece varias vezes na tabela de participantes, vai ter uma linha para cada participante nesse seu select, não tem nd de errado. exemplo, possivelmente, nesse sua tabela de participante, você não tem somente o cliente 69 para o id 13. você deve ter uma linha para o 69, outra para o 70, outra para o 71 e etc. então o seu select vai trazer as tres linhas, uma com cada codigo. ai é so você tratar do jeito como achar melhor. se você quiser pegar só o primeiro cliente, pode tentar assim: ComandoSQL = "SELECT codCamp, titulo, status, inicio, termino, id_texto, id_regulamento, exibir, id_Campanha, Min(campanhas_participantes.cliente) As cliente, participar FROM (campanhas Left JOIN campanhas_participantes ON campanhas.CodCamp =campanhas_participantes.id_campanha) Group By codCamp, titulo, status, inicio, termino, id_texto, id_regulamento, exibir, id_Campanha, participar" mas isso levando em conta q cliente seja o unico campo q vem da tabela campanhas_participantes. se tiverem mais campos e o valor deles varias, ai pode complicar o select.
  4. ponha o format na data q vem do textbox: rsdados.Open "select count(nome) as x from pedidos WHERE nome='" & lstProdutos.List(L) & "' and data > '" & Format$(txtDT1.Text, "YYYY-MM-DD") & "' and data < '" & Format$(txtDT2.Text, "YYYY-MM-DD") & "'", cn ou rsdados.Open "select count(nome) as x from pedidos WHERE nome='" & lstProdutos.List(L) & "' and data > '" & Format$(CDate(txtDT1.Text), "YYYY-MM-DD") & "' and data < '" & Format$(CDate(txtDT2.Text), "YYYY-MM-DD") & "'", cn lembrando q se for access, o delimitador de data tem q ser # e não '.
  5. tente usar o formato "YYYY-MM-DD" nas datas na hora de escrever o select.
  6. entendi, nesse caso você usa cookies. cada vez q ele acessar uma cidade, você atualiza o cookie no navegador dele e, quando ele abrir de novo, você le esse cookie e redireciona para a ultima cidade q tiver sido gravado. pra trabalhar com cookies, é melhor fazer pela linguagem server-side q você estiver usando, tipo asp ou php. mas pode ser com javascript tb.
  7. tambem não entendi, pra redirecionar pra outra pagina depois q o usuario escolher, é mesmo como o xeno passou acima, a não ser q você queira implementar outros recursos, como fazer essa selecao a partir de um objeto select. ai nesse caso explique melhor como quer fazer. agora, caso você queira fazer o redirecionamento automatico, localizando a cidade onde o usuario esta no momento e já redirecionando, você consegue saber pelo ip da pessoa. isso é chamado de geolocalizacao por ip. é uma coisa simples desde q você tenha um banco com as faixas de ips e suas cidades correspondentes, o mais dificil deve ser encontrar uma lista consistente, fora q essa lista vai sempre sendo atualizada. acho q geralmente, as empresas costumam pagar por esse servico de geolocalizacao, tem mtos sites por ai q realizam esse servico, mas tb da pra encontrar alguma coisa free. um exemplo, é essa aqui: http://www.maxmind.com/app/ip-location veja q o servico GeoLite City é gratis e parece ser bem consistente e é facil de usar. agora, talvez seja melhor procurar algum servico brasileiro desse ai, se quiser maior eficacia dentro do territorio nacional. tipo, se quiser incluir ate cidades do interior, bem afastatadas e etc.
  8. tire o $ da funcao Date() e veja se não funciona. se quiser usar o $, use na Format(). o $ no final de uma funcao serve pra explicitar que o retorno deve ser uma String. isso porque a maioria das funcoes de string do vb6 tem retorno como Variant, o q acaba obrigando a conversao pra string quando formos usar como string. você colocando $ em Date(), vai transformar a data em string no formato padrão do sistema. ou seja, se o sistema esta setado como formato americano, você vai estar convertendo a data pra String no formato americano e depois convertendo do formato americano para data novamente dentro da funcao Format(). ai é q o ocorre a troca as posicoes. imagino q seja esse o seu problema, tente ai.
  9. veja se ajuda: http://pietschsoft.com/post/2004/09/27/Err...-Component.aspx
  10. tópico fechado por duplicacao. respostas aqui: http://scriptbrasil.com.br/forum/index.php?showtopic=164494
  11. kuroi

    Leitura de linha em SQL

    movido pra .net com imagens não é tão simples assim. o q esta gravado na tabela, é o endereco da imagem ou é o conteudo binario dela?? se for o caminho, você tem q passa-lo no .ImageLocation do PictureBox e depois chamar o .Load() pra carregar a imagem. se for o conteudo da imagem q esta no bd, então não sei direito como fica no .net, acho q você vai ter q passar esse conteudo pra algum objeto Stream e depois ler com um outro objeto Image e depois passar para o PictureBox.
  12. kuroi

    Usuario logado

    o que é um esquema de usuario logado?? se quer fazer uma tela de login no seu programa, crie uma tabela no banco de dados q guarde usuario e senha e quando a pessoa digitar, procure nessa tabela se os dados digitados estao corretos.
  13. de qualquer modo, você esta fazendo o contrario. acho q deveria ser: If Not cliente.NoMatch Then você esta mandando atualizar somente quando não encontra o codigo.
  14. ele não aponta a linha em q isso ocorre??
  15. tente trocar IIf([Total_Nota]>=95,1,0) AS MT por 1 AS MT o codigo do danleon não funcionou porque faltou um espaco entre Ano e From. mas ele tb tinha eliminado o campo, acho melhor não tirar pois parece q esta sendo usado abaixo.
  16. pode usar OpenGL, acho q DirectX tb. já o SDL so trabalha com gráficos 2D, a não ser q esteja em conjunto com o OpenGL. mas não mexo com essas bibliotecas, não sei se o visual basic 6 seria indicado para usa-las.
  17. o visual basic 6 abre esse tipo de arquivo sem problema nenhum.
  18. esse erro não deve ter a ver com o assunto do tópico. isso deve ser algum parametro q esta declarado de modo diferente do prototipo desse evento. tente apagar essa sub e chama-la de novo (selecionando novamento o evento MoveComplete do Adodc) e veja se não funciona. se não funcionar possivelmente então ta faltando adicionar a referencia ao ADODB.
  19. kuroi

    Conexão

    bom existe o comando do dos net send q serve justamente pra enviar mensagens pra outro computador na rede (local). no windows vista e no 7, esse comando foi substituido pelo msg. não sei dizer sobre a possibilidade de eles funcionarem remotamente, mas imagino q se for possivel, somente com autorizacao do usuario. de qualquer modo, o melhor é você tentar discutir isso na sala de redes em vez de visual basic.
  20. kuroi

    Conexão

    hum... não sei se você entendeu direito... a "mensagem" q você envia na verdade não é uma conversa entre você e o usuario do pc. não vai aparecer nenhuma janelinha com uma mensagem, do tipo "oi, tudo bem?", nem nd assim... (e não acredite naqueles filmes de hackers q você ve, q 90% do q você ve não existe na realidade ou esta descaradamente forcado, se é sobre isso q você esta pensando.) a mensagem q você manda é para o servico q esta usando a porta. a mensagem deve seguir o protocolo e o programa vai interpretar. pode-se entender tb como um comando enviado ao servico. você não pode fazer nd q o servico não esteja preparado pra fazer. um exemplo de mensagem, imagino q seria, seguindo o exemplo do HTTP da wikipedia: GET /index.html HTTP/1.1 Host: www.example.com[/code] sendo q você vai receber uma resposta do tipo: [code]HTTP/1.1 200 OK Date: Mon, 23 May 2005 22:38:34 GMT Server: Apache/1.3.3.7 (Unix) (Red-Hat/Linux) Last-Modified: Wed, 08 Jan 2003 23:11:55 GMT Etag: "3f80f-1b6-3e1cb03b" Accept-Ranges: bytes Content-Length: 438 Connection: close Content-Type: text/html; charset=UTF-8 quanto ao telnet, primeiro de tudo, a maioria dos servidores requerem autenticacao. ou seja, mesmo q você conecte, sem enviar um comando de login com usuario e senha validos, ele deve recusar qualquer outro tipo de comandos ou requisicoes. depois disso, dependendo do servico telnet q ele esteja usando, ai você pode executar comandos dentro do sistema dele, ou possivelmente se comunicar. mas somente se o servico utilizando a porta permitir isso.
  21. kuroi

    Rede

    não entendo sobre o assunto, mas acho melhor mover esse tópico pra area de redes.
×
×
  • Criar Novo...