Программирование (VB,C#,ASP,.NET): новости, советы, примеры (comp.soft.prog.vbaspsharpnet) : Рассылка : Subscribe.Ru

Система «Эксперт» - уникальная система, которая поможет решить, если не все, то мн огие Ваши проблемы с программированием и разработкой! Если у Вас есть какой-либо вопрос по программированию или разработке, то Вы всегда можете задать его нашим Экспертам! При этом каких-либо особых действий от Вас не потребуется! Просто отправьте Ваш вопрос на адрес mailto:expert@kbyte.ru, в теме письма укажите тему вопроса, в тексте – сам вопрос, и все! Эксперты дадут Вам ответ в течение 12-24 часов, на тот адрес, с которого Вы отправите вопрос. Все проще простого! Никакой регистрации и заполнение бесконечных форм, просто спросите и получите ответ ;-)

Вопрос #000665: Параметры в VB6

Автор вопроса: Сергей // 06.0 1.2008 / 05:11

С Новым Годом, Эксперты!
 У меня такая вот проблема в моей апликухи на VB6:
 Передаю апликухе в качестве входного параметра имя файла 
 "C:\Program Files\Экзаменатор\Экзаменатор.exe" "Test_10_kl.ekz" - (примерно такой параметр:)
  а где мне его в VB найти?:( Вот в Delphi7 входной параметр := -ца значению функции
ParamStr.
 И потом с этим пораметром делаем чё хотим...
 А как на Visual Basiс-e не знаю :-(
 Так вот есть ли в VB6 подобная функциия или переменная ну или какой другой способ?
 Будьте добры подскажите пожалуйста...!)
 Зараннее благодарен... 8-)
 
 
 --------------------------------------
 Категория: --- Visual Basic 5.0/6.0
 
 

Отвечает: Алексей Немиро // 06.01.2008 / 05:19

Здравствуйте, Сергей!
 
 В Visual Basic для этого используется функция Command
 
 
 -- 
 С наилучшими пожеланиями, 
 Немиро Алексей http://aleksey.nemiro.ru/

Вопрос #000639: Как програмно считать разрешение из видео файл...

Автор вопроса: Fox // 06.12.2007 / 11:15

Добрых суток
 У меня вопрос как програмно с
 читать разрешение из видео файла при помощи C#?

Отвечает: Алексей Немиро // 08.12.2007 / 07:24

Наиболее оптимальным вариантом будет открыть видио-файл, получить необходимые данные и закрыть.
 Вот небольшой пример:
 
 1. Подключите к проекту Microsoft.DirectX.AudioVideoPlayback.
 2. Разместите на форме элемент openFileDialog:
 001:
002:
003:
004:
005:
006:
007:
008:
009:
010:
011:
012:
013:
if (openFileDialog1.ShowDialog()
== DialogResult.OK)
{
 int height = this.Height;
 int width = this.Width;
 Video _video = new Video(openFileDialog1.FileName);
 _video.Owner = this;
 videoPanel.Width = width;
 videoPanel.Height = height;
 _video.Play();
 _video.Pause();
 Console.WriteLine("Ширина: " + _video.DefaultSize.Width);
 Console.WriteLine("Высота: " + _video.DefaultSize.Height);
}

 В коносли должен появиться размер видео-файла.

Вопрос #000635: Свойство Combo в VB 6.0

Автор вопроса: Федоренко Дмитрий Константинович // 04.12.2007 / 06:37

Здравствуйте эксперты.
   Хочу задать вам вопрос такого плана.
   Например, я использую в программе форму, на которой размещен Combo и 
 каждый раз должен выбирать из этого списка(Combo) того или иного 
 сотрудника(записиь), скажем я точно знаю, что определенная запись 
 используется чаще всего, для этого я пишу ее значение в свой ini фаил, а 
 потом при открытии формы, считываю значение этой записи из файла и хочу, 
 чтоб в компоненте Combo фокус стоял именно на этой
записи, избавляя меня от 
 лишнего просматривания, поиска и выбора её, при большом объеме записей.
  Другими словами, как можно сразу сфокусироваться на нужном мне 
 элементе(записи) списка Combo, то есть чтоб именно он стоял (отображался в 
 списке) сразу?
 
 Заранее благодарен, Федоренко Дмитрий.

Отвечает: Алексей Немиро // 04.12.2007 / 06:46

Здравствуйте, Дмитрий.
 
 001:
002:
003:
004:
005:
006:
007:
008:
009:
010:
011:
 
012:
013:
014:
015:
016:
017:
018:
Private Sub Form_Load()
 'добавляем записи
 Dim i As Long
 For i = 0 To 100
  Combo1.AddItem ("Запись
" & i)
 Next i
 'выбераем 25 запись по индексу
 Combo1.ListIndex = 25
 'выбор записи по тексту
 'Dim findText As String
 'findText = "Запись 10"
 'For i = 0 To C
 ombo1.ListCount - 1
 ' Combo1.ListIndex = i
 ' If Combo1.Text = findText Then
 '  Exit For
 ' End If
 'Next i
End Sub

 
 -- 
 С наилучшими пожеланиями, 
 Немиро
Алексей http://aleksey.nemiro.ru/
 Кодообменник Kbyte.Ru - меняйтесь кодами!

Вопрос #000627: Обработка сообщения мыши компонентом UserContro...

Автор вопроса: Антон // 28.11.2007 / 14:23

Здравствуйте!
 В .NET можно создавать новые компоненты путем наследования от компонента UserControl. При этом новый компонент получается путём агрегирования других компонентов, которые и получают сообщения от мыши, когда курсор находится над ними. Вопрос такой: можно ли сделать так, чтобы новый компонент (на основе UserControl) будучи помещенным на форму получал сообщения от мыши (например
MouseMuve) как одно целое (в не зависимости от того, над каким из его компонентов находится курсор)?
 Буду очень благодарен за ответ.
 
 --------------------------------------
 Категория: --- Visual Basic .NET
 
 

Отвечает: Алексей Немиро // 08.12.2007 / 07:34

Это можно реализовать, зная размер Вашего контрола, его координаты на форме, координаты и размер самой формы на экране, и координаты мышки на экране.
 
 --
 - Если у Вас есть вопросы по программированию, которые бы Вы хотели обсудить, воспользуйтесь Форумом.
 - Если у Вас есть код или пример кода, которым бы Вы хотели
поделиться с общественностью, воспользуйтесь Кодообменником.
 - Если у Вас есть готовые проекты или сайты, Вы всегда можете добавить их в раздел Наши проекты.

Вопрос #000611: Новый вопрос без темы

Автор вопроса: Федоренко Дмитрий Константинович // 15.11.2007 / 05:32

Здравствуйте уважаемые эксперты.
 Скажите пожалуйста есть ли такое свойство у компонента Combo в VB 6.0,
 которое задает длинну низпадающего списка.
 Например, если у меня, скажем, 3-4 элемента занесено в этот список, то я при
 выборе нужного
вижу их все сразу, а если их очень много(так что они не
 умещаются сразу все в видимую область), то приходится пользоваться бегунком
 справа и прокручивать в поиске нужного элемента.
   Так вот, есть ли такое свойство, которое позволяет задавать размеры этой
 видимой области (длинну низпадающего списка), чтобы я смог увидеть например
 не 3-4 элемента, а 10-20, пока мне это будет позволять делать экран монитора
 :))) ? И что это за свойств
 о?
   Заранее благодарен за ответ.

