helpf.pro
Регистрация
 0 
Распечатать

Как определить IP адрес текущего компьютера?

Код 1C v 8.2 УП
 //работает под толстым и тонким клиентами 
ремоте= Новый COMОбъект("rcbdyctl.setting");
Сообщить(ремоте.GetIpAddress);

Код 1C v 8.х
  ремоте= Новый COMОбъект("rcbdyctl.setting");
Сообщить(ремоте.GetIpAddress);

Код 1C v 7.x
 ремоте=СоздатьОбъект("rcbdyctl.setting");
Сообщить(ремоте.GetIpAddress);

Подсказал: smaharbA
Разместил:   Версии: | 7.x | 8.x | 8.2 УП |  Дата:   Прочитано: 27396
 0 
Распечатать
Возможно, вас также заинтересует
Доступен ли сервер? Проверка Ping 0
// Функция возвращает результат пинга указанного IPАдреса Функция ping(IPАдрес) objShell = Новый COMОбъект(" WScript.Shell" ) ; objScriptExec = objShell.Exec(" ping.exe -n 1 " + IPАдрес) ; strPingResults = НРег(objScriptExec.StdOut.ReadAll());
Загрузка данных из таблицы Excel в ТЗ (Таблицу значений) 0
Код для 7 версии, при использовании в 8-ой - заменить E=СоздатьОбъект(" Excel.Application" ); на E=Новый COMОбъект(" Excel.Application" ); Функция глОткрытьФайл(Маска=" " ) Экспорт Перем ИмяФайла,ИмяКаталога; Маска_=" Файлы " +Маска+" |*." +Ма
Запись СД из 1С(без ВК и других программ, проверено на ХР/2003) 0
Процедура Сформировать(ДискДляЗаписи=" E:" ,АвтоИзвлечениеСД=0,АвтоЗакрытиеМастера=1) Перем Имя,Каталог; scr=СоздатьОбъект(" MSScriptControl.ScriptControl" ); scr.language=" javascript" ; shell=СоздатьОбъект(" Shell.Application" ); scr.AddOb
Как удалить Файл, Каталог? 0
Функция Удаляет указанные файлы. УдалитьФайлы( Путь , Маска ) Параметры: Путь (обязательный) Тип: Строка. Путь к удаляемым файлам. Маска (необязательный) Тип: Строка. Маска для выбора удаляемых файлов. В строке маски допускается использо
Пример чтения текста в кодировке ISO 0
Функция Перекодировка(Стр=" " ,Кодировка=" windows-1251" ) Стрим = СоздатьОбъект(" Adodb.Stream" ); Стрим.Type = 2; Стрим.Mode= 3; Стрим.charset=" iso-8859-5" ; Стрим.Open(); Стрим.WriteText(Стр); Стрим.Position=0; Стрим.charset=Кодировка;
Посмотреть все результаты поиска похожих
Комментарии
cons74
08.05.2018 12:27Комментарий: 5
cons74

rcbdyctl.dll - это библиотека из windows xp. В Windows 7 и старше её нет. Поэтому описанный метод не подходит.

Altair
03.01.2013 18:01Комментарий: 4
Altair
E_Migachev, тоже самое в Win7 64
Wolf1975
31.10.2011 18:39Комментарий: 3
Wolf1975
а что писать чтоб в вин7 сработало ?
E_Migachev
23.08.2010 09:44Комментарий: 2
E_Migachev
VasilijStasov72, Winda какая?
VasilijStasov72
21.08.2010 20:28Комментарий: 1
VasilijStasov72
{Форма.Форма(4)}: Ошибка при вызове конструктора (COMОбъект): Недопустимая строка с указанием класса
ремоте= Новый COMОбъект("rcbdyctl.setting");
по причине:
Недопустимая строка с указанием класса
Вы не можете отправить комментарий анонимно, пожалуйста войдите или зарегистрируйтесь.