ReSQL.ru
     
powered by simpleCommunicator - 2.0.60     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / 1С [игнор отключен] [закрыт для гостей] / нужно запустить внешнюю обработку 1с из ВБ
13 сообщений из 13, страница 1 из 1
нужно запустить внешнюю обработку 1с из ВБ
    #37079685
podbot
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
podbot
Участник
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
Private Sub CommandButton1_Click()
Dim varTrade
Dim res

Set my1c = CreateObject("V77.Application")
varTrade = my1c.RMTrade
res = my1c.Initialize(varTrade, "", "")


Set a = my1c.EvalExpr("Открытьформумодально(""Обработка"",,""\\TEST2003\Test Trade2006\Trade2006\"")")
End Sub
есть вот такой код, выдает ошибку на сервере в чем проблема?
...
Рейтинг: 0 / 0
26.01.2011, 14:49
| Ответить | Цитировать | Написать  
нужно запустить внешнюю обработку 1с из ВБ
    #37079689
Фотография big-duke
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
big-duke
Участник
podbot,

что за ошибка ?
Может вам лучше в форум по 1С ?
...
Рейтинг: 0 / 0
26.01.2011, 14:51
| Ответить | Цитировать | Написать  
нужно запустить внешнюю обработку 1с из ВБ
    #37079691
podbot
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
podbot
Участник
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
Private Sub CommandButton1_Click()
Dim varTrade
Dim res

Set my1c = CreateObject("V77.Application")
varTrade = my1c.RMTrade
res = my1c.Initialize(varTrade, "", "")


 my1c.EvalExpr ("ОткрытьФормуМодально(""Обработка"",,""C:\Test Trade2006\Trade2006\EXTFORMS\òåñò.ert"")")
End Sub
сори вот так у меня
...
Рейтинг: 0 / 0
26.01.2011, 14:52
| Ответить | Цитировать | Написать  
нужно запустить внешнюю обработку 1с из ВБ
    #37079701
Фотография big-duke
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
big-duke
Участник
podbot,

еще раз
что за ошибка ?
Может вам лучше в форум по 1С ?
...
Рейтинг: 0 / 0
26.01.2011, 14:55
| Ответить | Цитировать | Написать  
нужно запустить внешнюю обработку 1с из ВБ
    #37079704
podbot
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
podbot
Участник
выдает ошибку "Automation error. Ошибка на сервере" в чем проблема
...
Рейтинг: 0 / 0
26.01.2011, 14:56
| Ответить | Цитировать | Написать  
нужно запустить внешнюю обработку 1с из ВБ
    #37079715
Фотография big-duke
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
big-duke
Участник
podbot,

на какой строчке ? Последней ?
...
Рейтинг: 0 / 0
26.01.2011, 14:58
| Ответить | Цитировать | Написать  
нужно запустить внешнюю обработку 1с из ВБ
    #37079716
podbot
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
podbot
Участник
да
...
Рейтинг: 0 / 0
26.01.2011, 14:59
| Ответить | Цитировать | Написать  
нужно запустить внешнюю обработку 1с из ВБ
    #37079774
Фотография big-duke
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
big-duke
Участник
podbot,

скорей всего, тут что-то не так с 1с.
так что давайте-ка в профильный форум.

Модератор: Тема перенесена из форума "Visual Basic".
...
Рейтинг: 0 / 0
26.01.2011, 15:18
| Ответить | Цитировать | Написать  
нужно запустить внешнюю обработку 1с из ВБ
    #37079819
Программист 1с
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Программист 1с
Участник
А "Открытьформумодально("Обработка.ОбновлениеИБ" - например) открывается нормально?
...
Рейтинг: 0 / 0
26.01.2011, 15:33
| Ответить | Цитировать | Написать  
нужно запустить внешнюю обработку 1с из ВБ
    #37079835
podbot
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
podbot
Участник
посоветовали написать так
res = v7.Открытьформумодально ("Обработка", , "C:\Test Trade2006\Trade2006\EXTFORMS\òåñò.ert")
выдает object required
...
Рейтинг: 0 / 0
26.01.2011, 15:37
| Ответить | Цитировать | Написать  
нужно запустить внешнюю обработку 1с из ВБ
    #37079859
podbot
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
podbot
Участник
авторА "Открытьформумодально("Обработка.ОбновлениеИБ" - например) открывается нормально?
нет % (
...
Рейтинг: 0 / 0
26.01.2011, 15:47
| Ответить | Цитировать | Написать  
нужно запустить внешнюю обработку 1с из ВБ
    #37085690
Фотография PA
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
PA
Участник
podbot,

Возможно, у пользователя, под которым запускается 1С отсутствует право "Использование в качестве OLE Automation сервера"
...
Рейтинг: 0 / 0
29.01.2011, 02:05
| Ответить | Цитировать | Написать  
нужно запустить внешнюю обработку 1с из ВБ
    #37093906
A. Ivin
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
A. Ivin
Гость
Возможно запускать через bat файл :
cscript C:\Scripts\SendNewTransfer.vbs c:\Scripts\NewTransfer.ert

Содержание vbs файла:
set wshShell = wScript.createObject("wScript.shell")
wshShell.run """C:\Program Files\1Cv77.ADM\BIN\1cv7s.exe"" enterprise /d""d:\Base"" /nSend /pпароль"

Dim lngS
Dim lngM
Dim lngT
Dim lngI
Dim lngJ

lngS = 60
lngM = 2
WScript.Echo "Ожидаем. Осталось минут:"
For lngJ = 0 To lngM
For lngI = 0 To lngS
WScript.StdOut.Write "."
WScript.Sleep (1000)
Next
lngT = lngM-lngJ
WScript.Echo lngT
Next

wshShell.appActivate "1С:Предприятие"
wshShell.sendKeys "^(o)"
wshShell.sendKeys wScript.arguments.unnamed.item(0)
wshShell.sendKeys "~"

lngS = 60
lngM = 180
WScript.Echo "Ожидаем. Осталось минут:"
For lngJ = 0 To lngM
For lngI = 0 To lngS
WScript.StdOut.Write "."
WScript.Sleep (1000)
Next
lngT = lngM-lngJ
WScript.Echo lngT
Next

wshShell.appActivate "C:\WINDOWS\system32\cmd.exe"
wshShell.sendKeys "(EXIT)"
wshShell.sendKeys "~"
...
Рейтинг: 0 / 0
02.02.2011, 19:21
| Ответить | Цитировать | Написать  
13 сообщений из 13, страница 1 из 1
Форумы / 1С [игнор отключен] [закрыт для гостей] / нужно запустить внешнюю обработку 1с из ВБ
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]