|
|
|
Oracle через VB скрипт!
|
|||
|---|---|---|---|
|
#18+
Всем привет! Народ, надо в скрипте сгерерить запрос к Ораклу. У меня есть пример для MS SQL Server может кто уже делал подскажите плиз. Пример: Set cn = New ADODB.Connection cn.Open (" DATABASE=zzzz; SERVER=aasse; DRIVER={SQL Server} ; UID = xxxx; PW = xxxx") Set rs = New ADODB.Recordset rs.ActiveConnection = cn cn.CommandTimeout = 300 rs.Open (strcn) cn.Close ActiveWorkbook.RefreshAll ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 11.07.2005, 16:30:24 |
|
||
|
Oracle через VB скрипт!
|
|||
|---|---|---|---|
|
#18+
KiropDATABASE=zzzz; SERVER=aasse; DRIVER={SQL Server} ; UID = xxxx; PW = xxxxВсе дело в этой строке. Создаешь файл.udl, открываешь - появляется диалог. Там все под Oracle настраиваешь, нажимаешь OK. Затем открываешь этот файл как текстовый (Unicode) - и строку оттуда записываешь вместо этой. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 12.07.2005, 15:19:17 |
|
||
|
Oracle через VB скрипт!
|
|||
|---|---|---|---|
|
#18+
Dim cn As New ADODB.Connection, SP As New ADODB.Command, rst As New ADODB.Recordset cn.ConnectionTimeout = 25 cn.Provider = "OraOLEDB.Oracle" cn.Properties("Data Source").Value = "server" cn.Properties("User ID").Value = "login" cn.Properties("Password").Value = "pas" cn.CursorLocation = adUseClient cn.Open ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 12.07.2005, 15:25:38 |
|
||
|
|
start [/forum/topic.php?desktop=1&fid=60&tid=2167497]: |
0ms |
get settings: |
9ms |
get forum list: |
12ms |
check forum access: |
3ms |
check topic access: |
3ms |
track hit: |
119ms |
get topic data: |
10ms |
get forum data: |
2ms |
get page messages: |
29ms |
get tp. blocked users: |
1ms |
| others: | 235ms |
| total: | 423ms |
| 0 / 0 |