Отвечает: Алексей Немиро // 15.11.2007 / 05:39

Здравствуйте, Дмитрий!
 
 Нет, стандартного такого свойства нет, но это можно реализовать при помощи API.
 Я
не так давно добавлял примеры на эту тему в наш Кодообменник:
 http://kbyte.ru/Code/ShowList.aspx?lid=1&gid=1&uid=0&sort=0
 
 ЗЫ: прям дежавю какое-то :))
 
 
 -- 
 С наилучшими пожеланиями, 
 Немиро Алексей http://aleksey.nemiro.ru/

Чтобы задать Ваш вопрос, отправьте его на адрес expert@kbyte.ru

Раздел Эксперт на сайте Kbyte.Ru

Наверх

Последнее на форумах

Baloon | Автор: Паша
Добавлено: 17.01.2008 / 17:03 | ответов: 0 | просмотров: 27

Скажите, пожалуйста, как отобразить подсказку из трея (как когда винда говорит, что инет включен)

Ответить на это сообщение | Посмотреть эту тему на сайте | Форум Kbyte.Ru

Как записать данные из формы в таблицу Access | Автор: RH100
Добавлено: 16.01.2008 / 09:16 | ответов: 23 | просмотров: 417

Здравствуйте! Проблема в следующем: создал форму (ASP.NET в VS2005) для проведения опросов. Развернул на IIS. Пользователи вводят данные в текстовые поля формы (одновременно порядка 10-15 человек), нажимают на кнопку и данные каждого пользователя записываются в отдельный текстовый файл. Нужно: чтобы все данные записывались в таблицу Access в порядке поступления ответов пользователей. Таблицу в Access создал, что дальше?

Ответить на это сообщение | Посмотреть эту тему на сайте | Форум Kbyte.Ru

Ответ # 1 | Автор: Алексей
Добавлено:16.01.2008 / 09:21
Создай в таблице поле типа "Дата и время" и записывай в него дату и время голосования :)

_________________
Это сообщение добавлено через Kbyte.Ru Forum Mail Conference (FMC)

Добавить ответ | Посмотреть эту тему на сайте | Форум Kbyte.Ru

Ответ # 2 | Автор: RH100
Добавлено:16.01.2008 / 09:25
Это я сделал. Вопрос в механизме записи в таблицу Access. Как подключить таблицу и записывать в неё данные? Функции, ключевые слова.

Добавить ответ | Посмотреть эту тему на сайте | Форум Kbyte.Ru

Ответ # 3 | Автор: Алексей
Добавлено:16.01.2008 / 09:31
Объекты для работы с данными можно найти в System.Data, конкретно для Access - System.Data.OleDb.
http://kbyte.ru/Forum/Show.aspx?id=5733
http://kbyte.ru/Forum/Show.aspx?id=5907

_________________
Это сообщение добавлено через Kbyte.Ru Forum Mail Conference (FMC)

Добавить ответ | Посмотреть эту тему на сайте | Форум Kbyte.Ru

Ответ # 4 | Автор: RH100
Добавлено:16.01.2008 / 10:59
Получается, мне необходимо взять весь код в примере от 1 до 400 строки, а вкнопке записи данных в базу использовать код с 1 по 12 строчку.

Добавить ответ | Посмотреть эту тему на сайте | Форум Kbyte.Ru

Ответ # 5 | Автор: Алексей
Добавлено:16.01.2008 / 11:08
:))) Можешь взять весь, это готовый универсальный класс (аля хелпер). Если
разберешься с ним, то можешь взять только то, что тебе нужно, либо
написать свой подобный класс, с классом работать удобней, весь процесс
работы с данными на более высоком уровне идет.

_________________
Это сообщение добавлено через Kbyte.Ru Forum Mail Conference (FMC)

Добавить ответ | Посмотреть эту тему на сайте | Форум Kbyte.Ru

Ответ # 6 | Автор: RH100
Добавлено:16.01.2008 / 12:06
Спасибо! А где декларировать sSQL, показывает ошибку Name is not declared.

Добавить ответ | Посмотреть эту тему на сайте | Форум Kbyte.Ru

Ответ # 7 | Автор: Алексей
Добавлено:16.01.2008 / 12:12
Если речь идет о этом коде:

001:
002:
003:
004:
005:
006:
007:
008:
009:
010:
011:
012:
013:
014:
015:
sSQL = "INSERT INTO ИмяТаблицы (Поле1, Поле2, Поле3) " & _
"VALUES (@Поле1, @Поле2, @Поле3)"
Dim myCmd As New OleDb.OleDbCommand(sSQL)
myCmd.Parameters.Add("@Поле1", OleDb.OleDbType.Integer).Value = 1 'число
myCmd.Parameters.Add("@Поле2", OleDb.OleDbType.WChar).Value = "это текст, см на тип поля"
myCmd.Parameters.Add("@Поле3", OleDb.OleDbType.DateTime).Value = Now 'дата
'ВНИМАНИЕ! Обязательно нужно соблюдать порядок добвления полей в myCmd!
'Т.е. надо добавлять также, как они идут в за просе, друг за другом.
'В SQL Server такой проблемы нет

