| View previous topic :: View next topic | 
	
	
		| Author | Message | 
	
		| AndReW_Samara 
 
  
 Joined: 13 Feb 2002
 Posts: 86
 Location: Колуж Андрей Валериевич
 Occupation: Гелиос-7 (начальник отдела автоматизации)
 Interests: Самара
 
 | 
			
				|  Posted: 17 May 2007 09:43    Post subject: БЭСТ-5. Запуск внешнего приложения |   |  
				| 
 |  
				| Добрый день. 
 Подскажите, какой функцией можно запустить из плагина внешнее приложение, например, бат-файл с параметрами, чтобы плагин ожидал его завершения. Функции, описанные в хелпе к БЭСТ-4, почему-то не работают...
 |  | 
	
		| Back to top |  | 
	
		|  | 
	
		| Behemoth 
 
  
 Joined: 15 Mar 2002
 Posts: 155
 Location: Новиков Алексей Юрьевич
 Occupation: ПБОЮЛ
 Interests: Пермь
 
 | 
			
				|  Posted: 17 May 2007 09:52    Post subject: |   |  
				| 
 |  
				| Добрый день. 
 XRun(cCommand) вполне работоспособна.
 Что у Вас не получается? Управление в .bat не передаётся в принципе? Покажите, пожалуйста, строку вызова.
 _________________
 С уважением, Новиков Алексей.
 |  | 
	
		| Back to top |  | 
	
		|  | 
	
		| AndReW_Samara 
 
  
 Joined: 13 Feb 2002
 Posts: 86
 Location: Колуж Андрей Валериевич
 Occupation: Гелиос-7 (начальник отдела автоматизации)
 Interests: Самара
 
 | 
			
				|  Posted: 17 May 2007 10:00    Post subject: |   |  
				| 
 |  
				| Такая команда: __Run ("C:\BEST5_33\TMOD\ImportSF.BAT "+cTMOD_PATH)
 
 молча выбрасывает из модуля, без сообщений об ошибках, а ваша:
 
 xRun ("C:\BEST5_33\TMOD\ImportSF.BAT "+cTMOD_PATH)
 
 дает следующее:
 
 --------------------------------------------------------------------------------
 DELPHI: BADI.DLL: 17.05.2007 10:55:20
 Error      : 0
 description: Неисправимая ошибка 419:  Нет функции XRUN Вызов из функ: IMPORTSF стр:    39
 
 В общем, вопрос открыты
 
 Last edited by AndReW_Samara on 17 May 2007 10:16; edited 1 time in total
 |  | 
	
		| Back to top |  | 
	
		|  | 
	
		| Behemoth 
 
  
 Joined: 15 Mar 2002
 Posts: 155
 Location: Новиков Алексей Юрьевич
 Occupation: ПБОЮЛ
 Interests: Пермь
 
 | 
			
				|  Posted: 17 May 2007 10:10    Post subject: |   |  
				| 
 |  
				| Добрый день. 
 О! Простите. Не заметил в заголовке темы ссылки на БЭСТ-5. Решил, что речь идёт о БЭСТ-4.
 
 Воспользуйтесь RunAPP(cExeName,cParam,.T.)
 Последний параметр отвечает за ожидание окончания выполнения.
 _________________
 С уважением, Новиков Алексей.
 |  | 
	
		| Back to top |  | 
	
		|  | 
	
		| AndReW_Samara 
 
  
 Joined: 13 Feb 2002
 Posts: 86
 Location: Колуж Андрей Валериевич
 Occupation: Гелиос-7 (начальник отдела автоматизации)
 Interests: Самара
 
 | 
			
				|  Posted: 17 May 2007 10:15    Post subject: |   |  
				| 
 |  
				| Спасибо, теперь все о |  | 
	
		| Back to top |  | 
	
		|  | 
	
		| Behemoth 
 
  
 Joined: 15 Mar 2002
 Posts: 155
 Location: Новиков Алексей Юрьевич
 Occupation: ПБОЮЛ
 Interests: Пермь
 
 | 
			
				|  Posted: 17 May 2007 10:21    Post subject: |   |  
				| 
 |  
				| Добрый день. 
 Рад за Вас.
 _________________
 С уважением, Новиков Алексей.
 |  | 
	
		| Back to top |  | 
	
		|  | 
	
		| LuisFigo 
 
 
 Joined: 08 Feb 2003
 Posts: 132
 
 
 
 
 | 
			
				|  Posted: 24 Jul 2007 14:00    Post subject: |   |  
				| 
 |  
				| Народ, киньте в меня, плиз, примером выгрузки в Excel в БЭСТ-5. вот такой код, работает в БЭСТ-4, а в пятерка на него ругается:
 
 
  	  | Code: |  	  | // Инициалилизация EXCEL
 TRY
 oApp := CreateObject( "Excel.Application" ) //попытка создать объект Excel
 CATCH
 Alert("Excel не доступен!")
 RETURN .F.
 END
 
 xlsFileName:=OemToAnsi("Вклад")
 oWorkBook:=oApp:WorkBooks:Add() //добавление рабочей книги
 oAS:=oWorkBook:Sheets(oemtoansi("Лист1"))
 
 
 | 
 |  | 
	
		| Back to top |  | 
	
		|  | 
	
		| Дениска 
 
 
 Joined: 26 Feb 2002
 Posts: 649
 
 
 
 
 |  | 
	
		| Back to top |  | 
	
		|  | 
	
		| nordk 
 
 
 Joined: 27 Jun 2005
 Posts: 1000
 Location: Горбунов Константин
 Occupation: БЭСТ-Партнер
 Interests: СПб
 
 | 
			
				|  Posted: 24 Jul 2007 15:07    Post subject: |   |  
				| 
 |  
				| В качестве резюме к данному вопросу. В отлчие от Б4 сначала надо инициализировать оле функцией
 
 
  	  | Code: |  	  | WIN32_OLEINITIALIZE() | 
 
 а потом переименовать
 
 в
 
 |  | 
	
		| Back to top |  | 
	
		|  | 
	
		| LuisFigo 
 
 
 Joined: 08 Feb 2003
 Posts: 132
 
 
 
 
 | 
			
				|  Posted: 24 Jul 2007 15:47    Post subject: |   |  
				| 
 |  
				| Спасибки! |  | 
	
		| Back to top |  | 
	
		|  | 
	
		|  |