Список форумов www.integro.ru www.integro.ru
ЦСИ ИНТЕГРО
 
 FAQFAQ   ПоискПоиск   ПользователиПользователи   ГруппыГруппы   РегистрацияРегистрация 
 ПрофильПрофиль   Войти и проверить личные сообщенияВойти и проверить личные сообщения   ВходВход 

заполнение поля имя пользователя

 
Начать новую тему   Ответить на тему    Список форумов www.integro.ru -> Пожелания и предложения
Предыдущая тема :: Следующая тема  
Автор Сообщение
tariel



Зарегистрирован: 26.09.2005
Сообщения: 72
Откуда: г.Орск Оренбургская обл.

СообщениеДобавлено: Пн 29 Июн 2009 11:04    Заголовок сообщения: заполнение поля имя пользователя Ответить с цитатой

создается объект надо что бы заполнялось поле кто создал объект
есть модуль по автозаполеннию

,Задать имя пользователя при создании объекта 0& Программаю option explicit


const LayerID = "002D0000F204"
const TableName = "Новая таблица"
const FieldName = "Имя"


dim LockUpdate

LockUpdate = false


' Вызывается после создания пространственного объекта
sub DbMapObjects_CreateComplete(aMapObjectID, aMy)

dim MapObjects

set MapObjects = ActiveDb.MapObjects
if not aMy or LockUpdate or (MapObjects.LayerIDFromObjectID(aMapObjectID) <> LayerID) then
exit sub
end if

dim MapObject, UserName
set MapObject = MapObjects.GetObject(aMapObjectID)

with ActiveDb
UserName = .Users.UserFromID(.LogonUserID).Name
end with

MapObject.SemData.SetValue TableName, FieldName, UserName, 0

LockUpdate = true
on error resume next
MapObjects.UpdateChanges
LockUpdate = false
end sub
VBScript



так вот : привязка идет к конкретному слою.
можно ли оформить что бы заполнялось по любому объекту в таблице которых есть поле имя пользователя.?
Вернуться к началу
Посмотреть профиль Отправить личное сообщение
Показать сообщения:   
Начать новую тему   Ответить на тему    Список форумов www.integro.ru -> Пожелания и предложения Часовой пояс: GMT + 5
Страница 1 из 1

 
Перейти:  
Вы не можете начинать темы
Вы не можете отвечать на сообщения
Вы не можете редактировать свои сообщения
Вы не можете удалять свои сообщения
Вы не можете голосовать в опросах
Вы не можете добавлять приложения в этом форуме
Вы можете скачивать файлы в этом форуме


© phpBB Group
Русская поддержка phpBB