Dim myDB As New DataAccessManager("Строка подлючения к базе данных")
myDB.ExecuteNonQuery(myCmd) 'Выполеняем запрос

_______________________
Colorized by: Eros.CodeSyntaxColor Engine

декларируй где хочешь :), можешь прям на там и за декларировать.

Твоя программа, твой код, тебе решать как ему работать.

_________________
Это сообщение добавлено через Kbyte.Ru Forum Mail Conference (FMC)

Добавить ответ | Посмотреть эту тему на сайте | Форум Kbyte.Ru

Ответ # 8 | Автор: RH100
Добавлено:16.01.2008 / 12:43

001:
002:
003:
004:
005:
006:
007:
008:
009:
010:
011:
012:
013:
014:
015:
016:
Function AddToMyBase()
    Dim sSQL
    sSQL = "INSERT INTO Results(num_group, mark) " & _
      "VALUES (@num_group, @mark)"
    Dim myCmd As New OleDb.OleDbCommand(s SQL)
    myCmd.Parameters.Add("@num_group", OleDb.OleDbType.Char).Value = dplNumGroup.Text 'текст
    myCmd.Parameters.Add("@mark", OleDb.OleDbType.Integer).Value = Val(txtISEstimate.Text)
    'ВНИМАНИЕ! Обязательно нужно соблюдать порядок добвления полей в myCmd!
    'Т.е. надо добавлять также, как они идут в запросе, друг за другом.
    'В SQL Server такой проблемы нет

    Dim myDB As New DataAccessManager("D:/WebSite1/dbBase.mdb")
    myDB.ExecuteNonQuery(myCmd) 'Выполняем запрос
  End Function

Colorized by: Eros.CodeSyntaxColor Engine

По идее это должно работать! Ошибок не выдаёт, но запись в базу данных не происходит.

Добавить ответ | Посмотреть эту тему на сайте | Форум Kbyte.Ru

Ответ # 9 | Автор: Алексей
Добавлено:16.01.2008 / 12:54
1. Не, не будет оно работать :), поскольку "D:/WebSite1/dbBase.mdb" - это не "Строка подключения к базе данных". И комментарии в DataAccessManager я видимо просто так, от нечего делать, писал, да еще и xml :)

2. D:/WebSite1/dbBase.mdb - в ASP .NET начиная с версии 2.x есть папка - App_Data, в которой можно хранить файлы баз данных и доступ к
ним через HTTP будет не возможен. Еще есть замечательная вещь – Server.MapPath, которая превращает виртуальный путь в физический: Server.MapPath("~/App_Data/mydb.mdb")

_________________
Это сообщение добавлено через Kbyte.Ru Forum Mail Conference (FMC)

Добавить ответ | Посмотреть эту тему на сайте | Форум Kbyte.Ru

Ответ # 10 | Автор: RH100
Добавлено:16.01.2008 / 13:13
001:
002:
003:
Dim myDB As New DataAccessManager(Server.MapPath("~/App_Data/dbBase.mdb"))

Colorized by: Eros.CodeSyntaxColor Engine

Заменил, записи не происходит.

Добавить ответ | Посмотреть эту тему на сайте | Форум Kbyte.Ru

Ответ # 11 | Автор: Алексей
До бавлено:16.01.2008 / 13:26
Я не давал полный ответ на этот вопрос, я лишь сказал, где его искать ;)
Читай комменты, там все написано по-русски, да и в VS должны подсказки вылазить.

_________________
Это сообщение добавлено через Kbyte.Ru Forum Mail Conference (FMC)

Добавить ответ | Посмотреть эту тему на сайте | Форум Kbyte.Ru

Ответ # 12 | Автор: RH100
Добавлено:17.01.2008 / 09:22
Здравствуйте!
Насколько я понял, необ ходимо прописать соединенеие с базой, в классе я нашёл строки, но конкретное использование не получается.

001:
002:
003:
004:
005:
006:
007:
008:
'Установление соединения
    Dim sConnectionString
    Dim Connection
    sConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=~/App_Data/dbBase.mdb"
    Connection=New(sConnectionString)
    Connection.Open()

Colorized by: Eros.CodeSyntaxColor Engine

Показывает ошибку Type Expected перед New.

Добавить ответ | Посмотреть эту тему на сайте | Форум Kbyte.Ru

Ответ # 13 | Автор: Алексей
Добавлено:17.01.2008 / 09:36
Отлично! :)

Строка соединения с БД MS Access должна быть такой:
Provider=Microsoft.Jet.OLEDB.4.0;Data Source=Полный физический путь к файлу БД

Функция Server.MapPath превращает виртуальный путь в физический, и ее можно, и нужно, использовать в данном случае:
Dim ConnStr As String = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("~/App_Data/dbBase.mdb")

тогда будет:

001:
002:
003:
004:
005:
006:
007:
Dim sConnectionString As String
sConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("~/App_Da ta/dbBase.mdb")
Dim Connection As New OleDbConnection(sConnectionString)
Connection.Open()

_______________________
Colorized by: Eros.CodeSyntaxColor Engine

или:

