Ir para conteúdo
Fórum Script Brasil

Danleonhart

Membros
  • Total de itens

    574
  • Registro em

  • Última visita

Tudo que Danleonhart postou

  1. Creio que esta biblioteca a qual se refere é para a plataforma .NET :mellow:
  2. Olá Rafaela Tamanhoni ! O que você quer é concatenar os valores recuperados do seu banco de dados, certo ?! Segue um link com um exemplo bem simples: http://www.4shared.com/zip/M6tc7rtg/P_Concat.html VALEU ! :)
  3. Fala webinformatica ! Já tentou colocar a variável em um módulo ?! Assim ela poderá ser usada (tanto para IN como para OUT) por todos os Form's do projeto. PS: Usa a tag "Code" que o código adicionando no post fica mais legível :) . VALEU !
  4. Fala Wakim ! Na boa, use a TAG "Code" (a última opção no menú de ferramentas) que o código fica mais legível :rolleyes: Quanto a sua dúvida, que tipo de conexão você está usando ??? pelo visto não é ADO... Tenho um projeto-exemplo bem simples que fiz para praticar, mas a conexão é ADO. Se quiser, avisa que posto o link. VALEU ! :)
  5. Olá rafaelcpcunha ! Cara, não sou expert...mas se eu souber e puder ajudar conte comigo... :rolleyes: Seguinte... Se tú vai "atualizar" o registro de acordo com a "ID" do aluno, então terá de mudar o comando SQL...pois como está ela vai incluir um novo registro. As linhas que suponho precisar alterar são estas: Onde é: sql = "SELECT * FROM alunos" ' Mude para : sql = "SELECT * FROM alunos WHERE ID_Aluno =" & var_ID Estou supondo que o nome da Coluna onde fica as ID's é "ID_Aluno" e a variável que aloca o número é do tipo "Inteiro" (Integer) nomeada "var_ID"; Apague a linha: myRS.AddNew Quanto ao campo "Duvida", não faço dessa maneira...quando estou criando a tabela no MySQL a configuro para aceitar valores "NULL", ou seja, vazio. E no código simplesmente aponto o campo para receber o valor do Textbox em questão: myRS!duvida = txtDuvida.Text Se o usuário digitar algo, será salvo o conteúdo; senão, o banco encarrega-se de deixar o campo salvo como NULL (vazio). Se não funcionar avisa que recentemente desenvolvi (para uso pessoal) um sisteminha com BD em MySQL. VALEU !
  6. Brunno de Moura: Valeu pela resposta, mas já havia feito essa configuração...o problema é que não basta fazer apenas no Banco, ou somente na página que está a desenvolver... segundo o que entendi tem de ser feito também na hora de "pegar" os dados da tabela. Consegui lendo estes tópicos aqui: http://phpbrasil.com/artigo/11qDFvxJBUXI/l...m-o-php-e-mysql http://sergionovelli.eti.br/blog/2009/09/c...ysql-e-phphtml/ Fica a dica para quem tiver o mesmo problema.
  7. Pessoal é o seguinte... Estou iniciando em HTML, PHP, JavaScript e MySQL...então estou tentando listar dados do BD MySQL em uma página PHP... Listar até consigo, o problema é que ficam caractéres estranhos em nomes acentuados...tipo Antônio, José e por aí vai... Li diversos tópicos na net mas não consegui solucionar meu problema... Já configurei o COLLATE da tabela do MySQL que acesso para utf8_unicode_ci, latin1_swedish_ci e outros tipos que encontrei na net mas não tem jeito... também configurei o charset da pagina (html e php) e a codificação do navegador e continua apresentando os mesmos caractéres estranhos. Alguém sabe o que pode ser ?
  8. Bem, A dúvida é bem simples...sei como "pegar" os valores de caixas de textos do HTML para o PHP... agora quero devolver nas mesmas caixas de textos HTML outros valores vindos do código PHP... Sei que é simples, mas não achei nenhum exemplo. :blush:
  9. Olá ! Você diz através de um aplicativo em tempo de execução ?! é isso ?! Bem, tenho alguns projetos em VB-6 e sempre que precisei fazer, colocava todo o script em uma variável string... +/- assim: Dim objMySQL As ADODB.Connection Dim objRS As New ADODB.Recordset Dim newTab As String ' Database em Localhost Set objMySQL = New ADODB.Connection objMySQL.Open "Driver={MySQL ODBC 5.1 Driver};Server=localhost;Database=MyDatabase; User=root;Password=xxxxx;Option=3;" newTab = "CREATE TABLE tab_dados_backup (Controle int(4) NOT NULL AUTO_INCREMENT,ID_Clientes varchar(3) COLLATE latin1_swedish_ci DEFAULT NULL,Cliente varchar(100) COLLATE latin1_swedish_ci DEFAULT NULL, PRIMARY KEY (Controle)) ENGINE=MyISAM AUTO_INCREMENT=1 DEFAULT CHARSET=latin1 COLLATE=latin1_swedish_ci ROW_FORMAT=FIXED;" Set objRS = objMySQL.Execute(newTab) Observações a parte: O esquema da Tabela é definida. Para se alterar algum parâmetro dos Campos ou mesmo da Tabela só no servidor (no caso MySQL). Sinceramente é muito script para ficar na aplicação, então, resolvi aprender mais sobre SP's e SF's (Stored Procedures e Stored Functions) para agilizar este processo. Hoje tenho este esquema salvo em uma SP, que quando necessito criar a tabela, só faço chamar a SP. :rolleyes:
  10. Pessoal... Tem como colocar "todo" SELECT de uma Coluna em uma variável ? Estou criando um SP usando um cursor (aprendendo a usar na verdade...) e gostaria de "não" criar uma Tabela para armazenar o resultado do cursor. Meu script: DELIMITER $$ DROP PROCEDURE IF EXISTS sp_Cursor $$ CREATE DEFINER=root@localhost PROCEDURE sp_Cursor() BEGIN DECLARE cond BOOL DEFAULT 0; DECLARE nrow VARCHAR(100); DECLARE cur CURSOR FOR SELECT Nome FROM tab_ex; DECLARE CONTINUE HANDLER FOR NOT FOUND SET cond = 1; DROP TABLE IF EXISTS tab_vision; CREATE TEMPORARY TABLE tab_vision (nome_cli VARCHAR(100)); OPEN cur; REPEAT FETCH cur INTO nrow; IF (NOT cond) THEN INSERT INTO tab_vision(nome_cli)VALUES(nrow); END IF; UNTIL cond END REPEAT; CLOSE cur; SELECT * FROM tab_vision; END $$ DELIMITER; Note que crio uma tabela temporária com um campo...quero saber como faço (se é que é possível) para alocar todas as linhas dentro de uma variável... VALEU !
  11. Olá wgc ! Cara, sou iniciante no MySQL, mas tive um problema parecido com o seu. Qual o ENGINE do seu Banco ? e de sua Tabela ? Qual o CHARSET e COLLATE ? os dos campos são o mesmo para todos ? Seguinte: Pude notar que quando criamos uma Tabela e não informamos o CHARSET e a COLLATE, eles são definidos com o padrão do Banco...e o mesmo vale para criação de campos, ou seja, se sua Tabela tiver o "CHARSET = latin1" e "COLLATE = latin1_Bin", e você cria um campo e não informa nem o CHARSET nem o COLLATE, então automaticamente eles são definidos com o padrão da Tabela, ou seja, o campo que você criou terá o CHARSET = latin1 e a COLLATE = latin1_bin (mesmo da tabela). Quando crio meus Bancos, sempre configuro assim: CREATE DATABASE IF NOT EXISTS base_teste DEFAULT CHARSET = latin1 DEFAULT COLLATE = latin1_swedish_ci; E as Tabelas assim: CREATE TABLE table_teste ( Controle INT(4) NOT NULL AUTO_INCREMENT, ID_Clientes CHAR(30) NULL DEFAULT NULL COLLATE latin1_swedish_ci, Cliente VARCHAR(100) NULL DEFAULT NULL COLLATE latin1_swedish_ci, Computador VARCHAR(30) NULL DEFAULT NULL COLLATE latin1_swedish_ci, PRIMARY KEY (Controle) ) DEFAULT CHARSET= latin1 COLLATE=latin1_swedish_ci ENGINE=MyISAM; Resumindo: Mude o CHARSET e a COLLATE de sua tabela e dos campos da tabela e veja se funciona...comigo funcionou ! VALEU !
  12. Obrigado Denis Courcy ! Pelo que li e entendi o comando PREPARE vai mais além do que preciso. Mas consegui resolver e modificar minha SP. Ficou assim: DELIMITER ?? DROP PROCEDURE IF EXISTS sp_Pesquisa ?? CREATE DEFINER=`root`@`localhost` PROCEDURE sp_Pesquisa(IN `vCampo` VARCHAR(30), IN `vCriterio` VARCHAR(50)) /* SP sendo usada pela aplicação. Esta Stored Procedure executa um filtro que retorna os valores aproximados do texto informado no parâmetro "vCriterio", pois utilizando o coringa "%", independente de onde esteja o texto (inicio, meio ou fim) na frase salva no Campo ele será retornado. */ BEGIN SET @Crit = CONCAT('\'%',vCriterio,'%\''); SET @vSQL = CONCAT('SELECT ID_Clientes,Cliente,Contato,Email FROM tab_dados WHERE ', vCampo, ' LIKE ', @Crit); PREPARE my_Statement FROM @vSQL; EXECUTE my_Statement; END ?? DELIMITER; Para chamar a SP: CALL sp_Pesquisa('Cliente','silva') O resultado é a listagem de todos os clientes que contenham em seu nome o "Silva". VALEU !
  13. Pessoal... Tem como colocar o nome de um campo como variável em uma Procedure ? Tipo assim: Tenho uma Procedure que estou modificando para que o campo onde será feita a pesquisa seja uma variável passada como parâmetro: DELIMITER ?? DROP PROCEDURE IF EXISTS sp_Pesquisa ?? CREATE DEFINER=`root`@`localhost` PROCEDURE sp_Pesquisa (IN vCampo VARCHAR(30),IN vCriterio VARCHAR(50)) BEGIN SELECT ID_Clientes,Cliente,Contato,Email FROM tab_dados WHERE (vCampo) LIKE CONCAT ('%',vCriterio,'%'); END ?? DELIMITER; Chamada: CALL sp_Pesquisa ('Cliente', 'Silva') Fiz assim e não funciona...se retiro o parâmetro "vCampo" deixando apenas o "vCriterio", e informo o nome real do campo, a SP funciona 100%. Sendo assim, o erro está na forma que estou usando a variável "vCampo"... Alguém sabe como posso corrigir isso ?
  14. Pessoal... Alguém sabe de algum servidor on-line para MySQL, que aceite Procedures e Functions... Tenho uma base de dados no site FreeSQL mas não consegui colocar Procedures e Functions...sempre retorna que meu usuário não tem permissão para tal ação. Encontrei outros servidores, mas neles não consegui nem conectar minha aplicação (VB-6) a base de dados... Fico no aguardo de alguma dica :rolleyes:
  15. Bem, pelo que eu saiba sim. Criei alguns aplicativos em VB.NET com BD Access 2007 (para uso local) na última empresa que trabalhei e não deu nenhum problema, tanto na versão Express quanto na Ultimate. Com MySQL criei para uso pessoal (gerenciar lista de clientes on-line e off-line) mas foi com VB-6 e funciona de boa, o único detalhe é que utilizo drive ODBC pois OLEDB com MySQL só encontrei um funcional, e mesmo assim tem que registrar e tal, então optei em deixar o ODBC mesmo. Mas tem diversos tópicos na web falando de aplicação VB.NET com BD MySQL, basta dá uma googlada que chove :rolleyes: . Valeu !
  16. Olá ! Cara, banco de dados free acho que não existe um melhor e com recursos igual (ou muito próximo) ao SQL senão o MySQL. Estou estudando ele e redescobrindo a facilidade que ele tem. Aqui acolá que surge algumas particularidades mais nada que assuste demais. Quanto a linguagem, se vai usar o Visual Studio, creio que esteja falando da plataforma .NET, certo ?! Então, a versão Express é free, mas fique sabendo que tem algumas limitações...por exemplo, se for emitir relatórios terá de adquirir uma ferramenta de terceiros, pois o ReportViewer, ferramenta que acompanha o VS 2010, não é disponível na versão Express. Essa é a que veio logo na minha lembrança, não se limita a só isso. Agora acho muito estranho, pois tenho em minha máquina instalado o VS 2010 Ultimate, e adquiri uma senha no próprio site da Microsoft, e já vai fazer 2 anos que tenho ele e nunca expirou nada. O detalhe é que baixei a ISO do próprio site da Microsoft (2.27 GB). Se quiser saber mais detalhes das diferenças entre as versões basta procurar no Google que vai surgir diversas opções...inclusive esta aqui bem simples: http://www.microsoft.com/visualstudio/pt-br/products Espero que tenha te ajudado ! Valeu !
  17. Olá Geovani ! A solução foi que compilei novamente todo o projeto do Frata... Agora cada caso é um caso...veja que sua linguagem é Delphi, mas aconselho recompilar o projeto e testar. VALEU !
  18. Bem... Há tantas consultas nesse script que chega a causar confusão :wacko: mas começa substituindo os DateTimerPicker da maneira que está "DTPIni.Text", por esta: "DTPIni.ToString("yyyy-MM-dd")" É justo o que falei anteriormente... :rolleyes:
  19. Olá ! Como você está salvando estas datas no BD ? A melhor maneira é salvar : "yyyy-MM-dd" E na hora de carregar basta usar o"FormatDate" para configurar da maneira desejada: FormatDateTime(valorData, DateFormat.ShortDate)
  20. OK ! Precisando, estamos aí Uma pergunta: Optou pela versão 6.0 ou a .NET ? Se estiver optado pela .NET o fórum é nesse link: http://scriptbrasil.com.br/forum/index.php?showforum=49 VALEU ! :D
  21. HawtieLamb... Posta uma imagem da sua IDE para vermos qual versão estais usando... pois no link que deixei diz claro: se não for VB-6 que estais usando então é VB.NET e vice-versa... A versão do vídeo é VB.NET...
  22. Olá HawtieLamb... Como sempre é bom começar lendo... e lendo muito :rolleyes: Este tópico abaixo está publicado logo no inicio do Fórum para Visual Basic : http://scriptbrasil.com.br/forum/index.php?showtopic=125140 E no inicio me serviu muito para orientação, pois não sabia a diference entre as versões. Com certeza irão surgir mais dúvidas, sugiro que pesquise no Google sobre tais pois tem uma vasta gama de opções. Como opinião pessoal, se você está iniciando, veja bem se vai querer começar com VB (Visual Basic), pois em muitos casos para aplicações mais "profundas" (linguagem de baixo nível, por exemplo) temos de usar dependências de outras aplicações...digo isso porque tenho a certeza que o VB-6 não é completo (o VB.NET é bem mais...), e se depois você quiser migrar para outra linguagem fica mais difícil, pois VB é viciante :D . Mais para iniciar é uma boa linguagem, é a mais fácil que achei...tanto é que estou aprendendo Delphi e PHP, mas não consigo largar o VB-6. :closedeyes: Valeu e boa sorte !
  23. Olá... Se a variável "aux" for do tipo Integer, Long, Byte, Single, Double...ou seja, numérica, está. Uma dica, use a tag "Code" no painel de ferramentas para colocar códigos...fica mais organizado: SELECT * FROM tabela WHERE telefone=" & aux VALEU !
  24. Olá abezerra... Posta a mensagem de erro... o número e o que está escrito. Não trabalho com esse recurso de Grupos do VB-6. Faço como o Cleiton, ou então adiciono o(s) Form(s) no projeto em desenvolvimento. Se você vai utilizar apenas este Form do outro projeto, acho mais prático "adicioná-lo" ao seu novo projeto. VALEU !
  25. Sim é possível... Você já iniciou seu projeto ??? como ele está ? quantos campos tem ? qual tipo de acesso vai usar ? DAO ou ADO ? conheces estas bibliotecas ? se não... ADO: http://www.macoratti.net/ado_vbas.htm http://www.macoratti.net/flex_ado.htm DAO: http://www.macoratti.net/vbadodao.htm http://www.hardware.com.br/comunidade/dados-banco/54930/ VALEU ! :rolleyes:
×
×
  • Criar Novo...