MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração


Participe do fórum, é rápido e fácil

MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração

MaximoAccess

Gostaria de reagir a esta mensagem? Crie uma conta em poucos cliques ou inicie sessão para continuar.

Dicas Ms Access, Exemplos Ms Access, Codigos VBA Ms Access, SQL Ms Access


2 participantes

    [Resolvido]Renomear Tabela usando ADODB conexão externa

    avatar
    egnaldo
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 90
    Registrado : 11/03/2012

    [Resolvido]Renomear Tabela usando ADODB conexão externa Empty [Resolvido]Renomear Tabela usando ADODB conexão externa

    Mensagem  egnaldo 2/3/2023, 19:44

    Boa tarde,
    tenho um sistema desacoplado onde gero tabela pelo front, exemplo :

    Call Conectar_BD
    Conexao.Execute "CREATE TABLE Tbl_Trocas .....  

    é possível renomear tabela usando esta conexão ADO   ?
    ja andei pesquisando , mas  sem sucesso .
    algo assim, mas conectando a este bd externo

    Conexao.Execute "rename table NewTBL to OldTBL"

    aguardo,  obrigado !
    avatar
    egnaldo
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 90
    Registrado : 11/03/2012

    [Resolvido]Renomear Tabela usando ADODB conexão externa Empty Re: [Resolvido]Renomear Tabela usando ADODB conexão externa

    Mensagem  egnaldo 2/3/2023, 22:16

    vi como solução usando DAO como "Docmd.Rename"

    Dim db As Database
    Set db = OpenDatabase("strDbPath")
    db.TableDefs("NewTBL").Name = "OldTBL"
    db.Close

    mas é possivel usando ADO ?
    DamascenoJr.
    DamascenoJr.
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3845
    Registrado : 22/11/2016

    [Resolvido]Renomear Tabela usando ADODB conexão externa Empty Re: [Resolvido]Renomear Tabela usando ADODB conexão externa

    Mensagem  DamascenoJr. 4/3/2023, 23:14

    qual SGDB externo tá utilizando? Access, MySQL, PostgreSQL...?

    Certifique-se de que seu usuário terá acesso ao comando rename


    .................................................................................
    Ajude-se a ser ajudado, anexe seu projeto.
    Sempre tente entender o código,
    não somente copie e cole.
    Positive as mensagens que achar útil clicando no '+' no canto superior direito delas.
    avatar
    egnaldo
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 90
    Registrado : 11/03/2012

    [Resolvido]Renomear Tabela usando ADODB conexão externa Empty Re: [Resolvido]Renomear Tabela usando ADODB conexão externa

    Mensagem  egnaldo 4/3/2023, 23:41

    Utilizamos Access, temos acesso sim.
    DamascenoJr.
    DamascenoJr.
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3845
    Registrado : 22/11/2016

    [Resolvido]Renomear Tabela usando ADODB conexão externa Empty Re: [Resolvido]Renomear Tabela usando ADODB conexão externa

    Mensagem  DamascenoJr. 5/3/2023, 00:04

    Front-end Access e Back-end Access, certo?

    Qual mensagem de erro é exibida ao executar comando?


    .................................................................................
    Ajude-se a ser ajudado, anexe seu projeto.
    Sempre tente entender o código,
    não somente copie e cole.
    Positive as mensagens que achar útil clicando no '+' no canto superior direito delas.
    avatar
    egnaldo
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 90
    Registrado : 11/03/2012

    [Resolvido]Renomear Tabela usando ADODB conexão externa Empty Re: [Resolvido]Renomear Tabela usando ADODB conexão externa

    Mensagem  egnaldo 5/3/2023, 02:32

    erro é:
    Instrução SQL invalida, era esperado DELETE , INSERT, PROCEDURE, SELECT ou UPDATE.
    DamascenoJr.
    DamascenoJr.
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3845
    Registrado : 22/11/2016

    [Resolvido]Renomear Tabela usando ADODB conexão externa Empty Re: [Resolvido]Renomear Tabela usando ADODB conexão externa

    Mensagem  DamascenoJr. 5/3/2023, 13:48

    ADO e ADOX

    marcar referência: Microsoft ADO Ext. 2.8 for DDL and Security

    Código:
    Dim objCat As ADOX.Catalog
    Dim objTbl As ADOX.Table

    Call Conectar_BD

    Set objCat = New ADOX.Catalog
    Set objCat.ActiveConnection = Conexao

    Set objTbl = New ADOX.Table
    Set objTbl = objCat.Tables("NomeAtual")

    objTbl.Name = "NomeNovo"

    Set objTbl = Nothing
    Set objCat = Nothing
    Call objCon.Close
    Set objCon = Nothing


    .................................................................................
    Ajude-se a ser ajudado, anexe seu projeto.
    Sempre tente entender o código,
    não somente copie e cole.
    Positive as mensagens que achar útil clicando no '+' no canto superior direito delas.
    avatar
    egnaldo
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 90
    Registrado : 11/03/2012

    [Resolvido]Renomear Tabela usando ADODB conexão externa Empty Re: [Resolvido]Renomear Tabela usando ADODB conexão externa

    Mensagem  egnaldo 5/3/2023, 22:29

    Obrigado Damasceno ! Vou fazer a referencia, agradeço mesmo!
    DamascenoJr.
    DamascenoJr.
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3845
    Registrado : 22/11/2016

    [Resolvido]Renomear Tabela usando ADODB conexão externa Empty Re: [Resolvido]Renomear Tabela usando ADODB conexão externa

    Mensagem  DamascenoJr. 6/3/2023, 01:44

    O fórum agradece o retorno. Sucesso.


    .................................................................................
    Ajude-se a ser ajudado, anexe seu projeto.
    Sempre tente entender o código,
    não somente copie e cole.
    Positive as mensagens que achar útil clicando no '+' no canto superior direito delas.

    Conteúdo patrocinado


    [Resolvido]Renomear Tabela usando ADODB conexão externa Empty Re: [Resolvido]Renomear Tabela usando ADODB conexão externa

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 28/4/2024, 14:09