Создание БД для интернет провайдера

@ТаняDJ · Регистрация: 02.04.2012

Студворк — интернет-сервис помощи студентам

Здравствуйте! интересуют такие вопросы,может кто-то знает:
1) как в Access с генерировать IpАдрес (109.240.123.ХХ;109.240.123 - это для всех одинаково.ХХ- а тут нужна генерация чисел)
2) Как сделать автоматическое начисление ежемесячной платы по дате,т.е каждый месяц определённого числа должна списываться имеющаяся сумма денег на счету.
Заранее спасибо.........

@Михайло · 19.12.2012, 20:48

Функция Rnd возвращает значение типа Single, содержащее случайное число. Для получения случайных целых чисел в заданном диапазоне, используйте выражение:

Int((верхняяГраница - нижняяГраница+ 1) * Rnd + нижняяГраница)

Здесь верхняяГраница представляет максимальное число в диапазоне, а нижняяГраница минимальное число в диапазоне.

Добавлено через 2 минуты
Автоматическое - это:
1. Запуск руками.
2. При открытии базы.
3. В открытой форме взводится таймер на определённое время или перевзводится до достижения требуемого события/условия...

@ТаняDJ · 19.12.2012, 20:53 **[ТС]**

" В открытой форме взводится таймер на определённое время или перевзводится до достижения требуемого события/условия... " - а каким образом это делается?

@Михайло · 19.12.2012, 23:25

Свойство Интервал таймера (TimerInterval) позволяет указать измеряемый в миллисекундах промежуток времени между событиями Таймер (Timer) для формы.
Значением свойства Интервал таймера (TimerInterval) является целое число типа Long Integer в интервале от 0 до 2*147*483*647.
Программу Visual Basic, которая должна выполняться через определенные промежутки времени, указанные в свойстве Интервал таймера (TimerInterval), следует поместить в процедуру обработки события формы Таймер (Timer). Например, для выполнения повторного запроса по записям формы через каждые 30 секунд, следует поместить в процедуру обработки события формы Таймер (Timer) программу, выполняющую повторный запрос, и задать для свойства Интервал таймера (TimerInterval) значение 30*000.
Задав значение свойства Интервал таймера (TimerInterval) в процедуре обработки события формы Загрузка (Load), Ваша форма вивит на экране, а по истечении TimerInterval времени Вы имеете возможность либо выполнить требуемое действие, либо перевзвести таймер (снова задав значение TimerInterval) и далее ожидать у моря погоды...

@Андрэич · 19.12.2012, 23:58

Только это, знак умножения (*) - имеется ввиду, наверное запятая (или точка).

(А то ТС неправильно поймет...)

@ТаняDJ · 20.12.2012, 02:10 **[ТС]**