001:
002:
003:
004:
005:
006:
007:
008:
009:
Dim myDB As New DataAccessManager("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("~/App_Data/dbBase.mdb"))
Dim sSQL As String = "INSERT INTO Results(num_group, mark) VALUES (@num_group, @mark)"
Dim myCmd As New OleDb.OleDbCommand(sSQL)
myCmd.Parameters.Add("@num_group", OleDb.OleDbType.Char).Value = dplNumGroup.Text
myCmd.Parameters.Add("@mark", OleDb.OleDbType.Integer).Value = 1
myDB.ExecuteNonQuery(myCmd)

_______________________
Colorized by: Eros.CodeSyntaxColor Engine

еще можно так:

001:
002:
003:
004:
sConnectionString = String.Format("Provider=Microsoft.Jet.OLEDB.4.0;Data Source={0}", Server.MapPath("~/App_Data/dbBase.mdb")

_______________________
Colorized by: Eros.CodeSyntaxColor Engine

Хотя сами строки соединения с БД лучше хранить в *.config-е.

_________________
Это сообщение добавлено через Kbyte.Ru Forum Mail Conference (FMC)

Добавить ответ | Посмотреть эту тему на сайте | Форум Kbyte.Ru

Ответ # 14 | Автор: RH100
Добавлено:17.01.2008 / 10:15
Вобщем в итоге такая конструкция:

001:
002:
003:
004:
005:
006:
007:
008:
009:
010:
011:
012:
013:
014:
015:
016:
017:
018:
019:
020:
021:
022:
023:
024:
025:
026:
027:
028:
029:
030:
Function AddTo MyBase()

    'Установление соединения
    Dim sConnectionString As String
    'sConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("~/App_Data/dbBase.mdb")
    sConnectionString = String.Format("Provider=Microsoft.Jet.OLEDB.4.0;Data Source={0}", Server.MapPath("~/App_Data/dbBase.mdb"))
    Dim Connection As New OleDbConnection(sConnectionString)
    Connection.Open()

    'Добавление данных
    Dim sSQL
    sSQL = "INSERT INTO Results(num_group, mark, sys_qual, full_inform, add_inform, navig_qual, disyne_qual, propolsals)" & _
      "VALUES (@num_group, @mark, @sys_qual, @full_inform, @add_inform, @navig_qual, @disyne_qual, @propolsals)"
    Dim myCmd As New OleDb.OleDbCommand(sSQL)
    myCmd.Parameters.Add("@num_group", OleDb.OleDbType.WChar).Value = dplNumGroup.Text 'текст
    myCmd.Parameters.Add ("@mark", OleDb.OleDbType.Double).Value = Val(txtISEstimate.Text)
    myCmd.Parameters.Add("@sys_qual", OleDb.OleDbType.WChar).Value = RadioButtonList1.Text
    myCmd.Parameters.Add("@full_inform", OleDb.OleDbType.WChar).Value = RadioButtonList2.Text
    myCmd.Parameters.Add("@add_inform", OleDb.OleDbType.WChar).Value = txtAddInformation.Text
    myCmd.Parameters.Add("@navig_qual", OleDb.OleDbType.WChar).Value = RadioButtonList3.Text
    myCmd.Parameters.Add("@disyne_qual", OleDb.OleDbType.WChar).Value = RadioButtonList4.Text
    myCmd.Parameters.Add("@propolsals", OleDb.OleDbType.WChar).Value = txtPropolsals.Text

    'Dim myDB As New DataAccessManager("~/App_Data/dbBase.mdb")
    Dim myDB As New DataAccessManager(Server.MapPath("~/App_Data/dbBase.mdb"))
    myDB.ExecuteNonQuery(myCmd) 'Выполняем запрос

   & nbsp;End Function

Colorized by: Eros.CodeSyntaxColor Engine

Пока записи не происходит, ошибок не показывает.
Может быть необходимо: добавить ещё какие-нибудь команды (UPDATE) или настроить саму базу данных (может происходит блокировка записи данных). Либо поменять расположение (сейчас файлы находятся по умолчанию C:\Documents and Settings\KHR\Мои документы\Visual Studio 2005\WebSites\WebSite1\App_Data\dbBase.mdb.

Добавить ответ | Посмотреть эту тему на сайте | Форум Kbyte.Ru

Ответ # 15 | Автор: Алексей
Добавлено:17.01.2008 / 10:24
Да, там по идиотски сделано, ошибок не будет, по-моему ошибки надо
ловить в свойстве IsError, или что-то типа этого (в классе смотри),
если IsError = True, то ошибка была, в каком-нибудь ErrorDescription можно
почитать описание ошибки. Но лучше просто поубивать в классе все блоки Try .. Catch

А что касается твоего кода, то:

001:
Dim myDB As New DataAccessManager(Server.MapPath("~/App_Data/dbBase.mdb"))

см. мой предудущий ответ.

_________________
Это сообщение добавлено через Kbyte.Ru Forum Mail Conference (FMC)

Добавить ответ | Посмотреть эту тему на сайте | Форум Kbyte.Ru

Ответ # 16 | Автор: RH100
Добавлено:17.01.2008 / 10:59
Dim myDB исправил, Try Catch убрал. Возникает файл dbBase.ldb (Данные о блокировках записей Microsoft Office Access), который показан и в Solution Explorer. Зачем он нужен непонятно.

Добавить ответ | Посмотреть эту тему на сайте | Форум Kbyte.Ru

Ответ # 17 | Автор: Паша
Добавлено:17.01.2008 / 11:31
1. Acess база имеет пар оль? Блокировка чаще всего из-за пароля. И ключ тоже надо указывать повнимательней, для ключа записи есть специальный формат (какой, не помню). У меня эта штука после указания ключа заработала

Добавить ответ | Посмотреть эту тему на сайте | Форум Kbyte.Ru

Ответ # 18 | Автор: RH100
Добавлено:17.01.2008 / 11:45
Пароля нет. Ключ записи, что имеется в виду?

Добавить ответ | Посмотреть эту тему на сайте | Форум Kbyte.Ru

Ответ # 19 | Автор: Паша
Добавлено:17.01.2008 / 11:56
У тебя в базе данных ключевое поле какое? (название)

Добавить ответ | Посмотреть эту тему на сайте | Форум Kbyte.Ru

Ответ # 20 | Автор: Алексей
Добавлено:17.01.2008 / 12:05
Не парься :) ldb - это временный нужный системе (и тебе тоже :) ..) файл.

Блокировка файлов

Когда база данных открыта, блокирование файла
контролируется файлом блокировки. Когда открыт файл MDB, файл LDB
создается для контроля блокирования. Это происходит также при открытии
MDB-файла в Office Access 2007. Например, когда открывается файл
db1.mdb, создается файл db1.ldb , контролирующий блокирование. Для
файлов, созданных в Office Access 2007 в формате ACCDB, блокирование
управляется файлом с расширением LACCDB. Следовательно, открытие файла
db1.accdb приведет к созданию файла db1.laccdb. Как и LDB-файлы,
LACCDB-файлы уничтожаются автоматически, когда база данных будет
закрыта всеми пользователями.
/office.microsoft.com/

Эффективная база данных Access

Microsoft Access — эффективное ИТ-решение для создания простых баз данных для нужд компании, особенно при ограниченном б юджете. Приведенные в данной статье советы помогут построить эффективные базы данных и сократить время обработки.

Джин Хси,Алан Сугано

Microsoft Access — эффективное ИТ-решение для создания простых баз данных для нужд компании, особенно при ограниченном бюджете. Приведенные в данной статье советы помогут построить эффективные базы данных и сократить время обработки.
СОВЕТ 1.

Всегда закрывайте Access, если база данных не используется

Неиспользуемую базу данных Access удобно оставить открытой и свернуть, но при этом возникает опасность порчи базы данных, особенно если она коллективно используется в сети. Закрывая файлы базы данных и выходя из Access, пользователь не только освобождает ресурсы и соединения с базой данных, но и исключает порчу информации при неожиданном отключении компьютера.
СОВЕТ 2.

Определение лиц, использующих базу данных

При необходимости создать резервную коп ию или получить исключительный доступ к базе данных можно выяснить, используются ли файлы базы данных другими лицами. Access отслеживает информацию о соединениях пользователей в файле .ldb, который находится в одной папке с приложением Access. В файле .ldb перечислены имена рабочих станций и имена регистрации всех пользователей, подключенных в данный момент к файлу базы данных Access. Если .ldb-файл не существует, это означает, что никто из пользователей не установил соединение с базой данных и к ней можно получить исключительный доступ или выполнить резервное копирование. Если ldb-файл существует, то его можно открыть в Microsoft Notepad или WordPad. Если файл не удается открыть с помощью этих программ, то следует сохранить его с новым именем, а затем попытаться открыть.
СОВЕТ 3.

Регулярно копируйте базу данных

В сетевой среде необходимо удостовериться, что плановое резервное копирование базы данных выполнено успешно. Прежде чем запустить про цедуру резервного копирования, следует убедиться, что все файлы базы данных закрыты; в противном случае открытые файлы могут быть пропущены. Прежде чем приступить к изменению файла базы данных, полезно скопировать файл в резервную папку. Можно выполнить и быстрое копирование, выбрав Tools в панели инструментов Access, а затем Database Utilities и Back Up Database.
СОВЕТ 4.

Компактная база данных менее подвержена разрушению

Сжатие базы данных — один из лучших способов избежать порчи базы данных и повысить производительность. Подобно дефрагментации диска, сжатие базы данных позволяет реорганизовать и оптимизировать используемое и неиспользуемое дисковое пространство в базе данных благодаря удалению старых файлов Access и их замене компактными версиями. Если база данных Access размещена в файловой системе NTFS, то лучше всего установить файловые разрешения и применить защиту на уровне пользователя Access, так как в процессе сжатия всем разрешения м файлового уровня присваиваются стандартные значения. Начать сжатие базы данных необходимо с ее резервного копирования. Требуется выбрать Tools из панели инструментов Access, затем Database Utilities и запустить процедуру Compact and Repair Database. При использовании сценария Visual Basic for Applications (VBA) компактную базу данных можно получить с помощью команды Application.CompactRepair(SourceFile,DestinationFile, LogFile)
СОВЕТ 5.

Разделение базы данных на внешний и внутренний компоненты

При проектировании многопользовательской базы данных Access имеет смысл разделить информацию на две части — внешнюю и внутреннюю, чтобы преодолеть ограничение в 2 Гбайт, накладываемое на размер базы данных, и повысить производительность. Например, внешний компонент может содержать формы, отчеты, запросы и модули, а во внутренней базе данных могут храниться таблицы данных. Благодаря разделению базы данных упрощается ввод новых и изменение существующих д анных. Например, после разделения достаточно обновить только внешнюю базу данных для изменения форм и отчетов, а внутренняя база данных остается без изменений. Чтобы разделить базу данных, следует выбрать меню Tools из панели инструментов Access, затем пункт Database Utilities и активизировать функцию Database Splitter.

При работе в глобальной сети более эффективно загрузить внешний компонент, чем базу данных, содержащую все объекты (формы, записи и таблицы). Чтобы избежать порчи базы данных в многопользовательской среде, рекомендуется компилировать внешнюю базу как базу данных MDE (т. е. базу данных Access), выбрав меню Tools из панели Access, затем пункт Database Utilities и функцию Make MDE File. После этого MDE-файл следует разослать по локальным машинам пользователей.
СОВЕТ 6.

Создание первичного ключа для предотвращения дублирования записей

Фундаментальное правило проектирования баз данных — освободить базу данных от дублиро ванных записей. Простой способ избавиться от дублированных записей — определить первичный ключ или набор первичных ключей, уникально идентифицирующих каждую запись в таблице. Первичный ключ также играет роль уникального индекса или идентификатора. Некоторые примеры первичных ключей — номер элемента (AutoNumber), номер социального обеспечения или местоположение. В Access существует три типа данных первичных ключей: AutoNumber, с одним и несколькими полями. Чаще используются первичные ключи AutoNumber и ключи с одним полем.
СОВЕТ 7.

Использование индекса для ускорения обработки

Благодаря использованию индексов ускоряется сортировка и извлечение записей в таблице. Поле, используемое в качестве индекса, часто определяется тем, какое поле (или поля) чаще всего применяется в предложении WHERE в запросах. Можно указать, будет ли индексное поле уникальным или разрешить дублирование, выбрав Yes (уникальное) или No (разрешить дублирование) в поле свойст в Unique индекса. Если первичный ключ таблицы базы данных имеет тип данных AutoNumber, то следует установить свойство Unique в значение Yes, чтобы пользователь не мог ввести одну и ту же запись дважды. Индекс можно также настроить на одно или несколько полей. При использовании индексов увеличиваются занимаемое дисковое пространство и время обработки, поэтому не следует назначать индексы без необходимости.
СОВЕТ 8.

Присвоение полю AutoNumber значения 1

Поле AutoNumber — одно из полей, используемых в Access в качестве первичного ключа. Access автоматически назначает следующий номер каждой новой записи в соответствии со значением (Increment или Random) поля свойства New Value. Следует обратить внимание, что поле AutoNumber не может принимать значение 0. Значение поля AutoNumber нельзя вводить или редактировать вручную, но пользователь может сбросить значение этого поля, чтобы вновь начать нумерацию с 1, даже если в таблице есть записи. Чтобы пере нести записи из таблицы, следует создать ее резервную копию с помощью функции Copy или Save As и удалить из таблицы все существующие записи. Выберите Tools из инструментальной панели Access, затем Database Utilities и функцию Compact and Repair Database, пока таблица пуста. После того как будут присоединены старые записи из резервной таблицы, начальным значением поля AutoNumber будет 1.

СОВЕТ 9.

Использование свойств CanGrow и CanShrink для больших текстовых полей

Свойства CanGrow и CanShrink существуют для таких объектов управления, как подотчеты, подформы и текстовые поля, а также разделы отчетов. По умолчанию свойство CanGrow имеет значение No. Чтобы увеличить длину вертикального поля в соответствии с размером данных, свойство CanGrow должно иметь значение Yes. Разработчики отчетов и форм не всегда могут точно предсказать размер текста в записи, поэтому данное свойство полезно, когда необходимо отображать большие текстовые поля. При размещении элемента управления в режиме конструирования необходимо проверить наличие достаточного пространства вокруг поля; в противном случае свойство CanShrink будет функционировать некорректно. Дополнительные сведения о специализированных функциях, с помощью которых можно удалить ненужное пространство, приведены в статье Microsoft «Eliminating Unwanted Blank Lines in Labels and Reports» по адресу http://office.microsoft.com/en-us/assistance/HA011494721033.aspx.
СОВЕТ 10.

Корректный выбор библиотеки ссылок для обновления

На многих предприятиях существует множество баз данных Access или проектов, выполняемых пользователями с применением различных версий Access (например, Access 2003, Access XP). Access 2003 позволяет открывать различные версии баз данных Access. Однако необходимо сохранить отдельные экземпляры эталонных библиотек, используемых файлом базы данных на рабочей станции. В противном случае при попытке открыть и редактиров ать файл базы данных Access XP с использованием Access 2003 библиотека Access XP может быть автоматически обновлена с использованием эталонных библиотек, что приведет к некорректному функционированию части программного кода VBA. К эталонной библиотеке можно обратиться с помощью редактора VBA, выбрав меню Tools, а затем References. Во избежание несовместимости рекомендуется проектировать базу данных Access с применением той же версии программы и пакетов обновлений Access, которая имеется у пользователей.

Алан Сугано — президент компании ADS Consulting Group, консультант в области сетевых технологий, специализированного программирования, Web-разработки Microsoft .NET и проектирования SQL Server. asugano@adscon.com

Джин Хси — директор ADS Consulting Group. Имеет 13-летний опыт проектирования специализированных приложений Microsoft Access, Visual Studio, баз данных и SQL Server.

___ ______________
Это сообщение добавлено через Kbyte.Ru Forum Mail Conference (FMC)

Добавить ответ | Посмотреть эту тему на сайте | Форум Kbyte.Ru

Ответ # 21 | Автор: RH100
Добавлено:17.01.2008 / 12:13
Ключевое поле - num_group.

Добавить ответ | Посмотреть эту тему на сайте | Форум Kbyte. Ru

Ответ # 22 | Автор: RH100
Добавлено:17.01.2008 / 13:02
Вобщем пока не работает. Если смотреть в Server Explorer то значок базы показывает, что она Close, нажимаешь Refresh и она подключается. если смотреть в Modify Connection, то там User ID стоит Admin без пароля. Надо ли Adminа прописывать в sConnectionString? Хотя и так и так не работает. Дальше посмотрел файл dbBase.ldb, там показано имя компьютера (KHR-VZJ3MSНXD4L) и Admin.
Что же ещё может быть?

Добавить ответ | Посмотреть эту тему на сайте | Форум Kbyte.Ru

Ответ # 23 | Автор: RH100
Добавлено:17.01.2008 / 23:03
Ребята заработало!!! Не зря парились. Спасибо!!! Kbyte рулит! Фишка была в том, что я функцию вывода в текстовый документ ставил раньше функции записи в базу даанных, а в функции вывода в текст был редирект на другую страницу. Как только поменял местами функции всё заработало!

Следующая фишка, котрая интересует - можно ли выводить диаграммы из Access в web-форму, чтобы сразу просматривать результаты опроса в графическом виде или надо использовать инструменты визуализации из VS?

Добавить ответ | Посмотреть эту тему на сайте | Форум Kbyte.Ru

Новый ФОРУМ=))) | Автор: igores
Добавлено: 14.01.2008 / 13:06 | ответов: 2 | просмотров: 86
Новый пока ещё полу пустой но развивающийся форум по программированию http://art-proffs.info/forum/
Ответить на это сообщение | Посмотреть эту тему на сайте | Форум Kbyte.Ru

