-

   rss_sql_ru_access_programming

 - e-mail

 

 -

 LiveInternet.ru:
: 16.03.2006
:
:
: 4

:


Link- Oracle

, 15 2014 . 03:03 +
!

MJet
XLS+Oracle

[SLAN] - ( )
.
rsA.Source = "select F1 from [Excel 8.0;HDR=YES;IMEX=1;DATABASE=C:\TEMP\RR10.xls].[RR] union all select NAIM from [" & S & "].[select * from T1 left join T2 on .....................................where ........]"

?

Private Sub CommandButton1_Click()
  Dim rsA As New ADODB.Recordset, S As String
  S = "ODBC;DRIVER={Oracle in OraClient11g_home1_32bit};UID=xxx;PWD=xxx_xxxxxxxx;DBQ=INFOBASE;SERVER=(DESCRIPTION=(ADDRESS=(PROTOCOL=TCP)(HOST=localhost)(PORT=1521))(CONNECT_DATA=(SERVER=DEDICATED)(SERVICE_NAME=INFOBASE)))"
  rsA.ActiveConnection = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\TEMP\RR10.xls;Extended Properties=""Excel 8.0"""
  rsA.Source = "select F1 from [Excel 8.0;HDR=YES;IMEX=1;DATABASE=C:\TEMP\RR10.xls].[RR] union all select NAIM from [" & S & "].[SLAN]"
  rsA.Open
  rsA.Move (5)
  MsgBox rsA.Fields(0)
End Sub

http://www.sql.ru/forum/1070933/link-aya-tablica-oracle


: [1] []
 

:
: 

: ( )

:

  URL