Ответить

 

Опции темы
Старый 10.02.2009, 09:48   #21
Sneezy
Заблокированный пользователь
 
Аватар для Sneezy
 
Регистрация: 29.11.2008
Сообщений: 8,888
Благодарности: 95
Поблагодарили 1,814 раз(а) в 1,785 сообщениях

Обратиться по нику
Цитата выделенного
По умолчанию

Цитата:
( в общем отличия как между дрезиной и локомотивом, вроде и то и другое едет по рельсам, а ощущения совсем разные).
:assassin:
И SQL там есть, в том объеме , который необходим.
Цитата:
но в Опене возможно реализовать базы данных в других форматах, к примеру в базах SQL
без вопросов, есть еще сотни языков программирования на любой вкус. Но нам бы что-нибудь попроще
 
В Минюст Цитата Спасибо
Старый 10.02.2009, 09:58   #22
raus
Модератор ФССП
 
Аватар для raus
 
Регистрация: 16.01.2009
Адрес: Россия / /
Сообщений: 3,373
Благодарности: 153
Поблагодарили 548 раз(а) в 528 сообщениях

Обратиться по нику
Цитата выделенного
По умолчанию

Цитата:
Сообщение от Вовка Зло Посмотреть сообщение
мне бы еще понять зачем это надо вообще.
ну как пример простейший макрос для того чтобы не утомлять себя опечатыванием документов ,генерируемых ПК СП

Код:
Sub Sho1() 
 
nach: 
' 
' Sho Макрос 
' Макрос создан 23.05.2008 ** 
 
Set bln = Assistant.NewBalloon 
With bln 
	.Heading = "Нажата желтая кнопка № 1" 
	.Mode = msoModeModeless 
	.Button = msoButtonSetNone 
	.Icon = msoIconTip 
	.Text = "жду..." 
	 
	.Show 
End With 
 
 
If Application.Documents.Count > 0 Then 
 
  ' проверяю успел ли документ сохраниццо 
  
	If Windows(1).Document.Path = "" Then 
	   Application.OnTime When:=Now + TimeValue("00:00:1"), _ 
	   name:="Shojd1" ' макрос ожидания 
	 Else 
	  
	  
 With Assistant 
	.Visible = True 
	Set bln = .NewBalloon 
	With bln 
		.Mode = msoModeModeless 
		.Heading = "Включена желтая кнопка 1" 
		.Text = "печатаю..." 
		.Button = msoButtonSetNone 
		.Icon = msoIconTip 
	  '  Assistant.Animation = msoAnimationPrinting 
		.Show 
	End With 
End With 
	  
	  
   'для задержки документа 
	With Dialogs(wdDialogDocumentStatistics) 
		.Display TimeOut:=2000 
	End With 
 'для задержки документа 
	  
Windows(1).Document.PrintOut Copies:=1 
Windows(1).Document.Save 
 
Windows(1).Document.Close 
 
' перход к ПК СП 
On Error GoTo nach 
AppActivate "Внимание!" 
 
SendKeys "{ENTER}", True 
 
' конец перехода к ПК СП 
GoTo nach 
 
End If 
 
Else 
 Application.OnTime When:=Now + TimeValue("00:00:1"), _ 
	name:="Shojd1" ' макрос ожидания 
End If 
 
End Sub 
 
Sub Shojd1() 
 Application.OnTime When:=Now + TimeValue("00:00:2"), _ 
	name:="Sho1" ' макрос ожидания если будет тупить макрос можно увеличить секунды 
End Sub
Цитата:
Сообщение от Sneezy Посмотреть сообщение
:assassin:
И SQL там есть, в том объеме , который необходим.

без вопросов, есть еще сотни языков программирования на любой вкус. Но нам бы что-нибудь попроще
тока SQL не язык программирования, а чё то там бла-бла-бла *не помню*
__________________
Yo Way Yo, Home Va-Ray,
Yo Ay-Rah, Jerhume Brunnen-G
 
В Минюст Цитата Спасибо
Старый 10.02.2009, 10:40   #23
Sneezy
Заблокированный пользователь
 
Аватар для Sneezy
 
Регистрация: 29.11.2008
Сообщений: 8,888
Благодарности: 95
Поблагодарили 1,814 раз(а) в 1,785 сообщениях

Обратиться по нику
Цитата выделенного
По умолчанию