Ответ # 1 | Автор: Алексей
Добавлено:14.01.2008 / 13:12
[минус]1 - публикация сообщения не в том форуме
[минус]1 - СУК - ЗЛО

Добавить ответ | Посмот реть эту тему на сайте | Форум Kbyte.Ru

Ответ # 2 | Автор: Алексей
Добавлено:14.01.2008 / 13:14
Ладно,
+1 Владивосток :)

Добавить ответ | Посмотреть эту тему на сайте | Форум Kbyte.Ru

Как продолжение БВнК | Автор: Жак Кусто
Добавлено: 14.01.2008 / 12:18 | ответов: 5 | просмотров: 177
Еще раз с наступившим Старым Новым!!! : )
И еще раз с ваш его общего позволения запрос.
Может кто где видел прогу, или сам писал, прога должна вывадит цифирки из Стандартной Звукозаписывающей Виндосовской программки. В оприории ( это мой друг так любит выражаться, Для меня он очень умным кажется после этого слова, хотя я даже не знаю как оно правильно пишется : ) как и многие другие слова : ) хотя смешного в этом мало.) Извините... занесло...
Итак: Задумывается, что эти цифирки есть сила тока идущий с микрофона.
Невериться, что это невозможно. : )

С уавжением Жак Ив Кусто.
Ответить на это сообщение | Посмотреть эту тему на сайте | Форум Kbyte.Ru

