Добрый день.
Допустим, что в ячейках столбца А есть такие данные.
Первая команда - подключение к базе данных Oracle, а дальше работа в системе.
Как правильно всё это запустить?
Вот как не получается, потому что команды, начиная со 2-ой, не для cmd а для Oracle:
Допустим, что в ячейках столбца А есть такие данные.
| sqlplus system/123 |
| drop user test1 cascade; |
| create user test1 identified by 123; |
| grant connect, resource, create view to test1; |
| disconnect |
| connect test1/123 |
Как правильно всё это запустить?
Вот как не получается, потому что команды, начиная со 2-ой, не для cmd а для Oracle:
| Код |
|---|
Sub sqlplus()
Dim wsh As Object
Set wsh = VBA.CreateObject("WScript.Shell")
whatToDo = Range("A1")
For i = 2 To 6
whatToDo = whatToDo & "&" & Range("A" & i)
Next i
wsh.Run whatToDo
Set wsh = Nothing
End Sub |
