BlackTDN :: PowerShell :: Conexão ODBC em Linha de Comando

Para aqueles saudosos do console do Fox-Pró ou do dBase. Um exemplo, em PowerShell, de consulta a dados via linha de comando. Usarei a mesma fonte de dados utilizada em BalckTDN :: PowerShell :: Usando Microsoft FoxPro VFP Driver para popular uma Planilha em Excel.

As instruções:

   1: $Query = "SELECT X3_ARQUIVO, X3_ORDEM, X3_CAMPO FROM SX3010.DBF WHERE X3_ARQUIVO = 'SRA'"

   2:  

   3: $conn = new-object system.data.odbc.odbcconnection

   4: $conn.connectionstring = "Provider=vfpoledb;DSN=NDJ_PROTHEUS_SYSTEM;"

   5:  

   6: $Cmd = New-Object System.Data.Odbc.OdbcCommand

   7: $Cmd.CommandText = $Query

   8: $Cmd.Connection = $conn

   9:  

  10: $ODBCAdapter = New-Object System.Data.Odbc.OdbcDataAdapter

  11: $ODBCAdapter.SelectCommand = $Cmd

  12:  

  13: $DataSet = New-Object System.Data.DataSet

  14: $ODBCAdapter.Fill($DataSet)

  15:  

  16: $Conn.Close()

  17:  

  18: $DataSet.Tables[0]

  19:  

  20: $sw = new-object system.io.streamwriter("c:\temp\sx3_sra_table.xml") 

  21: $DataSet.WriteXml($sw) 

  22: $sw.close()

Executando:

Resultados

(1):

(2):

PS C:\temp> dir     Diretório: C:\temp Mode                LastWriteTime     Length Name                                            ----                -------------     ------ ----                                                                             -a---          8/2/2012      9:12      22413 sx3_sra_table.xml

Verificando o conteúdo do arquivo:

Get-Content c:\temp\sx3_sra_table.xml

[]s

иαldσ dj