| 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 | 
		 | 
	
	
		  | 
	
	
		 |