|
|
|
Excel-SQL
|
|||
|---|---|---|---|
|
#18+
Kak zaprosit' odno pole w Excel tabloze pri pomoshi SQL takoy variant ne katit "SELECT `table1$`.field3 FROM `" & strFileName & "`.`table1$`" no esli wybrat' wse polja "SELECT * FROM `" & strFileName & "`.`table1$`" togda rabotaet ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 14.03.2007, 16:44:10 |
|
||
|
Excel-SQL
|
|||
|---|---|---|---|
|
#18+
Dim cnn As New ADODB.Connection, rst As New ADODB.Recordset strNameFile = "D:\Musor\ExcelSQL" strConnect = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & strNameFile & _ "; Extended Properties=""Excel 8.0;HDR=No;IMEX=1""" cnn.Open strConnect rst.Open "select f1 from [Лист4$]", cnn ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 14.03.2007, 17:38:22 |
|
||
|
Excel-SQL
|
|||
|---|---|---|---|
|
#18+
ja by hotel etot zapros s ODBC sdelat With ActiveSheet.QueryTables.Add(Connection:=Array( _ "ODBC;DSN=Excel;DBQ=" & strFileName & ";DefaultDir=" & Dir(strFileName) & _ ";DriverId=790;MaxBufferSize=2048;PageTimeout=5;")), _ Destination:=Range("A1") .CommandText = strSQL .Refresh BackgroundQuery:=False End With ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 14.03.2007, 23:24:27 |
|
||
|
|
start [/forum/topic.php?fid=61&msg=34391760&tid=2183301]: |
0ms |
get settings: |
6ms |
get forum list: |
13ms |
check forum access: |
3ms |
check topic access: |
3ms |
track hit: |
46ms |
get topic data: |
8ms |
get forum data: |
2ms |
get page messages: |
32ms |
get tp. blocked users: |
1ms |
| others: | 194ms |
| total: | 308ms |
| 0 / 0 |