Ответ # 1 | Автор: comexe
Добавлено :15.01.2008 / 09:28
Здорова, Жак! Я скинул в кодообменник три проги. Хочется отметить, что как ты говоришь сила тока это не сила тока а величина разности потенциалов на мембране микрофона, усиленная в звуковой карте системой операционных усилителей. Если так посудить, звуковая карта представляет собой устройство ЦАП и АЦП, содержащая контроллер PCI или ISA - шины

Добавить ответ | Посмотреть эту тему на сайте | Форум Kbyte.Ru

Ответ # 2 | Автор: Жак Кусто
Добавлено:15.01.2008 / 15:05
Рад Читать !!! : )

Здравствуй Comexe!!! : )

Спасибо что не забыл : )
Сейчас в кодообменник залезу !!!
Возникну т вопросы напишу, надеюсь на Вашу потдержку.

С уважением Жак ( Не Ширак!!!) : ))

Добавить ответ | Посмотреть эту тему на сайте | Форум Kbyte.Ru

Ответ # 3 | Автор: Жак Кусто
Добавлено:15.01.2008 / 22:30
Глубокого всем вечера, или что там у вас : )

Соmexe, поддержка все-таки понадобиться.

В программе SUL-3 Generator и в Funny LPT, есть поля, где можно задать амплитуду -10В…10В или 0В…10В.
Как я понимаю, это напряжение, которые выходят из Н378 и Н37А, но на выходах Н378 у меня или 3.3В или 0.01В ( у меня так : ) ), а на Н37А 4.8В или те же 0.01В.
Короче, или Да(3.3В) или Нет (0.01В) {-Строго на 12 Часов!!! Этто те, не маятнк!!! -Говорит моя старая Армадушка : ) } Ну в данный момент, меня это не очень беспокоит. Программа интересная, и полезная для продвинутых товарищем Билом Гейстом Радиотехников. Для Акул тоже советую посмотреть, Генерация сигнала всегда актуальна! : )

