USUÁRIO:      SENHA:        SALVAR LOGIN ?    Adicione o VBWEB na sua lista de favoritos   Fale conosco 

 

  Fórum

  Visual Basic
Voltar
Autor Assunto:  Com executar scripts SQL no VB?
Fabio_PB
PATOS
PB - BRASIL
Postada em 11/09/2006 10:54 hs            
Olá, estou tentando executar um script sql no vb para a criação de tabelas caso estas não sejam encontradas mas não consigo. Estou usando o MySQL 5.0 e VB 6.0. Tentei utilizar o SOURCE do shel MySQL no VB mas não deu certo.
Aguém pode me ajudar?
Obrigado, até logo.
     
Cardoso G
Pontos: 2843 Pontos: 2843
PATOS DE MINAS
MG - BRASIL
Postada em 11/09/2006 10:57 hs            
Fabio, é do meso jeito que vc exclui no banco de dados.
dim sql as string
sql="create table tabela (num numeric(5),descricao varchar2(10))"
rs.open sql,conexao
 
sql="select * from table"
rs.open sql,conexao
     
Cardoso G
Pontos: 2843 Pontos: 2843
PATOS DE MINAS
MG - BRASIL
Postada em 11/09/2006 10:58 hs            
desculpe fabio, a primeira opcao nao precisa recordset, é so
conexao.execute sql
     
Fabio_PB
PATOS
PB - BRASIL
Postada em 11/09/2006 11:04 hs            
Opa, desculpe eu não expliquei direito, eu crio o script em um arquivo, e gostaria de executar os comandos que estão contidos no arquivo .sql, sendo assim se eu precisar criar novas tabelas, eu apenas inseriria os novos códigos no arquivo, sem precisar alterar o codigo fonte do meu sistema, vc tem alguma ideia de como fazer?
     
Nsi-Developer
SÃO PAULO
SP - BRASIL
Postada em 11/09/2006 11:45 hs            
Fabio pelo que eu entendi vc quer fazer tipo uma telinha "igual" o Query Analizer no seu sistema e quando quiser criar uma nova tabela vc digita a Query no campo da telinha do seu sistema e cria uma tabela em tempo de execusão, é isto?

bom, se for isto vc pode fazer exatamente o q Cardoso_G postou só que passando os parametros atraves do controle q esta usando textbox ou rtf, vc pode concatenar a a SQL com o q vc digitar no controle.
     
Fabio_PB
PATOS
PB - BRASIL
Postada em 11/09/2006 21:39 hs            
Ok. Obrigado.
     
Página(s): 1/1    

CyberWEB Network Ltda.    © Copyright 2000-2025   -   Todos os direitos reservados.
Powered by HostingZone - A melhor hospedagem para seu site
Topo da página