Цитата:
SQL
AFAIK ( as far as I remember- насколько я помню) SQL= sructured query language = язык структурированных запросов, придуман где-то в 70-е годы прошлого века. Мощная такая штуковина для работы с данными, дешево и сердито.
raus а почему через rem ( ремарки) не пишешь что каждая строка делает, через какое-то время можно забыть. Делай доброе дело для всех пиши пояснения в коде
напр.
Код:
Private Sub Form_Current() 
Dim Srok As Integer ' объявление переменных для расчета дат.Srok установленный срок а SrokS текущая дата 
Dim SrokS As Integer, Alert As Integer 
If Me![Gotov] = -1 Then OblastDate.BackColor = 10331992 
If Me![Gotov] = 0 Then OblastDate.BackColor = 12632256 
If Me.NewRecord Then GoTo M1 
Alert = Me![SrokRuk] - Date 
If Alert <= 0 Then Me!lbSrok0.Visible = True Else Me!lbSrok0.Visible = False 
If Alert = 2 Then Me!LbSrok2.Visible = True Else Me!LbSrok2.Visible = False 
If Alert = 1 Then Me!lbSrok1.Visible = True Else Me!lbSrok1.Visible = False 
If Alert = 3 Then Me!lbSrok3.Visible = True Else Me!lbSrok3.Visible = False 
If Gotov = -1 Then Me!lbSrok0.Visible = False 
If Gotov = -1 Then Me!LbSrok2.Visible = False 
If Gotov = -1 Then Me!lbSrok1.Visible = False 
If Gotov = -1 Then Me!lbSrok3.Visible = False 
M1: 
If Me![Gotov] = -1 Then Call onIsp Else Call onNaIsp ' надписи исполнено или нет 
If Me![Proverka] = -1 Then Me!LbProv.Visible = True Else Me!LbProv.Visible = False ' надписи служебная проверка 
If Me![ProverkaROSP] = -1 Then Me!lbProverca.Visible = True Else Me!lbProverca.Visible = False ' надписи проверка РОСП 
If Me![Obraschenie] = -1 Then Me!LbObras.Visible = True Else Me!LbObras.Visible = False ' надписи обращение
кривенько так, зато работает:assassin:
 
В Минюст Цитата Спасибо
Старый 11.02.2009, 03:36   #24
Вовка Зло
Ipristav
 
Аватар для Вовка Зло
 
Регистрация: 16.01.2009
Адрес: Россия / Хабаровский край / Богородское (Хабаровский край)
Сообщений: 416
Благодарности: 0
Поблагодарили 94 раз(а) в 93 сообщениях

Обратиться по нику
Цитата выделенного
По умолчанию

Блин, да напишите по-русски, чего это такое. Он что сам опись будет делать или как, т.е. может делать выборки там разные что-ли. Не догоняю я честно. Я Эксель, Ворд знаю, даже ПК СП выучил, а вот такого не знаю и не могу понять. Это видимо должны программисты делать, своим умом не дойдешь.
 
В Минюст Цитата Спасибо
Старый 11.02.2009, 07:54   #25
Контролер
Сотрудник ФССП
 
Аватар для Контролер
 
Регистрация: 01.12.2008
Сообщений: 600
Благодарности: 2
Поблагодарили 101 раз(а) в 101 сообщениях

Обратиться по нику
Цитата выделенного
По умолчанию

Цитата:
Блин, да напишите по-русски, чего это такое. Он что сам опись будет делать или как, т.е. может делать выборки там разные что-ли. Не догоняю я честно. Я Эксель, Ворд знаю, даже ПК СП выучил, а вот такого не знаю и не могу понять. Это видимо должны программисты делать, своим умом не дойдешь.
Правильно, так и хочется сказать: "господа, вы сейчас с кем разговаривали?" :assassin:
__________________
Ignoscito saepe alteri, nunquam tibi
 
В Минюст Цитата Спасибо
Старый 11.02.2009, 09:10   #26
raus
Модератор ФССП
 
Аватар для raus
 
Регистрация: 16.01.2009
Адрес: Россия / /
Сообщений: 3,373
Благодарности: 153
Поблагодарили 548 раз(а) в 528 сообщениях

Обратиться по нику
Цитата выделенного
По умолчанию