Больше меня волнует sul32-2, ( ну и экзамен 17 числа : ) )
Серьезный продукт получился однако! : )
У меня при запуске происходит Ошибка такого рода и падежа :
“couldn’t find installable ISAM”
Ну как я думаю она может ругается, что у меня нет Сул-32 : )

Вот еще, когда я нажимаю на «Плей», появляется сообщение:
“Run-timer error “91””
“Object variable or with block variable not set”
И после этого, программа закрывается : (

Соmexe, можешь подсказать, куда( къ каким Выходам/Входам) можно подсоединить Батарейку 1.5В и как зафиксировать её в DATA ?

За мать не волнуйтесь, она и так еле дышит, не Жалко ! : )

Еще раз Огромное Спасибо, за примеры!!! : )

С уважением Жак Ив.

Добавить ответ | Посмотреть эту тему на сайте | Форум Kbyte.Ru

Ответ # 4 | Автор: comexe
Добавлено:17.01.2008 / 06:56
Здарова, Жак! Ошибка АЙСЭМ говорит о том что при установке VB 6.0 ты не выбрал установку группы data, или же ты не выбрал тип АЦП(выбрать надо обязательно его) Из-за этого же возникает 'RTE "91"'. Еще файл data.xls обязательно должен быть в папке с программой. Штоба у тебя разряды переключались тебе не удастся просто подключить батарейку между массой и разрядом. Тебе надо собрать схему с открытым коллектором на ка ждый из разрядов по одному транзистору npn проводимости. Затем установить разряд С5 в единицу(режим приема) и на базу транзистора подавать напряжение батарейки. Есть проще вариант: устанавливаешь С5 в единицу, разряды DATA h378 должны все встать в 1. И проводом массы подключаешься на любой из разрядов data. Из единицы они вскачат в 0. Программно инвертируешь их как я это сделал в sul32-2. И всё. Вот транзисторы эти и нужны для коммутации разрядов data на массу. Вместо их можно использовать микросхемы с открытым коллектором или 3 состояниями.

Добавить ответ | Посмотреть эту тему на сайте | Форум Kbyte.Ru

Ответ # 5 | Автор: Жак Кусто
Добавлено:17 .01.2008 / 18:49
Здравствуй Comexe!
Честно говоря, устанавливал VB6 с покорябленного диска, и при установке, комп один раз матюкнулся, но немного подумав, завершил нисталяцию.
Возможно, группа data и не вошла. Только, вот что, у меня в начале не выходит форма с выбором АЦП, можно только выбрать полярность.
Попробую достать трезвый диск и переустановить по полной. Но это займет немного времени.
Извини, я не точно тогда сформулировал вопрос, под "зафиксировать", подразумевалось снять на компе напряжение, что-то вроде Label1.Caption=1.5В,
это есть напряжение батарейки, или же Label1.Caption=3В, если подключить 3-х вольтовую.
В идеале, хотелось бы, к входу микрофона подсоединить напряжение и прочитать его на экране, но это слишком хорошо, чтобы быть реальностью, или не так : )
В реальности мне надо прочитать сопротивление, Но своим Русским умом с Татарским акцентом : ) пришел к одной извращенной идеи, суть идеи след ующая:

Если я разберу, папин аналоговый тестор, и доберусь до двух тонких проводков которые, идут к катушке, которая отклоняет стрелку, и если подключить эти два проводка ко входу микрофона, и составить программу... То можно снимать что угодно!!! и Сопротивление и Напряжение и Ток!!! Разве не так : (
: )

