VB net, cmd, выполнение команд

[Anta]

Здраствуйте, подскажите, как релизовать такую задачу: нужно запустить из VB cmd.exe на сервере и затем выполнить 10 комманд: к примеру первая команда выполенеие экспорта exportdmp из БД Оракл, потом импорт в БД оракл, затем создание bat фйалов, затем создание катологов на сервере и еще несколько комманд. Первый раз сталкиваюсь с этой задачей, не знаю как подойти...Спасибо

[Qwertiy]

Можно сделать bat-файл. Можно выполнять команды поштучно. Можно запустить cmd с перенаправлением ввода.

[Anta]

Можно сделать bat-файл. Можно выполнять команды поштучно. Можно запустить cmd с перенаправлением ввода.

если это bat файл, то в нем нужно написать каждую команду на новой строке? файл хранить на сервере? а как запустить выполнение файла с использованием cmd.exe сервера, если приложение vb находится на моей рабочей машине? в какой теме можно найти примеры? Спасибо

[Qwertiy]

Хм... Тогда не знаю.
А как вообще приложение с сервером взаимодействуют?

[Dmitriy2003]

cmd в топку, лучше воспользуйся WinRM+PowerShell, и не придется изобретать велосипед,,,

[Anta]

Хм... Тогда не знаю.
А как вообще приложение с сервером взаимодействуют?

в смысле? приложение выбирает данны из бд, пользователь редактирует и отправляет данные обратно.
разработчик бд хочит автоматизировать создания cхем на бд, хочит по нажатию кнопки на форме запустить экспорт/импорт схемы и создание необходимых директорий на сервере.

[Anta]

cmd в топку, лучше воспользуйся WinRM+PowerShell, и не придется изобретать велосипед,,,

посмотрю, спасибо

[Qwertiy]

Ещё раз. Как приложение взаимодействует с сервером? Кроме СУБД.

[Anta]

Ещё раз. Как приложение взаимодействует с сервером? Кроме СУБД.

Извините, возможно,я не правильно поняла ваш вопрос. В коде прописан конекшен стринг, подключаюсь к БД как system, использую Oledb, в некотрых случает используется dateREADER, в других случаях через dataset и всё... Не судите строго, программировала последний раз ...лет назад

[Qwertiy]

А тебе не кажется, что для того, что ты хочешь, надо как-то подключаться непосредственно к серверу, а не к БД? Или я не прав?

[Anta]

А тебе не кажется, что для того, что ты хочешь, надо как-то подключаться непосредственно к серверу, а не к БД? Или я не прав?

совершенно верно, вот в поисках литературы по данному вопросу...

[Anta]

Кто-то может посоветовать литературу и примеры по данному вопросу?

[ark]

А что, в Oracle нету что-нить типа xp_cmdshell?

[Anta]

Подскажите, можно ли на vb net запустить запустить скрипт на удаленной машине, открыв сначала программу(на этой же удаленной машине), где он должен быть выполнен. На piton есть пример:

Код: Выделить всё

import subprocess
subprocess.Popen(['c:\\Program Files\\FME\\fme.exe','D:\\mapping\\script\\fme\\script.fmw'])

.
Для запуска программ на удаленной машине использую что-то типа:

Код: Выделить всё

Try
            Shell("C:\PSEXEC.EXE \\machine100\\с:\Program Files\\FME\\fme.exe', vbNormalFocus, True, 500000)
        Catch ex As Exception
            MessageBox.Show(ex.Message, "Message d'alerte", MessageBoxButtons.OK, MessageBoxIcon.Error)
        End Try

А как и где можно указать, что нужно еще выполнить скрипт?
Спасибо.

[Anta]

Подскажите, где ошибка в коде.

Код: Выделить всё

Public Sub FME()
        Dim timeOut As Integer = 50000
        Dim p As New Process
        With p.StartInfo

            .FileName = "C:PSexec.exe"
            .Arguments = "PSexec.exe \\machine1\ -u user -p pass -d -i 0 ""C:\Program Files\FME\fmeworkbench.exe"""
              .WindowStyle = ProcessWindowStyle.Normal

        End With
        p.Start()

      End Sub

В окне doc появляется сообщение "Файл не найден".

[Qwertiy]

Подскажите, где ошибка в коде.

Как минимум тут:

"C:PSexec.exe"

[Anta]

да, исправила, не работает... файл не существует.

[Qwertiy]

да, исправила, не работает... файл не существует.

Вот это странным кажется:

.Arguments = "PSexec.exe \\machine1\ -u user -p pass -d -i 0 ""C:\Program Files\FME\fmeworkbench.exe"""

[Anta]

без Psexec.exe не работает, выдает ошибку. Еще пытаюсь на сервере тоже через vb net, с использованием Psexec.exe запустить Autoexec Macro, созданный в Access 2010 и win7, но в окне Psexec.exe появляется сообщение, что это файл bd1.accdb не является application win32, хотя на сервере тоже стоит Access 2010. Не сталкивались?

[Admiralisimys]

Anta в Win32 я сталкивался с тем, что от CreateProcess() (функции лежащая в основании .NET класса Process) получить требуемый результат, заполнив два первых параметра, не удавалось.
В одной Win32 программе из трёх раз использования CreateProcess дважды был использован лишь второй параметр (когда нужно было вызвать программу с параметрами) и единожды лишь первый (вызов без параметров).
Как же используют её разработчики .NET внутри класса?
А вот как (код на CSharp)

Код: Выделить всё

private bool StartWithCreateProcess(ProcessStartInfo startInfo)
//...
StringBuilder commandLine = BuildCommandLine(startInfo.FileName, startInfo.Arguments);
//...
    retVal = NativeMethods.CreateProcess (
            null,               // we don't need this since all the info is in commandLine
            commandLine,        // pointer to the command line string
            null,               // pointer to process security attributes, we don't need to inheriat the handle
            null,               // pointer to thread security attributes
            true,               // handle inheritance flag
            creationFlags,      // creation flags
            environmentPtr,     // pointer to new environment block
            workingDirectory,   // pointer to current directory name
            startupInfo,        // pointer to STARTUPINFO
            processInfo         // pointer to PROCESS_INFORMATION
        );
//...


>>
Заполняют лишь второй параметр.
Иными словами я б не использовал FileName из startInfo вовсе, либо поэкспериментировал напрямую с упомянутой функцией.