Acessando o Oracle via Scripts

<< Clique para Mostrar o Sumário >>

 

Acessando o Oracle via Scripts

Scripts são módulos de linguagem de programação onde se pode criar linhas de código, que permitem maior flexibilidade para a associação de ações a eventos específicos. Cada item de um projeto do E3 possui uma lista de eventos previamente associados. Assim, o usuário pode criar programas que são executados na ocorrência de um evento.

O E3 utiliza o VBScript (Visual Basic Script) em seus scripts, e assim é possível instanciar qualquer objeto ActiveX registrado no sistema operacional. Para o acesso ao Banco de Dados, o ActiveX mais utilizado é o ADO, que pode ser facilmente manipulado nos scripts do E3.

1.Primeiro é preciso criar uma conexão ADO, que pode ser realizada com o script a seguir.

Set DBConnection = CreateObject("ADODB.Connection")
DBConnection.Open "Provider=MSDAORA;_
  DataSource=conexaoOracle;User_
  ID=UserID;Password=passwd"

 

2.Depois de criada a conexão, é possível executar um comando SQL diretamente na conexão, como mostrado a seguir.

DBConnection.Execute _
  "UPDATE Tabela SET nome = 'João' WHERE id = 10"

 

3.É possível também a visualização de todos os registros desejados, retornados na forma de um Recordset (consulta), como mostrado a seguir.

Set Recordset = CreateObject("ADODB.Recordset")
Recordset.Source = "Tabela"
Recordset.ActiveConnection = DbConnection
Recordset.CursorType = 1 ' adOpenKeyset
Recordset.LockType = 3 ' adLockOptimistic
Recordset.Open

 

4.A partir deste momento, é possível navegar pela tabela utilizando-se os comandos MoveNext e MovePrevious, bem como uma série de outros comandos fornecidos pelo ADO. É possível também utilizar uma consulta SQL para manipular partes específicas da tabela, através da propriedade Source.

Esta página foi útil?