Цитата:
Сообщение от Вовка Зло Посмотреть сообщение
Блин, да напишите по-русски, чего это такое.
А сам попробуй.
Включи Ворд. Сервис - Макрос - Начать запись
Назначить панели - ОК
Настройка - закрыть
Вот и попробуй ввести текст, пошевели мыш, оформи стили, чё нить скопируй, вставь, найди в тексте.
Остановить запись
Сервис - Макрос - Макросы Находишь свой макрос - Изменить и посмотри что то что мы наделал записалось в коде. И если ты нажмешь выполнить - машина сама повторит твои действия....
__________________
Yo Way Yo, Home Va-Ray,
Yo Ay-Rah, Jerhume Brunnen-G
 
В Минюст Цитата Спасибо
Старый 23.02.2009, 15:17   #27
Sneezy
Заблокированный пользователь
 
Аватар для Sneezy
 
Регистрация: 29.11.2008
Сообщений: 8,888
Благодарности: 95
Поблагодарили 1,814 раз(а) в 1,785 сообщениях

Обратиться по нику
Цитата выделенного
По умолчанию

Есть же добрые люди на свете!!! Нашел безлицензионный и бесплатный движок для Accesse. Попробовал, все пашет, осталось проверить как работает под сеть, но ИМХО будет работать. Единственный минус, ничего нового сделать нельзя будет в базе, только пользоваться, но это мелочи жизни по сравнению со стоимостью пакета office с акссесом - 14-16 тыс. руб.
За ссылкой на скачку движка обращайтесь в личку. А то вдруг передумают и сделают платным :rap:
 
В Минюст Цитата Спасибо
Старый 26.02.2009, 15:00   #28
zhker
Пользователь
 
Аватар для zhker
 
Регистрация: 28.10.2008
Адрес: Россия / Москва и Московская обл. / Москва
Сообщений: 43
Благодарности: 0
Поблагодарили 3 раз(а) в 3 сообщениях

Обратиться по нику
Цитата выделенного
По умолчанию

Цитата:
Сообщение от Вовка Зло Посмотреть сообщение
ну допустим вы хотите сделать простую понятную программу для контроля за исполнением поручений вашимисотрудниками или базу данных проверок теротделов с различными выборками и т.д., подскажите где я "могу любую программу хоть лицензированную хоть нет на рынке купить за 100 рублей
А ещё можно выучить основы программирования. базовых знаний php, html и sql будет вполне достаточно чтобы реализовывать такие базы данных.

Из плюсов:
+ всё бесплатно
+ неограниченные возможности в разработке
+ разместив на хостинге - будет доступно в любой момент времени, с любого места, с любого компьютера\телефона

из минусов:
- пару недель на освоение
- всё таки чуть более долгая разработка

пример как разрабатывается блог на php

http://codeigniter.com/tutorials/watch/blog/
 
В Минюст Цитата Спасибо
Старый 26.02.2009, 15:07   #29
zhker
Пользователь
 
Аватар для zhker
 
Регистрация: 28.10.2008
Адрес: Россия / Москва и Московская обл. / Москва
Сообщений: 43
Благодарности: 0
Поблагодарили 3 раз(а) в 3 сообщениях

Обратиться по нику
Цитата выделенного
По умолчанию

Цитата:
Сообщение от raus Посмотреть сообщение
Сервис - Макрос - Макросы Находишь свой макрос - Изменить и посмотри что то что мы наделал записалось в коде. И если ты нажмешь выполнить - машина сама повторит твои действия....
из той же оперы:
uopilot - запись движений мышкой. плюс в том что очень легко и просто работать. быстро записал макрос и выполнил нужное число раз.
autoit - мощный скриптовый язык. позволяет и мышкой двигать и кнопки нажимать.

2 вещи которые позволяют очень многое автоматизировать.
работают не только в ворде а целиком в системе....

само собой - бесплатные =)
 
В Минюст Цитата Спасибо
Старый 26.02.2009, 22:04   #30
raus
Модератор ФССП
 
Аватар для raus
 
Регистрация: 16.01.2009
Адрес: Россия / /
Сообщений: 3,373
Благодарности: 153
Поблагодарили 548 раз(а) в 528 сообщениях

Обратиться по нику
Цитата выделенного
По умолчанию

Цитата:
Сообщение от Frukt Посмотреть сообщение
autoit - мощный скриптовый язык. позволяет и мышкой двигать и кнопки нажимать.
да замечательная штука.... начал юзать чуток...
__________________
Yo Way Yo, Home Va-Ray,
Yo Ay-Rah, Jerhume Brunnen-G
 
В Минюст Цитата Спасибо
Ответить


Быстрый ответ

Сообщение:
Опции


Ваши права в разделе