Comexe, в теме На границе я оставил ссылку, на рис №3. сам рисунок не могу добавить в форум : (
С его помощью, автор снимал покозания термодатчика от ВАЗ-2101, схема меняет частоту взавиисимости от сопротивления. Сколько раз в секунду произошло событие, вот тебе и дядюшка Герц : ). Все через ЛПТ.
Только вот беда, не знаю куда подается +5В. на рисунке сопротивление, емкость и микросхема.
Тута находится, http://sano2000.narod.ru/LPT_main.htm и еще, Comexe, по секрету, очень странная распиновка LPT, сам увидишь, только Тссс... : )
Если случаем туда заглянешь и поймешь, куда +5В подовать пожалуйста, пару слов чиркни...< br /> Но все же чешатся руки вскрыть папин тестер...( стоит ли? ) ; )

С уважением Жак Кусто.

Добавить ответ | Посмотреть эту тему на сайте | Форум Kbyte.Ru

Команде энтузиастов-разработчиков требуются програмисты С++ | Автор: seaterra
Добавлено: 13.01.2008 / 23:36 | ответов: 0 | просмотров: 64
:!:Внимание внимание!

Команде энтузиастов-разработчиков требуются програмисты С++ !!
Наша команда разрабатывает игру на морскую тематику, вот официальный сайт www.project.seaterra.org
Проект пока некомерческий, на да нном этапе мы разрабатываем демо версию игры, после чего, спонсоры готовы нас профинансировать.
Если на вашем форуме ещё остались интузиасты, готовые пожертвовать время на интересный проект, стучите в асю 76728119. Пишите даже в офф, приду обязательно авторизую и отвечу.
Кстати игра разрабатывается на движке OGRE 3D (графический) и PhysX (физический).
*уже есть спонсоры, но для начала нам нужно выпустить демо-версию для того чтобы показать умения работать в команде, да и то что вообще команда есть и работать умеет.
Надеюсь энтузиасты найдутся, проекту действительно нужна помощь.

ICQ: 76728119 E-Mail: seaterra@mail.ru
Ответить на это сообщение | Посмотреть эту тему на сайте | Форум Kbyte.Ru

Наверх

Последние статьи

Взаимодействие с другими сайтами через HTTP (HttpWebRequest и HttpWebResponse)
Автор: Немиро Алексей | добавлено: 27.07.2007 / 14:01 | просмотров: 2336

В данной статье речь пойдет о том, как можно програ ммно заполнить и отправить Web-форму, а также получить результат с использованием довольно простых классов - HttpWebRequest и HttpWebResponse.

Работа с SQL – Запросы
Автор: Хабибулин А. (aka Bille Gates) | добавлено: 22.07.2007 / 04:43 | просмотров: 4141

В данной статье рассмотрены часто используемые SQL-запросы и приведены примеры их использования.

Использование XML.Serialization
Автор: Немиро Алексей | добавлено: 19.07.2007 / 15:38 | просмотров: 1198

В данном обзоре речь пойдет о б использование XML.Serialization в .NET и ее применении на примере сохранения и считывания настроек программы с использованием синтаксиса языка Visual Basic .NET.

Выбор языка программирования для научных работ (2-я редакция)
Автор: Юдин С. Ю. | добавлено: 15.03.2007 / 02:49 | просмотров: 3655

Идея написания этой статьи возникла после того, как на одном из сайтов по физике http://physics.nad.ru/aniboard/messages/291.html я обнаружил интересный алгоритм моделирования движения тела в поле постоянной напряженности по различным направляющим. Вернее, меня заинтересовал не весь алгоритм, т.к. основа их всех одна (принцип Даламбера, если не считать квазиалгоритма с применением уравнений Лагранжа 2-го рода) и различаются они только способом опр еделения реакций в месте соприкосновения тел. ...

Работаем с MIME
Автор: Немиро Алексей | добавлено: 29.11.2006 / 14:46 | просмотров: 3222

Не так давно мне пришлось немного поработать MIME (Multipurpose Internet Mail Extension) - это стандарт почтовых сообщений, в РуНете (Russian Internet) я не нашел нормального описания спецификации MIME, и посему решил написать небольшую статейку на эту тему. В данной статье вы узнаете об основных особенностях и стандартах MIME, а также научитесь «читать» MIME с использованием синтаксиса языка Visual Basic .NET 2005.

Статьи на Kbyte.Ru

Наверх

Интересные коды и решения

Как программно дополнить заголовок (Title) страницы?
Дата добавления: 31.07.2006 / 13:27 | просмотров: 1046 | платформа: ASP .NET (VB)

Как ограничить количество в водимых символов в TextBox?
Дата добавления: 31.07.2006 / 13:59 | просмотров: 1550 | платформа: ASP .NET (VB)

Как добавить новые данные в базу данных?
Дата добавления: 31.07.2006 / 18:33 | просмотров: 1317 | платформа: ASP

Как преобразовать байты в килобайты?
Дата добавления: 31.07.2006 / 12:38 | просмотров: 1112 | платформа: VB

Как программно изменить дату в Calendar?
Дата добавления: 25.03.2007 / 08:33 | просмотров: 1148 | платформа: ASP .NET (VB)

Удаление куков (Cookies)
Дата добавления: 31.07.2006 / 15:57 | просмотров: 1128 | платформа: ASP .NET (VB)

Как показать сообщение?
Дата добавления: 16.08.2006 / 23:31 | просмотров: 1294 | платформа: VB

Ключ = Значение
Дата добавления: 24.03.2007 / 11:07 | просмотров: 818 | платформа: RegEx

Как можно скрыть заголовок формы?
Дата добавления: 31.07.2006 / 12:04 | просмотров: 1053 | платформа: VB

Как перевести посетителя на другую страницу?
Дата добавления: 31.07.2006 / 14:37 | просмотров: 932 | платформа: ASP .NET (V B)

Универсальные коды на Kbyte.Ru

Наверх

Юмор на Kbyte.Ru

Сидят два хакера за компьютером. Вдруг заходит кот. Один говорит:
- Твой кот?
- Да.
- Как зовут?
- Zyxel.
- А почему так?
- Смотри.
Берёт веник, подходит к коту и говорит:
- Zyxel Конект!
Кот:
- Пшшшшшшшшшш

Рейтинг: 138
Всего голосов: 228