база данни Microsoft Access

Работа с таблици в Microsoft Access може да се извърши като майстор, както и от език за програмиране. В тази част на книгата се описва развитието на този метод.

Ще се научите как да създадете таблица, проверка присъствието си в базата данни, създаване на полета и променя свойствата им използване VBA.

Може би вече сте се научили как да създадете таблица със съветника, на посочения метод в ляво. Сега нека да се опитаме да го създадете по програмен път. Понякога този метод е по-предпочитан от стандарта. Като променлива маса се създава ще използва името StrTable = «калкулатор»

Публична Функция funCreateTable (strTable Както стринга) Както Булева

Дим DBS като бази данни, TDF Както TableDef

На Error GoTo 999 "Присвояване на прехода на грешка

funCreateTable = False "на грешка Върни когато

Ако funVerifyTable (strTable) = False Тогава "Проверка на маса

DBS = appAccess.CurrentDb "Ние намираме в базата данни

TDF = dbs.CreateTableDef (strTable) "Създаване на таблица

tdf.Fields.Append tdf.CreateField ( "т". dbLong) "Създаване на поле 1

dbs.TableDefs.Append TDF "добави маси

funCreateFields strTable "<3> създаване на поле

funCreateTable = True "извежда резултати,

MsgBox (Err.Description, vbCritical, "Създаване на таблица") ", за да информира красиво грешка

Err.Clear () 'Clear потока на грешки

Проверка на маса

Много често при работа с база данни, трябва да се провери наличието на обекти на базата данни. В този пример се посочва начин да се провери таблицата на базата данни.

Ако обектът не е налице, възниква грешка и програмата изчиства потока на грешки чрез връщане към False.

Публична Функция funVerifyTable (strTable Както стринга) Както Булева

Дим TDF Както TableDef

На Error GoTo 999 "Присвояване на прехода на грешка

funVerifyTable = False "на грешка Върни когато

TDF = appAccess.CurrentDb.TableDefs (strTable) "Намери предмета

Ако (TDF е нищо) = False Тогава funVerifyTable = True "Проверка на обект

TDF = Нищо "унищожи променлива

Exit Функция "Излезте от програмата

Създаване на полета на маса

Създаване на полета с помощта на програмата е важен елемент в програмирането на бази данни.

От складови и счетоводни таблици всички полета е много трудно да се вземе предвид и често сменящите се изискванията за счетоводство, разбира се, трябва да включите в програмите си за база данни се променят различни версии на шаблон (метод се нарича репликация). В този пример, таблицата "калкулатор" променлива strTable, добави израз две нови полета iItog, както и промяна свойства на офиса поле

Публична функция funCreateFields (strTable Както стринга) Както Булева

Дим DBS като бази данни, TDF Както TableDef, FLD Както поле

На Error GoTo 999 "Присвояване на прехода на грешка

funCreateFields = False "грешка Върни резултат, когато

DBS = appAccess.CurrentDb "Определяне на база данни

TDF = dbs.TableDefs (strTable) "Намерете таблицата

С TDF 'Изберете маса за промени

Fields.Append.CreateField ( "Expression". DbText, 75) "Създаване на изразяване

Fields.Append.CreateField ( "Резултати". DbDouble) "Създаване на Невярно Резултати

Fld = tdf.Fields ( "т") "Промяна на свойствата на полето" Позиция "

funChangeProperty (Fld, "Описание". dbText, "не израз в калкулатора") "Промяна описание

funChangeProperty (Fld, "Формат". dbText "Fixed") "Присвояване на определен формат

funChangeProperty (Fld "DecimalPlaced". dbByte, 0) "забранява десетични дроби

Fld = Нищо "унищожи променлива поле

TDF = Нищо "унищожи променлива маса

funCreateFields = True "извежда резултати,

Exit Функция "Излезте от програмата

MsgBox (Err.Description, vbCritical, "Създаване на таблица"), "съобщава за проблем

Err.Clear () 'Clear потока на грешки

Промяна на свойства на маса

Когато създавате поле програмно, някои от неговите свойства, например, Описание (Description) не създава автоматично.

Трябва да се научите как да промените свойствата на полета от базата и в случай на нужда, за да ги добавите към базата данни.

Този пример показва как да се промени стойността на полетата в базата данни. Тази програма предвижда също, че ако имотът е липсващ, тя ще бъде добавена към базата данни.

Развитие на Microsoft Access

Цената за развитието на тип база данни Microsoft Access се определя от техническото задание, където споменатите предварително бюджет работа. Заявлението е необходимо да инсталирате Microsoft Office в Access.

Разработване на програма за Windows

В рамките на тази молба се отнася до програмата, която не изисква да започнете да инсталирате допълнителен софтуер. Цената за развитието на десктоп приложения за Microsoft Windows и се определя от техническото задание. Ако задачата се състои от общи фрази, развитието върви поетапно

на сайта в ASP.NET

Цени за развитието на уеб сайт и неговите модули базирани на Microsoft технологии Asp.NET се определя от сложността на проекта. Можете да създадете мини на решения в рамките на 2-3 дни
Продължи с поръчката.

С цел бързо получавате новини от този сайт се абонирате за новини, или да изберете една общност за обмен на информация