Почему-то не работает(...

Visual Basic
1
2
3
4
5
6
7
8
9
10
Sub Form_Load()
    Me.TimerInterval = 1000
End Sub
 
Private Sub Form_Timer()
     If Me.TimerInterval = 0 Then
    Снято = -ПоступилоНаСчёт
    End If
 
End Sub

@Андрэич · 20.12.2012, 02:35

[QUOTE=ТаняDJ;3887505]Почему-то не работает(...

Visual Basic
1
2
3
4
Sub Form_Load()
    Me.TimerInterval = 1000
...
  If Me.TimerInterval = 0

При загрузке вы задаете свойство равным ..., а потом его проверяете...

Новые блоги и статьи Все статьи Все блоги /
SDL3 для Web (WebAssembly): Основы отладки веб-приложений на SDL3 по USB и Wi-Fi, запущенных в браузере мобильных устройств 8Observer8 07.02.2026 Содержание блога Браузер Chrome имеет средства для отладки мобильных веб-приложений по USB. В этой пошаговой инструкции ограничимся работой с консолью. Вывод в консоль - это часть процесса. . .	SDL3 для Web (WebAssembly): Обработчик клика мыши в браузере ПК и касания экрана в браузере на мобильном устройстве 8Observer8 02.02.2026 Содержание блога Для начала пошагово создадим рабочий пример для подготовки к экспериментам в браузере ПК и в браузере мобильного устройства. Потом напишем обработчик клика мыши и обработчик. . .	Философия технологии iceja 01.02.2026 На мой взгляд у человека в технических проектах остается роль генерального директора. Все остальное нейронки делают уже лучше человека. Они не могут нести предпринимательские риски, не могут. . .	SDL3 для Web (WebAssembly): Вывод текста со шрифтом TTF с помощью SDL3_ttf 8Observer8 01.02.2026 Содержание блога В этой пошаговой инструкции создадим с нуля веб-приложение, которое выводит текст в окне браузера. Запустим на Android на локальном сервере. Загрузим Release на бесплатный. . .
SDL3 для Web (WebAssembly): Сборка C/C++ проекта из консоли 8Observer8 30.01.2026 Содержание блога Если вы откроете примеры для начинающих на официальном репозитории SDL3 в папке: examples, то вы увидите, что все примеры используют следующие четыре обязательные функции, а. . .	SDL3 для Web (WebAssembly): Установка Emscripten SDK (emsdk) и CMake для сборки C и C++ приложений в Wasm 8Observer8 30.01.2026 Содержание блога Для того чтобы скачать Emscripten SDK (emsdk) необходимо сначало скачать и уставить Git: Install for Windows. Следуйте стандартной процедуре установки Git через установщик. . . .	SDL3 для Android: Подключение Box2D v3, физика и отрисовка коллайдеров 8Observer8 29.01.2026 Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами. Версия v3 была полностью переписана на Си, в. . .	Инструменты COM: Сохранение данный из VARIANT в файл и загрузка из файла в VARIANT bedvit 28.01.2026 Сохранение базовых типов COM и массивов (одномерных или двухмерных) любой вложенности (деревья) в файл, с возможностью выбора алгоритмов сжатия и шифрования. Часть библиотеки BedvitCOM Использованы. . .

@ТаняDJ 0 / 0 / 0 Регистрация: 02.04.2012 Сообщений: 4

	Создание БД для интернет провайдера 19.12.2012, 20:41. Показов 3316. Ответов 6 Метки нет (Все метки) Здравствуйте! интересуют такие вопросы,может кто-то знает: 1) как в Access с генерировать IpАдрес (109.240.123.ХХ;109.240.123 - это для всех одинаково.ХХ- а тут нужна генерация чисел) 2) Как сделать автоматическое начисление ежемесячной платы по дате,т.е каждый месяц определённого числа должна списываться имеющаяся сумма денег на счету. Заранее спасибо......... 0

@Михайло 118 / 118 / 10 Регистрация: 12.05.2010 Сообщений: 1,207
	19.12.2012, 20:48
	Функция Rnd возвращает значение типа Single, содержащее случайное число. Для получения случайных целых чисел в заданном диапазоне, используйте выражение: Int((верхняяГраница - нижняяГраница+ 1) * Rnd + нижняяГраница) Здесь верхняяГраница представляет максимальное число в диапазоне, а нижняяГраница минимальное число в диапазоне. Добавлено через 2 минуты Автоматическое - это: 1. Запуск руками. 2. При открытии базы. 3. В открытой форме взводится таймер на определённое время или перевзводится до достижения требуемого события/условия... 0

@ТаняDJ 0 / 0 / 0 Регистрация: 02.04.2012 Сообщений: 4
	19.12.2012, 20:53 [ТС]
	" В открытой форме взводится таймер на определённое время или перевзводится до достижения требуемого события/условия... " - а каким образом это делается? 0

@Михайло 118 / 118 / 10 Регистрация: 12.05.2010 Сообщений: 1,207
	19.12.2012, 23:25
	Свойство Интервал таймера (TimerInterval) позволяет указать измеряемый в миллисекундах промежуток времени между событиями Таймер (Timer) для формы. Значением свойства Интервал таймера (TimerInterval) является целое число типа Long Integer в интервале от 0 до 2147483647. Программу Visual Basic, которая должна выполняться через определенные промежутки времени, указанные в свойстве Интервал таймера (TimerInterval), следует поместить в процедуру обработки события формы Таймер (Timer). Например, для выполнения повторного запроса по записям формы через каждые 30 секунд, следует поместить в процедуру обработки события формы Таймер (Timer) программу, выполняющую повторный запрос, и задать для свойства Интервал таймера (TimerInterval) значение 30000. Задав значение свойства Интервал таймера (TimerInterval) в процедуре обработки события формы Загрузка (Load), Ваша форма вивит на экране, а по истечении TimerInterval времени Вы имеете возможность либо выполнить требуемое действие, либо перевзвести таймер (снова задав значение TimerInterval) и далее ожидать у моря погоды... 1

@Андрэич 2842 / 774 / 41 Регистрация: 20.05.2012 Сообщений: 2,055
	19.12.2012, 23:58
	Только это, знак умножения (*) - имеется ввиду, наверное запятая (или точка). (А то ТС неправильно поймет...) 0